2014-03-26 66 views
0

我目前正試圖編寫一個宏,當用戶在電子表格中選擇一個單元格並單擊該按鈕時,將在該選定單元格上添加註釋。我會怎麼做呢?我試過range(A1).addcomment等,但它似乎沒有工作,我不知道爲什麼,總是彈出一條錯誤消息,並突出顯示整條線,但消息根本沒有幫助。請幫助Excel在單元格中添加註釋

我在這裏嘗試這種代碼,但它似乎沒有工作,給了我一個錯誤信息

sub adding() 
range(A1).addcomment 
end sub 

回答

1

嘗試:

Sub SetComment() 
     With ActiveCell 
     .AddComment 
     .Comment.Text Text:="This is a comment" 
     End With 
    End Sub 
+0

謝謝斯泰恩迪斯 – HumanlyRespectable

+1

你也應該加上'.Comment.Delete'刪除以前的評論,因爲如果活動單元格已經有一個評論,你會得到運行時錯誤1004 –

0

答案如下。您必須添加評論,然後才能編輯評論文本。

Range("H13").Select 
Range("H13").AddComment 
Range("H13").Comment.Visible = False 
Range("H13").Comment.Text Text:="Name:" & Chr(10) & "Test Comment" & Chr(10) & ""