Bonsoir le forum,
petite question sur l'insertion d'un commentaire évolutif. Exemple du code:
Sub Toto()
Range("C4").AddComment
Range("C4").Comment.Visible = True
Range("C4").Comment.Text Text:="Test" & Chr(10) & Range("A1") & Chr(10)
Range("C4").Select
ActiveCell.Comment.Visible = False
End Sub
Après validation d'un bouton intégré au userform =>
- insertion d'un commentaire dans la cellule C4 dont le contenu se trouve en
cellule A1
Question:
Si la cellule A1 évolue comment faire évoluer le commentaire ?
Par avance merci Ozons
petite question sur l'insertion d'un commentaire évolutif. Exemple du code:
Sub Toto()
Range("C4").AddComment
Range("C4").Comment.Visible = True
Range("C4").Comment.Text Text:="Test" & Chr(10) & Range("A1") & Chr(10)
Range("C4").Select
ActiveCell.Comment.Visible = False
End Sub
Après validation d'un bouton intégré au userform =>
- insertion d'un commentaire dans la cellule C4 dont le contenu se trouve en
cellule A1
Question:
Si la cellule A1 évolue comment faire évoluer le commentaire ?
Par avance merci Ozons