Bonjour à tous,
Bonjour le Forum,
dans une macro liée à un CommandButton, je souhaite faire ajouter un commentaire dans une zone fusionnée.
Je n'y arrive pas avec le code ci dessous,
Pourriez vous m'aider, svp
en déboguage, les valeurs du range LgTrav, ColDebut, ColFin sont bien récupérée..
Bonjour le Forum,
dans une macro liée à un CommandButton, je souhaite faire ajouter un commentaire dans une zone fusionnée.
Je n'y arrive pas avec le code ci dessous,
Pourriez vous m'aider, svp
Code:
With .Range(Cells(LgTrav, ColDebut), Cells(LgTrav, ColFin))
.Interior.ColorIndex = 1
.Interior.Pattern = xlSolid
.Font.ColorIndex = 2
.FormulaR1C1 = TextBox2.Value & " Status: CANCELLED / ABORTED"
LgTx3 = TextBox2.TextLength
'.Range(Cells(LgTrav, ColDebut), (Cells(LgTrav, ColFin))).AddComment
'.Range(Cells(LgTrav, ColDebut), Cells(LgTrav, ColFin)).Comment.Visible = False
'.Range(Cells(LgTrav, ColDebut), Cells(LgTrav, ColFin)).Comment.Text Text:="bla...bla" & Chr(10) & ""
End With