VBA中如何把excle中提取的字符串20090405变成日期型2009/4/5

如题所述

举报该文章

第1个回答 2012-05-20

Dim a As String, b As Date
a = "20090405"
b = DateSerial(Left(a, 4), Mid(a, 5, 2), Right(a, 2))

第2个回答 2012-05-21

=LEFT(A1,4)&"/"&(MID(A1,5,2)+0)&"/"&(RIGHT(A1,2)+0)

第3个回答 2012-05-20

在格式里直接改应该就可以

VBA中如何把excle中提取的字符串20090405变成日期型2009\/4\/5
Dim a As String, b As Date a = "20090405"b = DateSerial(Left(a, 4), Mid(a, 5, 2), Right(a, 2))

相似回答

大家正在搜