从VBA中的日期中减去?

2024-01-10

我在 Excel VBA 中对日期进行操作时遇到很大问题。 我有一个带有文本框的表单,用户将在其中输入日期。问题是他可能会以不同的格式输入(例如,1.08.2011 表示 8 月 1 日,或 8/1/11 表示同一天)。现在我想做的是从他在文本框中输入的日期中减去一些天数。到目前为止我必须成功,但我不知道该怎么做。 我尝试过这样的事情

Format((Format(Me.datalivrare.Value, "dd.mm.yyy") - 4), "dd.mm.yyyy")

其中 datalivrare 是用户输入日期的文本框,4 是我要从该日期中减去的天数...并且我希望格式始终为 dd.mm.yyyy,无论他们在该文本框中输入什么。


我建议查看 VBA 的 DateAdd 函数

http://www.techonthenet.com/excel/formulas/dateadd.php http://www.techonthenet.com/excel/formulas/dateadd.php

http://office.microsoft.com/en-us/access-help/dateadd-function-HA001228810.aspx http://office.microsoft.com/en-us/access-help/dateadd-function-HA001228810.aspx

您可以执行以下操作:

Format(DateAdd("d", -4, CDate(Me.datalivrare.Value)), "dd.mm.yyyy")
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

从VBA中的日期中减去? 的相关文章

  • 保护 Excel VBA 代码的最佳方法? [关闭]

    Closed 这个问题需要多问focused help closed questions 目前不接受答案 我已经整理了一个简单的 Excel 数据库 该数据库执行一些宏函数 并且我需要将此数据库分发给几个人 但他们无法看到宏函数实际上是如何
  • 如何使用 VBA 忽略范围内的绿色三角形错误,而不逐个单元循环?

    我有一些正在自动化和分发的大型数据集 我想消除警告用户有关存储为文本的数字的绿色小三角形 我使用了以下代码 但在大量纸张上速度非常慢 Range Cells 1 1 Cells lastrow lColumn Select kill tho
  • Python(openpyxl):将数据从一个excel文件转移到另一个(模板文件)并用另一个名称保存,同时保留模板

    我有一个templateexcel 文件名为template xlsx其中有许多张 我想从单独的地方复制数据 csv文件到第一页template xlsx 命名为data 并将新文件另存为result xlsx同时保留原来的模板文件 我想粘
  • VBA 代码基准测试

    对 VBA 代码进行基准测试最准确的方法是什么 在我的例子中 我正在 Excel 中测试代码 除了下面的 2 种之外 还有其他对代码进行基准测试的技术吗 如果有 该方法的优点 缺点是什么 这里有两种流行的方法 First Timer Sub
  • 在 Excel 中打印 MATLAB 图窗并调整其大小

    我在 MATLAB 中有两个带有手柄的图形hFig1 and hFig2 我想将它们打印到 Excel 中的特定单元格 单元格 E3 和 I3 并将它们重新调整为 2 英寸 x 3 英寸 我尝试过使用 AddPictures对象处理程序和使
  • Excel VBA 通过简单除法引发溢出错误

    Excel 2013 VBA 这段代码 Sub test On Error GoTo Err Dim p As Double p 362 100 2005 Exit Sub Err If Err Description lt gt And
  • 转置 CopyFromRecordset Excel VBA

    我的 Excel VBA 中有以下代码 可将 SQL 中的表中的数据复制到 Excel 中 该数据从单元格 C2 开始水平插入 但我希望将其垂直插入到 C 列 Sheets Control Range C2 CopyFromRecorset
  • 从 .Net 将简单数据插入 Excel 文件的最简单方法

    我有一个 Excel 文件 大约有 10 列和 1 20 行 我需要插入 1 20 行包含各种数据元素 我想知道是否有一种方法可以将一些标签放入 Excel 文件中 以便可以找到并替换它们 将列标记为 名称 的东西 这样我就可以在代码中说
  • 如何在 VB.NET 中将 DataGridView 导出为 Excel 格式

    我使用 OLE 通过 VB NET 连接到数据库 并在 DataGridView 中显示结果 我想将 DataGridView 中的数据导出到 Excel 格式文件 即用户可以将 DataGridView 的内容保存为 MS Excel 文
  • Excel VBA 将范围值复制到数组,

    我有以下代码摘录 我试图将一系列值复制到声明的数组上 但它一直给我 无法分配给数组 错误 Dim permittedCurve 0 To 7000 As Variant permittedCurve activeWorkbook Works
  • 遍历 Excel 工作表

    这是我的代码 我是 VBA 新手 所以我不确定如何迭代多个页面 这是我的代码 Dim ws As Worksheet Sub spellCheck For Each ws In ActiveWorkbook Worksheets Cells
  • INDEX 和 SMALL 只返回一个结果

    我写的 Excel 公式如下 但有错误 IFERROR INDEX Testbook2 xlsx Sheet1 A 2 B 6 SMALL IF Testbook2 xlsx Sheet1 B 2 B 6 A ROW Testbook2 x
  • 将参数传递给使用“New”创建的访问表单

    我有一个名为 详细信息 的表单 它显示所选记录的详细视图 该记录是从称为 搜索 的不同形式中选择的 因为我希望能够打开 详细信息 的多个实例 每个实例显示不同记录的详细信息 所以我使用了以下代码 Public detailCollectio
  • GetActiveObject() 与 GetObject() -- MK_E_UNAVAILABLE 错误

    All 我在将一些 VBA 代码转换为 C 时遇到一些问题 我们有一个充当本地 COM 服务器的第 3 方应用程序 在我们使用的VBA代码中获取对象 获取对现有对象的引用 e g Set appHandle GetObject ProgId
  • 如何在 Windows Phone 8 应用程序中读写 xls、docs 和 csv 文件 [关闭]

    Closed 这个问题不符合堆栈溢出指南 help closed questions 目前不接受答案 询问代码的问题必须对所解决的问题表现出最低限度的了解 包括尝试的解决方案 为什么不起作用以及预期结果 也可以看看 Stack Overfl
  • 将范围传递给 Excel 用户定义函数并将其分配给数组

    我在尝试着 通过两个范围 多行单列 Excel 2007 中的用户定义函数 然后将其分配给一个数组进行处理 谁能告诉我如何将这样的范围分配给数组 范围不是恒定的 因为我在不同的单元格中使用 UDF 来处理不同的数据 所以我不能使用 e g
  • Excel VBA 根据条件通过电子邮件发送每一行

    我正在尝试得到这个 因此 发送如下所示的电子邮件 然后就变成这样 我需要它跳过空白电子邮件地址 在发送时将已发送插入到第五列 并在有可用电子邮件时为每一行创建一封新电子邮件 新电子邮件需要与该单独行相关的特定信息 我正在使用 Ron de
  • 字节数组到 Excel 工作簿

    我正在尝试将字节数组转换为 Excel 工作簿 当我这样做时 Response BinaryWrite renderedBytes 它工作正常并且文件符合预期 但是当我尝试用我在网上找到的这个来做到这一点时 private Object B
  • 包含另一个单元格值的条件格式文本的公式

    我有一个 A 列 每个单元格中包含 1 4 个单词的短语 我还有 4 个包含 1 个单词值的单元格 B1 C1 D1 和 E1 我需要设置条件格式 这样 1 如果 A 列单元格中的文本包含与上述单元格之一的值匹配的单词 则以红色突出显示该单
  • 如何使用波斯日期(Shamsi)? [关闭]

    Closed 这个问题不符合堆栈溢出指南 help closed questions 目前不接受答案 我想直接使用 Excel 2007 工作表中的波斯日期 Hijri Shamsi 作为计算基础 这怎么可能 我将通过以下方式将波斯日期转换

