将星期几，月份，年年转换为d / m / y

Question

我在excel中有以下内容：

Saturday, June 11 2011

我想将其转换为标准的dd / mm / yy格式。

什么是最简单的方法（在excel或VBA中）？

Answer 1

为了使用Excel的CDate函数 ，您首先必须摆脱标记日期的前导文本。 假设这始终带有逗号和空格，那么您可以执行以下操作：

Sub changedtformat()
Dim rawdate As String, cleandate As Date, resultdate As Date

rawdate = "Saturday, June 11 2011"
cleandate = Mid(rawdate, InStr(1, rawdate, ",") + 2, Len(rawdate))
resultdate = CDate(cleandate)
MsgBox resultdate 

End Sub

Answer 2

将文本输入A1 ，然后在B1中输入：

=DATEVALUE(SUBSTITUTE(MID(A1,FIND(" ",A1)+1,9999)," ",", ",2))

并按照自己喜欢的格式进行格式化。 我们只创建一个DATEVALUE()可以处理的字符串。