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

Question

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

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

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

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

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

lightweight streams

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

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

Answer 1

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

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

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