随机推荐

  • Android 空指针异常 不确定如何修复它

    我的代码中的一行不断收到空指针异常错误 但我不知道如何修复它 它基本上只是另一种方法的副本 所以我不知道为什么它会给我错误 任何帮助 将不胜感激 import java util Calendar import android app Ac
  • Java 上有关无效 XML 字符的错误

    在 Java 上解析 xml 文件时出现错误 An invalid XML character Unicode 0x0 was found in the element content of the document xml 来自 web
  • Kotlin:安全的 lambda(无内存泄漏)?

    读完后这篇关于内存泄漏的文章 https medium com freenet engineering memory leaks in android identify treat and avoid d0b1233acc8 yet4778
  • “如果不是 _____ 就什么都不是”以及它检查的内容

    VB 中的这条语句是检查对象是否存在 还是检查内容是否为空 我认为它正在检查内容是否为空 但我想仔细检查一下 提前致谢 VBA 中 null 的概念 即NullReferenceException null 如果您熟悉 C 或者NullPo
  • 流星当前活跃用户?

    我正在流星中制作一个简单的聊天室 我如何获取当前活跃用户的列表 有没有办法真正获取当前连接 客户端的列表 我昨天浏览了流星源 看看是否已经有类似的东西了 我找不到连接的标志或任何东西 我想你会有两种选择 在客户端和服务器中为每个连接的用户实
  • 以编程方式更新 MS Word 中 excel 对象的链接命名范围 (2007)

    第一个问题 请问这个问题是否已经解决 但我已经彻底搜索并找不到答案 我已将几个命名范围链接到一个 Word 文档中 此 Word 文档 以及带有命名范围的相关 Excel 工作簿 是一个模板 它供同事制作这些模板 Word 文档和 Exce
  • 在python中添加年份

    如果我想在程序中添加 100 年 为什么它显示错误的日期 import datetime stringDate January 10 1920 dateObject datetime datetime strptime stringDate
  • 正则表达式仅匹配前面有空格或没有任何内容的特定字符(行首)

    考虑以下推文 RT username This is my tweet Check this RT username This is my tweet I have PART 2 downloaded In a preg replace 调
  • 将 Postgresql 数组直接读入 Golang Slice

    我有一个查询返回一行 其中有一列包含字符串数组 character varying http wp me p62MJv Jc http tyrant click 1LGBoD6 有没有简单的方法可以将其直接读入 Golang 切片中 例如
  • 在我的项目中使用 jar 时出错

    我使用 Java 1 8 来创建我的 jar 我在Java项目中可以使用它 但是在Android项目中 出现以下错误 Error Error converting bytecode to dex Cause Dex cannot parse
  • 显式复制构造函数和 std::sort

    当对具有显式复制构造函数的对象容器进行排序时 我收到我不理解的编译器错误 来自 g 4 8 2 和 clang 3 4 均处于 std c 11 模式 我创建了一个简单的示例来演示该问题 class A public explicit A
  • 如何在sql中将分钟拆分为天、小时和分钟

    我有一个由分钟组成的专栏 有没有什么简单的方法可以将分钟列拆分为仅显示天 小时 分钟的一列 DURATION 67 gt 1 hour 7 minutes 1507 gt 1 day 1 hour 7 minutes 23 gt 23 mi
  • Open Shift Kafka 实例中默认不创建 Topic

    我正在使用下面的 Camel Route 向 Kafka 实例生成消息 但该主题不存在于实例中 当 Kafka 实例中不存在主题时 如何创建主题 Component public class kafkaConfig extends Rout
  • 如何通知视图模型的所有属性已更改

    在MVVM模式中 如何通知视图模型的所有属性发生了变化 我不想调用所有属性的所有notifypropertychanged 事件 我有一个实体类 在视图模型中 我将实体的所有公共字段编写为公共属性 我想重新绑定新实体并只编写一行代码来通知所
  • 什么 API 可以使用 Java 将复选框添加到 MS Word 文件?

    我想编写一个程序来创建 MS Word 文件 但某些 API 无法向文档添加复选框 有人这样做过吗 谢谢 open office的api怎么样 http api openoffice org docs common ref com sun
  • 编译时与运行时错误[重复]

    这个问题在这里已经有答案了 可能的重复 运行时与编译时 https stackoverflow com questions 846103 runtime vs compile time 我如何知道 Java 中的特定代码行是否可能引发编译时
  • Spark 分区:从单节点集群上的本地文件系统加载文件

    我有兴趣了解 Spark 在从本地文件系统加载文件时如何创建分区 我正在使用 Databricks 社区版来学习 Spark 当我使用 sc textfile 命令加载一个大小只有几千字节 大约 300 kb 的文件时 spark 默认情况
  • jquery 使用内联 javascript 加载

    我正在使用 jquery load 获取不同页面上的 div 并将其插入到我的页面中 像这样的东西 mydiv load Pages grid2 aspx otherpagediv 在另一个页面的div中 div中有javascript j
  • Intent.setAction()和intent.getAction()在BroadcastReceiver中不起作用

    我正在使用 BroadCastReceiver 来允许用户执行离线事件 问题是它永远不会进入内部intent getAction equals beenthereclicked 如果我尝试在点击beenThereView后几秒钟打开wifi
  • 从VBA中的日期中减去?

    我在 Excel VBA 中对日期进行操作时遇到很大问题 我有一个带有文本框的表单 用户将在其中输入日期 问题是他可能会以不同的格式输入 例如 1 08 2011 表示 8 月 1 日 或 8 1 11 表示同一天 现在我想做的是从他在文本