VBA commentare cella con macro

[Federico Drudi]

Qual è il codice per inserire un commento in una cella tramite macro? La variabile A mi assume un valore che ho bisogno di inserire come commento.
In giro ho trovato qualche discussione dove dichiaravano A as comment ma non sono riuscito a capire bene.
Grazie!

[alfrimpa]

Ciao

Vedi qui http://freeforumzone.leonardo.it/d/1123 ... sione.aspx

[Anthony47]

Hai gia' una soluzione, ma inserisco lo stesso le mie considerazioni...
1) Se registri una macro mentre inserisci un commento, o mente lo cancelli, otterrai facilmente il codice che cerchi; es:

Codice: Seleziona tutto

Range("K9").AddComment
Range("K9").Comment.Text Text:="Anthony:" & Chr(10) & "Testo del commento"


Codice: Seleziona tutto

Range("K9").ClearComments


Chr(10) equivale a "ritorno a capo", e serve per separare la parte "Autore" dalla parte Testo

2) e' opportuno che il codice sia leggermente piu' sofisticato di quanto ti hanno gia' suggerito. In particolare se la cella ha gia' un commento allora non potrai usare ".AddComment", ma dovrai limitarti a modificare il testo.
Quindi userai, ad esempio:

Codice: Seleziona tutto

With Range("K9")
    Set myComm = .Comment
    If myComm Is Nothing Then
        .AddComment.Text "Testo Commento"       'Nuovo commento
    Else
        .Comment.Text "Nuovo Testo modificato"  'Nuovo testo nel commento
    End If
End With


Se il testo e' in una tua variabile allora invece delle stringhe tra virgolette userai il nome variabile; es .Comment.Text NomeVariabile

Ciao

[Federico Drudi]

Ho visto adesso la tua risposta e ti ringrazio.
Hai ragione, se nella cella era già presente un commento mi dava errore; ho risolto facendogli cancellare i commenti prima di iniziare a scrivere quello nuovo.