excel格式(日期," yyyymmdd")导致编译错误

时间:2017-03-15 21:15:31

标签: excel vba excel-vba

不确定为什么我的"格式"我的文件名末尾没有给我一个日期。我有#34; Visual Basic For Applications"检查参考文献。

Dim dt As String

dt = Format(Date, "yyyymmdd")

MyFileName = Sheets("Order Summary (2)").Range("B2").Value & "_" & dt

我每次都会得到这个

enter image description here

2 个答案:

答案 0 :(得分:0)

如@Sorceri所评论,请使用Now

MyFileName = Sheets("Order Summary (2)").Range("B2") & VBA.Format(Now, "_yyyymmdd")

或者如果失败的话,还有Evaluate替代方案:

MyFileName = ['Order Summary (2)'!B2 & TEXT(NOW(), "_yyyymmdd")]

答案 1 :(得分:0)

我遇到了同样的问题,解决方法是:Comintern 17年3月15日在21:54

“您可能只是在代码中的某个位置或加载项中定义了另一个Format函数”