VBA字符串到日期类型不匹配

时间:2018-02-11 01:22:07

标签: vba date dateadd

如果以前曾经问过这个问题,我会道歉,我一直在寻找,似乎无法找到有帮助的答案。

我目前正在尝试编写一个excel宏,它将根据来自“设置”的信息为我制作我的工作时间表。片材。

我似乎遇到了抓住“开始日期”的问题。从设置表中,添加1天并将其输入到单元格中。 我一直遇到类型不匹配。

设置中的单元格是P1,并且是' 2018-02-09'格式化' MMMM dd,yyyy'所以它说2018年2月9日。

我使用以下代码尝试添加一天:

lightweight streams

我还试过在没有使用DateValue的情况下使用带有startDate的DateAdd,仍然存在类型不匹配,我在startDate值上只尝试了+ 1,仍然是类型不匹配。我已经尝试重新格式化原始值,认为这是格式化了,但仍然没有运气。

只是尝试将某些内容转换为日期并添加1天大声笑

1 个答案:

答案 0 :(得分:1)

这就是我用单元格做的方式,与你的格式匹配:

Dim startDate As String
startDate = ThisWorkbook.ActiveSheet.Cells(1, 1).Value

Dim datePlusOne As Date
datePlusOne = DateAdd("d", 1, CDate(startDate))
MsgBox datePlusOne