Excel VBA – 以代码forms执行string

我试图执行以下string作为代码使用评估，但得到错误2029年。任何人都知道为什么？

非常感谢。

Calculation = "Format(""21/08/2012"", ""MMM"")" Value = Evaluate(Calculation) 

Answer 1

改为尝试

 Calculation = "TEXT(""21/08/2012"", ""MMM"")" 

EVALUATE将公式转换为结果，FORMAT是VBA函数。 公式相当于TEXT。

您也可以跳过评估，直接使用date的FORMATfunction。

Answer 2

您可以直接在Application.WorksheetFunction.中使用VBA中的大多数工作表函数Application.WorksheetFunction. – 例如 – 试试这个：

 Sub DateExample() Dim StringTest As String StringTest = Application.WorksheetFunction.Text("12/08/2012", "MMM") Cells(1, 1).Value = StringTest End Sub 

祝你好运