关于AddComment到另一个工作表的错误语法

Question

我的语法出了什么问题？

If Range("K15") = "01/11/2015" Then
    Range("B15").AddComment ("Workbooks("James").Worksheets("Sheet1").Range("D2").Value")
End If

Answer 1

假设您打算显示工作簿“James”中的值，您可以尝试以下操作：

Sub test()

Dim msg As String
msg = Workbooks("James").Worksheets("Sheet1").Range("D2").Value

If Range("K15") = "01/11/2015" Then
    Range("B15").AddComment (msg)

End If
End Sub  

或者只是删除整个Addcommand参数的双引号。