Board logo

標題: [發問] 註解問題 [打印本頁]

作者: caichen3    時間: 2012-4-11 14:40     標題: 註解問題

本帖最後由 caichen3 於 2012-4-11 14:43 編輯

請問各位大大,在B2插入註解
Sub show()
    Range("B2").Comment.Visible = True
    Range("B2").Comment.Comment.Text Text:="註解內容"
End Sub
但執行出現:物件不支援此屬性或方法
想了很久還是不懂,是為什麼呢?
作者: Hsieh    時間: 2012-4-11 14:46

回復 1# caichen3


    Sub show()
    With Range("B2")
    If .Comment Is Nothing Then .AddComment "註解內容"
    .Comment.Visible = True
    End With
End Sub
作者: GBKEE    時間: 2012-4-11 14:54

回復 1# caichen3
  1. Sub Ex()
  2.     Range("B2").NoteText "註解內容"
  3. End Sub
複製代碼

作者: caichen3    時間: 2012-4-11 15:47

感謝大大們的幫助




歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)