我已经写了一个宏,它读取单元格的内容,并根据单元格值打开相应的文件。
例如,如果我在一个单元格中提供20140522,它将打开文件"C:\Files\20140522.csv“。
但是,如果我将其提供为22/05/2014或更一般的今天的日期,那么我如何在vba脚本本身中将其转换为上述格式?这是因为我的所有文件都采用仅在示例中显示的格式。以下是我的宏代码
Sub Open()
num=Cells(1,1).Value
ActiveWorkbook.Open(FileName:="C:\Files\" & num & ".csv")
End Sub
发布于 2014-06-03 14:42:23
您可以使用以下格式:
num = Format(Cells(1,1).Value, "yyyymmdd")
发布于 2014-06-03 14:44:19
考虑一下:
Sub dural()
Dim d As Date, sDate As String
d = Date
sDate = CStr(Year(d) & Format(Month(d), "00") & Format(Day(d), "00"))
ActiveWorkbook.Open Filename:="C:\Files\" & sDate & ".csv"
End Sub
https://stackoverflow.com/questions/24017992
复制相似问题