Evaluate を使用して次の文字列をコードとして実行しようとしていますが、エラー 2029 が発生します。
大変助かりました。
Calculation = "Format(""21/08/2012"", ""MMM"")"
Value = Evaluate(Calculation)
代わりに試す
Calculation = "TEXT(""21/08/2012"", ""MMM"")"
EVALUATE は数式を結果に変換し、FORMAT は VBA 関数です。同等の数式は TEXT です。
評価をスキップして、日付に対して FORMAT 関数を直接使用することもできます。
VBA でほとんどのワークシート関数を直接使用できますApplication.WorksheetFunction.
。たとえば、これを試してください。
Sub DateExample()
Dim StringTest As String
StringTest = Application.WorksheetFunction.Text("12/08/2012", "MMM")
Cells(1, 1).Value = StringTest
End Sub
幸運を