Création Commentaires cellules auto par code
Bonjour,
Je suis en train de faire une feuille de calcul ou j'ai dans l'idée de remplir des commentaires dans certaines cellules par code.
A l'aide de la création auto de code, j'arrive bien à comprendre comment ça marche mais je me heurte à des problèmes de "formatage" de de certaines instructions.
Voilà un bout de code, je n'arrive pas à changer la largeur, la hauteur du cadre et à insérer un nouveau texte.
Code:
1 2 3 4 5 6 7 8 9 10
|
'
' Création du "Comments"
' *******************************************
Sheets("Appli").Range("T66").ClearComments
Sheets("Appli").Range("T66").AddComment
Sheets("Appli").Range("T66").Comment.Visible = False
Sheets("Appli").Range("T66").Comment.Text = "Texte à insérer"
Sheets("Appli").Range("T66").Comment.Height = 170#
Sheets("Appli").Range("T66").Comment.Width = 227# |
C'est un exemple sur une cellule, je ferai varier le choix de cellule plus tard quand j'aurai compris
C'est bon ou bien j'ai tout faux. :(
A+