vba - 以名称中的数据日期保存新的电子表格

Question

我想保存一个从 Internet 下载的文件，其中包含文件名中数据所在月份的名称。我遇到的问题是我不能只得到一个月。我在 VBA 中以 mm/dd/yyy 格式获取整个日期。日期在工作表中采用 mm/dd/yyy h:mm 格式。我想把它转换为那个月，所以我把月份放在文件名中并保存了它。VBA 将其视为 mm/dd/yyy，因此无法将其添加到文件名中。

谢谢您的帮助！

Answer 1

GivenRange("A1")保存您想要获取月份的日期，请写下：

Dim myDate as String
myDate = Format(Range("A1"),"mmmm"))

Answer 2

以今天为例，

Dim myDate as String
' if you want to get November 
myDate = monthname(month(date))  
'or 
myDate = Format(date,"mmmm")

'if you want to get 11
myDate = month(date) 

'if you want to get Nov
myDate = Format(date, "mmm")
' or LEFT the November to 3 characters