VBA将日期转换为字符串
VBA（Visual Basic for Applications）是一种宏语言，用于在Microsoft Office应用程序中编写自定义功能和自动化任务。下面是关于VBA将日期转换为字符串的完善答案：
VBA中可以使用多种方法将日期转换为字符串，最常用的方法是使用VBA的内置函数Format。Format函数允许我们按照特定的格式将日期值格式化为字符串。
下面是使用Format函数将日期转换为字符串的示例代码：
Dim dateValue As Date
Dim dateString As String
dateValue = Date
dateString = Format(dateValue, "yyyy-mm-dd") ' 将日期格式化为"yyyy-mm-dd"的字符串
MsgBox dateString ' 显示转换后的日期字符串在上面的示例代码中，我们首先声明了一个日期变量dateValue，并将其设置为当前日期（使用VBA的内置函数Date）。然后，我们使用Format函数将日期值dateValue格式化为"yyyy-mm-dd"的字符串，并将结果赋值给字符串变量dateString。最后，我们使用MsgBox函数在消息框中显示转换后的日期字符串。
在这个示例中，"yyyy"表示4位的年份，"mm"表示2位的月份，"dd"表示2位的日期。你可以根据自己的需要使用不同的格式代码来格式化日期。
应用场景：将日期转换为字符串在很多应用场景中都非常常见，例如生成报告、日志记录、文件命名等。通过将日期转换为字符串，我们可以方便地在文本中使用日期，而不是直接使用日期类型。
腾讯云相关产品和产品介绍链接地址：由于要求不能提及特定品牌商，无法给出腾讯云相关产品和产品介绍链接地址。但腾讯云提供了多种云计算服务和解决方案，可以根据具体需求在腾讯云官方网站上查找相关产品和文档。
总结：VBA中可以使用Format函数将日期转换为字符串，按照特定的格式进行格式化。这样可以方便地在应用中使用日期字符串。腾讯云提供了多种云计算服务和解决方案，可根据具体需求在腾讯云官方网站上查找相关产品和文档。
相关·内容
如何比较vba中的两个日期字符串，如"01.02.2013 < 02/02/2013"？无论日期是什么，这始终是正确的。在我提到的例子中，有两种日期格式是正确的。
下面的vba代码抛出错误。
Sub aa()
Dim a As Variant, b As Variant, c As Variant
a = Format("1.2.2012", "DD\/MM\/YYYY")
b = Format("2.2.2012", "DD\/MM\/YYYY")
MsgBox (a)
End Sub
浏览 2提问于2013-06-03得票数 1
回答已采纳
1回答
我有一个简单的代码，VBA无法返回正确的日期：
Sub Test_Date ()
Debug.Print Format(Month(Now()), "mmm")
Debug.Print Month(Now())
Debug.Print Now()
End Sub
返回：
Dez
1
29.01.2018 11:17:55
1)这是Excel众所周知的问题，还是我犯了一个错误？
浏览 5提问于2018-01-29得票数 2
回答已采纳
在vba中，我试图将日期时间戳(1899-12-30T00:00:00.000+0000)从oracle服务器转换为dd-mm。我需要一种可以被excel识别的日期格式，并使用单元格格式以一种特定的方式显示它(就像excel使用单元格格式将数据从sql server解析为dd-mm-yyyy类型，但无法识别oracle格式)。
For j = 1 To colCount
mainWorkBook.Sheets("sheet1").Range(colToLetter(j) & 1).Value = node(0).ChildNodes(j - 1)
浏览 15提问于2019-11-22得票数 0
1回答
我希望将日期变量从Access传递到Server存储过程。请看我的密码：
VBA：
searchDate = 03/07/2014
cmd.Parameters.Append _
cmd.CreateParameter("@searchDate", adDBTimeStamp, adParamInput, , searchDate)
searchDate是格式化为MM/DD/YYYY的日期。
SQL：
ALTER PROCEDURE [dbo].[spAppendActivity]
@searchDate as datetime,
AS
SET N
浏览 4提问于2014-06-02得票数 2
回答已采纳
我对javascript的Date.toISOString()函数感到困惑，如下面的例子所示，为什么x的日期值在ISO格式中变成了一月？
const date = new Date();
const x = (new Date(date.getFullYear(), date.getMonth() , 1));
console.log(date); \\Tue Feb 04 2020 11:11:12 GMT+0800 (Malaysia Time)
console.log(x); \\Sat Feb 01 2020 00:00:00 GMT+0800 (Malaysia Time)
co
浏览 18提问于2020-02-04得票数 0
回答已采纳
1回答
我想知道VBA中是否有将字符串转换为日期的函数？我的意思是我使用不同格式的日期，例如20150723,07023015，23-07-15等-对我来说是相同的日期，但VBA编辑器不知道：)
从字符串20150723中获取“真实”日期的最好方法是什么？
浏览 2提问于2015-07-23得票数 1
为什么VBA将"093 0005“解释为日期？
在MS Access VBA中，以下行:Format(“0930005”，"0000000000000")返回"0000000034090“
34090是vba与日期5/1/1993等效的数字。
在大多数情况下，这种日期假设不会发生。例如：
Format(“0920250”，"0000000000000")返回“0920250”，即不尝试应用格式。
Format("0930005"，"0000000000000")如预期返回"0000000930005“。
到
浏览 1提问于2012-08-04得票数 4
我在excel中的vba有问题。我想让函数检查传递日期的第二天是否已经过去了。我知道我现在正在比较两个字符串，我不知道如何将其更改为日期格式。下面是我的代码片段： Dim MyDate As Date
Set Passed = Range("D2")
MyDate = Format(DateTime.Now, "DD-DD.MM.YYYY")
If MyDate < Passed Then
Passed.Interior.ColorIndex = 45
ElseIf MyDate > Passed Then
Passed.Interior.Col
浏览 17提问于2021-02-01得票数 0
回答已采纳
我正尝试使用vba在excel中的日期范围之间进行筛选。它不起作用。
但是，当我执行手动过滤器时，它可以工作。所以我记录了宏并应用了相同的代码。再说一次，这是行不通的。
文件中的日期格式如下：
比方说，我正试图从2021年7月1日至31日过滤掉。
下面是不起作用的代码:日期在A列中。
startDT = ActiveSheet.txtStartDT.Text '01-Jul-2021
endDT = ActiveSheet.txtEndDT.Text '31-Jul-2021
For Each srcWsht In srcWbk.Worksheets
浏览 12提问于2022-06-02得票数 1
回答已采纳
努布问题：
如何将"yyyy“字符串转换为日期？
我的目标是做以下工作
If "yyyy" < VBA.Date then
...
End If
浏览 3提问于2013-07-24得票数 0
回答已采纳
如需更清晰的问题描述，请参阅图片。
当将日期粘贴到excel中时，有时似乎会遵守日期的本地系统设置(设置在Win10 intl.cpl中)：在我的示例中，英国格式，即DD-MM-YY，而其他时候则使用美国格式，即MM-DD-YY。我无法解决它所遵循的规则，因此很难准确地预测它将如何解释大量粘贴的日期集。
作为测试，我把字符串"02/11/2022 07:00“粘贴到excel中。它正确地将英国格式的日期解释为日期(在单元格B2中)为日期:2-11月22日07:00。
在源数据库中，我要从其中复制日期数据集，并将各种字符附加到某些日期，作为标记，遗憾的是，在复制之前不能删除这些标记
浏览 5提问于2022-10-30得票数 1
3回答
我的查询中有以下列date_period2，它以yyyy-mm格式显示日期，但以字符串形式显示。
date_period2
201304
201305
201306
201307
如何将它转换为日期格式，以便我可以使用它来获取特定月份的工作日。因此，例如，201304将作为日期而不是字符串转换为04-2013。
这是我的查询，它是基于date_period2字段计算表达式的，它不能工作，因为它是字符串格式：
SELECT TOP 1000 [date_period2]
,[amount]
,[amount]/(SELECT 20 + COUNT(*) FROM
浏览 5提问于2014-04-29得票数 1
回答已采纳
1回答
我无法对只包含日期值的数组进行排序。
我使用这个排序函数，返回数组上限中的最新日期：
Function vba_sort_array_a_to_z(ByRef myArray)
Dim i As Integer
Dim j As Integer
Dim Temp As String
'sorting array from A to Z
For i = LBound(myArray) To UBound(myArray)
For j = i + 1 To UBound(myArray)
If UCa
浏览 6提问于2022-11-11得票数 1
回答已采纳
来自源的数据具有字符串数据类型(2014年1月)我想要有效的日期并将字符串转换为日期。如何在SSIS2005中执行此操作？
例如:2014年1月。
我想将此日期转换为201401类型。有没有人能解释一下我该怎么做..
浏览 3提问于2014-02-10得票数 0
我正在尝试比较在Javascript中具有两种不同格式的两个日期。
我的数据库中的日期是2013-04-21 (date1)，在我的Chrome调试器中，数组中的日期以以下格式打印出来：Sun Apr 21 2013 15:37:05 GMT-0400 (Eastern Daylight Time) (date2)
我只想比较日期部分，而忽略时间：date1 == date2是真的。
我该如何格式化日期以便能够对它们进行比较？
任何帮助都是非常感谢的。
浏览 0提问于2013-04-29得票数 0
有没有办法将普通的欧洲日期转换为mySQL中的时间戳值？
我有一个mysql数据库，它有一个date (varchar(64))列，其中包含欧洲格式的日期，比如01.12.15。为此，我需要一个update-sql-query将所有行转换为时间戳。
谢谢你的帮忙!
浏览 14提问于2018-01-17得票数 0
我知道这是一个非常基本的问题，但我只是从VB Studio开始，这是直接从书中出来的。
MsgBox("Your birth date was " & DateTimePicker1.Text)
MsgBox("Day of the year: " & DateTimePicker1.Value.DayOfYear.ToString())
我期望ToString将整数值转换为日期的文本值，但它仍然返回数值。如果我看到它实际上是以字符串的形式返回数值，例如"20“。我试着在网上查找一些信息，但我得到了与我正在使用的相同的代码
浏览 0提问于2012-05-21得票数 0
我希望协助在vba中对包含几个列的范围进行排序。其中一列包含1900年之前的日期。排序参数之一应该是该日期的年份。日期为dd/mm/yyyy格式。论坛成员可以帮助我而不创建临时专栏吗？提前谢谢吉姆
浏览 1提问于2019-04-25得票数 0
回答已采纳
我正在尝试从单元格中读取字符串形式的日期，并将其转换为日期格式，然后在我的vba程序中使用。有没有人能帮我弄清楚这些步骤？
提前感谢一吨
浏览 2提问于2013-12-05得票数 0
我使用VBA DateSerial函数分隔字符串中的日期，并将它们填充到另一个工作表中，但当字符串中的年份为'1000‘时，Excel结束了Sub。
下面是一个示例：
string data:
2012-01-012012-03-01
2013-01-012013-03-01
1000-01-011000-01-01
VBA code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Columns(1)) Is Nothing Then
On Error
浏览 4提问于2015-06-13得票数 1
回答已采纳
2回答
昨天晚上，我碰到了一些东西，让我发疯了十到十五分钟，然后我才弄明白。但我不明白为什么会这样，所以我希望这里的人能解释清楚。
从VBA的即时窗口：
?Format(0.5, "HH:MM AM/PM")
12:00 PM
?Format("0.5", "HH:MM AM/PM")
12:05 AM
?Format(CDbl("0.5"), "HH:MM AM/PM")
12:00 PM
从我看到0.5应该对应于下午12:00，因为一个小时是0.04166.((12 * (1/24) = 0.5))。正如您所看到的，如
浏览 5提问于2016-02-18得票数 6
回答已采纳
我用不同的日期填充了许多细胞。示例：
01.01.202001.02.202001.03.202001.04.202001.05.2020etc..(每月一次)
在用vba宏填充这些单元格后，我希望将格式更改为短月份描述("Jan“、"Feb”、"Mar“等)。
因此，我将vba格式更改为"MMM"，但格式不影响单元格。我必须使用"F2“键进入单元格，然后该单元格将其格式更改为"Jan、Feb等”。
如何确保在更改格式后直接更改单元格值？
浏览 0提问于2020-11-11得票数 0
3回答
我需要在VBA宏中将字符串变量转换为日期变量，以便处理日期以获取mMonth和年份，以便为工作表命名
Call GetMonthandYear(MonthYear, FileDate)
ActiveSheet.Name = MonthYear
我希望创建一个名为GetMonthandYear的方法。FileDate是日期格式为dd.MM.yyyy HH-mm-ss的字符串。如果可以将变量更改为日期，则可以将格式更改为MMMM/yyyy，然后使用ToString并将其赋给MonthYear。
有没有办法把字符串改成日期？
浏览 2提问于2012-04-15得票数 1
回答已采纳
1回答
我正在excel中编写一个vba子例程，将两个日期之间的所有日期值存储在一个一维数组中，然后在另一个工作表上检查范围中的每个值。
我的问题是，当代码获取日期值(作为整数(或双倍-无论实际使用的是哪一个)时，它存储的值大于工作表上的日期值1462。
我使用1904年的日期系统，所以我可以使用负的时间值，我在澳大利亚，所以日期是格式化的dd/mm/yyyy。
作为一个例子；
上页: 01/01/2019 = 42004
编号: 01/01/2019 = 43466
我理解这种差异与使用1900和1904日期系统时的日期值之间的差异相同，这使我相信，也许VBA是在默认1900年的工作表值，并
浏览 0提问于2019-01-31得票数 4
回答已采纳
我对Excel很陌生，在用括号在一行上初始化一个日期数组时遇到了困难。
我知道如何使用不同的数据类型来做到这一点：
arrayVariant = Array("hello", "world")
对于字符串数据类型：
arrayString = Split("hello,world",",")
并且可以通过单独初始化每个项目来初始化一系列日期：
arrayDates(0) = #01/01/1900#等
但我找不到任何方法在单行上对日期数组进行无效化。在VBA中有可能吗？
浏览 2提问于2017-09-10得票数 0
回答已采纳
1回答
我对VBA日期格式的查询日期格式有很大的问题。
关于查询，我有以下内容：
... DFirst("date_modification","disciplines_date_modification","[what]='qty_released' and [id]=" & [id_dis]) AS date2...
在VBA上，我需要创建一个过滤器：
Me.Filter = "[Date2]=#" & D22 & "#"
Me.FilterOn = True
当我检查日期(例如
浏览 5提问于2021-05-14得票数 1
回答已采纳
我有两个在B:B范围内的单元格，我希望在Excel中通过VBA应用countif公式。
27/09/2017
13/06/2018
我试过了
MsgBox (WorksheetFunction.CountIf(Range("B:B"), "27/09/2017"))
这将返回0
MsgBox (WorksheetFunction.CountIf(Range("B:B"), CDate("27/09/2017")))
这将返回1
我正在试图找出如何让宏返回两个日期值，通过
MsgBox (WorksheetFunction.Coun
浏览 1提问于2018-06-13得票数 2
回答已采纳
1回答
我正在建立一个打破日期，我需要计算的工作日，也不包括银行假日。我在vba中使用了netwokingday函数，但它似乎没有选择银行假日的命名范围。下面是我的一段代码：
For i = 2 To new_Endrow
begin = Range("F" & i)
finish = Range("G" & i)
If finish <> "" Then
Range("H" & i) = Application.WorksheetFunction.Netw
浏览 4提问于2020-03-02得票数 0
回答已采纳
我不知道如何告诉VBA正确的日期格式，因为它似乎以错误的方式假定。所以CDate("24/02/2016 10:59")给出了正确的日期- dd/mm/yyy。然而，当它遍历像CDate("01/03/2016 00:59")这样的日期时，它假设03不是一个月，而是一天，所以VBA假设它是mm/dd/yyyy，所以它给了我一个日期03/01/2016，这是错误的，并且扰乱了我的数据。那么，我如何告诉VBA，它实际上是dd/mm/yyyy格式。即使是"2016/01/14"，VBA似乎也能很好地自动恢复，但是当不太清楚哪一部分数字是月份时，它就失败
浏览 6提问于2016-04-05得票数 1
回答已采纳
我正在尝试将工作表中的日期插入到SQL中的表中。工作表中日期的原始源来自到SQL的连接，并且日期字段已设置为强制转换(Interview_date as date)，但是一旦填充了工作表，我就需要插入回sql中的另一个表中。当我这样做时，我在表的日期字段(即日期时间)中得到1900-01-01 00:00:00.000。我提取到excel日期格式是yyyy-mm-dd，这与我插入到的Sql表上的格式相同。
我在VBA中尝试了以下插入，有问题的3个字段是sdate_confirmed、sdate_interview和rundate。
我已经将这些字段声明为
Dim sForename As St
浏览 0提问于2019-07-10得票数 0
1回答
我正在尝试将数据从mysql数据库迁移到MS Sql Server2014，但mysqldump生成的转储出现了问题。
这个问题是因为日期的格式，在转储中它们是这样的：
yyyy-MM-dd HH:mm:ss.sss
当我在sql server的datetime列中插入此格式的值时，它会将其理解为：
yyyy-dd-MM HH:mm:ss.sss
有没有办法告诉mysqldump使用不同的日期格式？
浏览 1提问于2015-12-04得票数 1
我想从input中获取日期，格式为dd-mm-yyyy，当这是通过引导日期选择器设置时，并基于此日期计算周末。不知何故，我得到了一些奇怪的结果。
$('#date-start').on('changeDate', function(){
var objThs = $(this);
if(objThs.parent().is('.reportDateWeeks')){
var arrDateEl = objThs.val().split("-"),
浏览 2提问于2014-05-22得票数 0
1回答
我对任何与Oracle有关的事情都很陌生，我已经得到了这个查询；
...BETWEEN TO_DATE('" + shortStartDate + "','MMDDYYYY')
AND TO_DATE('" + shortEndDate + "','MMDDYYYY')"
shortStartDate和shortEndDate是以您所占用的世界上任何部分的格式输入的日期。
然而，看看这个字符串，它似乎表明它期待MMDDYYYY格式，对吗？还是将日期转换为MMDDYYYY？
我怎么才能把
浏览 1提问于2013-10-03得票数 0
回答已采纳
行为：
当我转换一个包含日期的一维数组时，为了将它们打印到完整的工作表中，一些日期从dd/mm/yy更改为mm/dd/yyyy。
特别是，当月的某一天：
小于或等于12，如January 2, 2016 (02/01/16)或May 11, 2016 (11/05/16)，则日期将以日期格式mm/dd/yy打印，并对齐。
大于或等于13，如April 23, 2016 (23/04/16)或December 17, 2016 (17/12/16)，则日期将以日期格式dd/mm/yyyy打印并左对齐。
但是，当我使用for循环单独打印每个日期时，或者不转换数组并在每列的第一行中打
浏览 4提问于2016-03-16得票数 1
回答已采纳
1回答
我使用的SQL server数据库有一个字段存储为整数，但它是一个日期。目前它正在显示20191012。我已经尝试了下面的内容，它似乎是在转换它，但我想在10/12/2019格式中显示它。谢谢。
CONVERT(DATE,CONVERT(VARCHAR(20),EFFDAT)) AS DATE_EFF
浏览 2提问于2019-10-21得票数 1
回答已采纳
2回答
我想知道是否有一种方法可以在countif语句中使用CDate函数？我试图找到不到2周的日期，am，目前使用以下语句：
=COUNTIF(CDATE(Table1[Date Closed]),">=" &TODAY() - 14)
我需要将表的关闭日期转换为实际日期，而不需要更改表(现在它们是13-2018年3月-2018年格式，但作为文本格式)。
在Countif函数中有什么方法可以这样做吗?还是我必须先做一个VBA代码才能首先更改日期？
谢谢!
浏览 0提问于2018-03-30得票数 0
回答已采纳
2回答
在microsoft视图中使用下面的查询可以很好地处理硬编码日期。
从薪资中选择Salary.First、Salary.Last，其中Salary.PayThroughDate = CDate("2014-05-06")和Salary.SSN = allowances.SSN
但是使用变量而不是硬编码的日期将此查询嵌入到Vba中是另一回事。它只是不起作用：
Dim CDate作为变体Dim getDay getMonth Integer Dim getYear As Integer getDay = Day(Me.DTPicker2.Value) getMonth =
浏览 1提问于2014-03-12得票数 1
回答已采纳
1回答
我试图在VBA中编写一个简单的函数，它以一个日期和一个来自Excel的日期数组作为输入。如果给定日期是数组的一部分，则返回true，否则返回false。
我的问题是来自excel的数组是二维的，但是我总是传递一个一维数组。换句话说，一个列和一个行值，这样我就可以检查数组中的值了，但是我传递了一个一维数组。
这是我的代码：
Function IsInArray(ByVal MyDate As Date, ByRef Holiday_Calendar As Range) As Boolean
Dim length As Integer
length = WorksheetFunction.Coun
浏览 4提问于2015-08-04得票数 1
回答已采纳
3回答
我在试着筛选一个日期。已经检查过了，控制面板知道我在英国。但当我过滤它时-它有问题，似乎使用的是美国的日期格式，而不是英国。当你点击过滤器时，它会根据英国的系统给出正确的日期/月份。
当我记录代码以查看发生了什么事情时，出现了以下内容。日期将被定义-当我的过滤器不起作用时，我只是想弄清楚VBA正在做什么。
Sub dating()
ActiveSheet.Range("$A$1:$AM$442").AutoFilter Field:=38, Operator:= _
xlFilterValues, Criteria2:=Array(2, "4/25/2014
浏览 0提问于2014-05-10得票数 2
我有一个列表，其中包括以下格式的日期:2019年11月22日。当我将此列表导出到Excel时，Excel工作表将这些日期识别为常规日期，因此我无法对这些日期进行排序。有没有一种方法可以让Excel不使用VBA就能将这些日期识别为日期？
import xlsxwriter
workbook = xlsxwriter.Workbook('C:/test.xlsx')
worksheet = workbook.add_worksheet("Table 1")
dates_array = ["02/12/1999", "04/12/2009&#
浏览 42提问于2019-11-09得票数 1
回答已采纳
我发现了一个关于YouTube的教程，它设置了一个简单的数据输入表单，允许您创建、检索、编辑和删除表中包含的记录。示例中的数据由员工ID#'s组织，后者填充下拉组合框。但是，我的表将按日期组织。因此，我希望组合框填充这些日期，并根据选定的日期检索相应的数据。
编辑:本教程中的表格被组织成: Col A Employee ID# .中校雇员的名字..。中校性别..。中校职称..。Col E工资和4行条目
我在网上搜索过，也玩过，但似乎找不到日期。最近我得到的是将日期转换为serial#格式(即43617等)。然后一切都正常。但是，我更喜欢使用传统的mm/dd/yyyy格式。
下面是代码：
浏览 2提问于2021-02-12得票数 0
回答已采纳
我有一个CSV文件，日期格式为"3/8/2018 9:05:00 AM“。
当日期被推入列类型为'varchar(30)‘的表中时，它变成了"3/8/2018 9:05“
当日期被推入列类型为'DATE‘的表中时，它变成了"0000-00-00“
我希望我的列是日期格式，这样我就可以根据日期进行排序。我的CSV日期是否需要采用'YYYY-MM-DD‘格式才能生效？
或
有没有办法将我的SQL表中的'Date‘格式更改为'mm/dd/yyy hh:mi:ss’或仅为'mm/dd/yyyy'？
现在，我唯一的选择似乎是
浏览 1提问于2018-05-08得票数 0
问题是，当我从日期选择器中选择"2013-02-01“并将滑块移动到类似于凌晨1点的位置时，我得到的是"2013-02-2”而不是"2013-02-02“。
下面是我的代码：
$("#when").datepicker();
$("#open-till").slider({
range: "min",
value: 1230,
min: 1200,
max: 1860,
step: 30,
slide: slideTime
});
slideTime();
$("
浏览 4提问于2013-02-19得票数 0
回答已采纳
1回答
我使用Word VBA中的Microsoft，3.0版本(Word 2016，VBA 7.1)从SQL Server 2008数据库返回的带有FOR XML查询的XML中提取数据。
我想提取一个特定的日期，所以我创建了一个XPath查询：
xpath = "//XMLPKG/CASE/EVENT[OCCURRED=0][@EVENTNO='23']/DUEDATE"
然后运行SelectNodes：
Set matchingNodes = xmlDoc.SelectNodes(xpath)
If matchingNodes.Length > 0 Then
浏览 4提问于2020-02-26得票数 1
回答已采纳
在我的VBA代码中，我从Userform接收一个日期，并在一个单元格上显示它。但是，我想要像这样在牢房里约会:相当于2019年3月1日星期五的vendredi 1 mars 2019 =>，但它是法文的。
但是，我从UserForm：01/03/2019那里收到了这样的约会
我如何用VBA格式化它以符合我想要的？
浏览 2提问于2019-09-23得票数 0
回答已采纳
我正在尝试做一些基本的事情:从一个accdb文件中获取2个日期startD和endD。将它们向前移动一个月，将新日期作为短日期保存在相应的记录中。 这一切都是由VBA完成的 问题是它显示了正确的SQL字符串(如果我做了msgbox sql)，但是当它保存时，它保存为带有时间的常规日期，并且是错误的值！*注意:我在澳大利亚，所以我有一个格式部分，以确保日期保存正确。 我也尝试过使用DateValue()和格式化日期。 Dim frq As Integer
Dim wks As Integer
Dim CurAcc As Integer
Dim CurAccEnd As Date
Dim Day
浏览 20提问于2019-01-30得票数 0
我正在用VBA处理一个.txt文件。 在其他任务中，我需要读入表示日期的字符串，并在Excel中显示实际日期。 .txt文件中的日期字符串类似于"190223“，表示2019年2月23日 我的挑战是完成这件事。 到目前为止，我所做的是： ' ... loop
With ActiveWorkbook.Worksheets(1)
' Other statements here
' Event date time
.Range("N" & i).Value = StrReverse(Mid(.Range(keyword.Offs
浏览 17提问于2019-02-26得票数 0
回答已采纳
在我工作表中，单元格具有dd-mm-yyyy格式的日期，而我正在将那些接受yyyy-mm-dd格式的日期用于sql查询。为此，我将日期转换为yyyy-mm-dd格式，如下所示：
Dim startDate As Date, endDate As Date
startdate = Format(Sheet1.Range("b1").Value, "yyyy-mm-dd")
endDate = Format(Sheet1.Range("c1").Value, "yyyy-mm-dd")
但是我得到了dd-mm-yyyy格式的start
浏览 2提问于2016-11-03得票数 0
declare @v1 datetime = getdate();
declare @v2 int = 2;
select @v1 + @v2;
---------------------------
2013-01-06 08:16:20.620
但
declare @v1 datetime = getdate();
declare @v2 char(1) = '2';
select @v1 + @v2;
--------------------------
Msg 241，第16级，状态1，第5行
从字符串转换日期和/或时间时，转换失败。
给出错误。但是int @v
浏览 5提问于2013-01-04得票数 1
我正在尝试连续查找今天的日期(我使用VBA日期来获取今天的日期)，但是Application.Match没有找到任何东西。
我使用的代码是：
Debug.Print Application.WorksheetFunction.Match(Date, Range("5:5"), 0)
第5行中的日期是由公式生成的，所以我必须搜索值。
浏览 0提问于2018-07-20得票数 2
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
实时音视频
对象存储
即时通信 IM活动推荐
腾讯云开发者
