我已使用宏将电子邮件消息导出为excel。通过使用Mid函数，我在电子邮件中找到了日期，但它并未编入日期。
例如Thursday, January 12, 2012 8:30 AM此日期是文本，而不是格式化日期。如何将其格式化为日期？
答案 0 :(得分：4)
你需要首先拿出“星期四”。然后使用CDate。这应该工作
DateStr = "Thursday, January 12, 2012 8:30 AM"
DateStr = Mid(DateStr, InStr(1, DateStr, ", ") + 1)
DateVal = CDate(DateStr)
答案 1 :(得分：0)
尝试：
Format(DateValue, "dddd, mmmm d, yyyy hh:mm AM/PM")
答案 2 :(得分：0)
如果您需要公式解决方案：
假设以下是在单元格A1中：
Thursday, January 12, 2012 8:30 AM
以下公式将提取日期部分并将其格式化为日期：
=DATEVALUE(MID(A1,FIND(",",A1)+1,LEN(A1)))
这将在单元格中显示40920。将单元格格式化为日期以将其显示为mm / dd / yyyy日期（或者您希望将其格式化）。