VBA excel 提取字符串中的日期

Sub 提取日期()

Dim temp

Dim str As String

Dim d As Date

str = "l4-122344/201238"

temp = Split(str, "/")(1)

d = DateSerial(Split(temp, "")(0), Split(temp, "")(1), Split(temp, "")(2))

End Sub

C1=TODAY()

下面两个是数组公式

B2=MIN(IF(A2:A17>B2,A2:A17))

C2=MIN(IF(A2:A17>C2,A2:A17))或者=MIN(IF(A2:A17>TODAY(),A2:A17))

数组公式，公式输完后，光标放在公式编辑栏同时按下CTRL+SHIFT+回车键，使数组公式生效

以上就是关于VBA excel 提取字符串中的日期全部的内容，包括:VBA excel 提取字符串中的日期、excel 函数获取列中今后最近日期、等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！