Excel VBA - 将日期字符串转换为日期

Question

我在单元格中有许多字符串是日期，但它们需要转换为日期格式。

它们采用以下格式:

mmm dd, yyyy

例如:

Feb 10, 2016

所以它们的长度可以是 11 或 12:

Feb 1, 2016

我已经开始编写一个函数来单独解析字符串的每个部分(日为整数，月为整数，年为整数)，然后转换为日期格式。

首先，有没有比上面更简单/更流畅的方法来做到这一点？

如果没有更简单的方法，最好将 3 个字母的月份(例如 Feb 或 Mar 或 Apr)转换为月份编号(例如 2 或 3 或 4)？因为这是我真正坚持的唯一一点。

Answer 1

在 VBA 中，您可以使用:cdate("Feb 10, 2016") .
作为一个函数，这将是:

Public Function ConvertToDate(rng As Range) As Date

    ConvertToDate = CDate(rng)

End Function