在 VBA 中将非标准日期/时间格式解析为日期

【问题标题】：Parse non-standard Date/Time format to Date in VBA在 VBA 中将非标准日期/时间格式解析为日期
【发布时间】：2014-01-13 01:07:00
【问题描述】：

我有很多文本字符串，前面带有时间戳

Oct 19, 2011, 5:00:40 AM GMT

我尝试使用 isDate 来检查字符串的某个子集是否是日期，但唯一似乎可用的部分是

Oct 19, 2011

我也想要时间数据。

提前致谢！

【问题讨论】：

【解决方案1】：

我确信有更简洁的方法可以做到这一点，但这可能会帮助您解决问题：

对于日期值输入（显示在单元格 B2 中）：=DATEVALUE(MID(A2,1,FIND(",",A2,FIND(",",A2)+1)-1))

对于时间值输入（显示在单元格 C2 中）：=TIMEVALUE(MID(A2,FIND(",",A2,FIND(",",A2)+1)+1,12))

结果：

【讨论】：