Excel vba 宏字符串和日期

Question

我想在單元格中指定一個單詞和一個日期。

Sub CurrentTestCell()
    With Range("i2")
    .Value = ("Test") And Date
    .NumberFormat = "mmmm yyyy"
  End With
End Sub

沒有("Test)" And的代碼可以工作並顯示當前日期。 該字段應顯示 i2“ Test Dezember 2021 ”

錯誤：

運行時錯誤“13”：類型不匹配

Answer 1

日期格式不適用於文本數據。 您需要格式 function 日期。 嘗試-

Sub CurrentTestCell()
    With Range("I2")
    .Value = "Test " & Format(Date, "mmmm yyyy")
  End With
End Sub