свойство AutoSize в Excel 2010 комментарий поле для добавления текста много

Я нахожу какой-то способ сделать поле комментариев Excel автоматического размера, когда я добавляю в него много текста.


Некоторые пытается с Google, и я получил это от Ozgrid но это не работает на моем Excel 2010. Пожалуйста, помогите мне некоторые идеи, чтобы сделать его работу! Спасибо!

Sub robot_comment() 

    ' robot_comment Macro 
    ' Keyboard Shortcut: Ctrl+Shift+R 

    Dim objComment As Comment 

    Set objComment = ActiveCell.AddComment 
    With objComment 
        .Visible = False 
        .Text Text:="robot" 
        .Shape.TextFrame.AutoSize = True 
    End With 
End Sub