使用 + 连接时类型不匹配 [重复]

Question

问题

我只想在 A2 单元格中说Exam Mailers for (current month) (current year)。示例：Exam Mailers for April 2020

如果我这样做：

Range("a2").Value = "Exam Mailers for " + (months(i))

它有效，我得到了

Exam Mailers for April

但如果我这样做：

Range("a2").Value = "Exam Mailers for " + (months(i)) + " " + Year(Now)

失败了

Run-time error `13`: Type mismatch

这是目前为止的完整代码：

Sub datechange_1()
Dim months(11) As String
months(0) = "Janurary"
months(1) = "Feburary"
months(2) = "March"
months(3) = "April"
months(4) = "May"
months(5) = "June"
months(6) = "July"
months(7) = "August"
months(8) = "September"
months(9) = "October"
months(10) = "November"
months(11) = "December"

Dim nowMonth As Integer
nowMonth = Month(Now)

For i = 0 To 11
  If nowMonth = (i + 1) Then
     Range("a2").Value = "Exam Mailers for " + (months(i)) + " " + Year(Now)
  End If
Next
End Sub

感谢任何想法或建议。谢谢！

Answer 1

可能只是 Str(Year(Now))。看起来应该可以。