N
nono
Guest
Salut le forum,
Voilà, j'ai un petit soucis avec mes commentaires : je veux simplement faire une action dans toutes les cellules où il y a un commentaire donc j'utilise ce petit code :
dim Sh as shapes, Co as string
'
For Each Sh In Worksheets('valider').Shapes
If Sh.Name = 'Commentss' & Cel.Row Then
Co = Sh.AlternativeText
End If
Next
'puis je fais mon p'tit bazarre
Ca fonctionne très bien sauf que devant mon texte se trouve à chaque fois 'Zone de texte: 'mon texte''
Ma question vous l'aurez compris est comment enlever ce 'Zone de texte :' !
Est-il par exemple possible d'enlever à une valeur de type string un passage donné ?
merci d'avance !
Voilà, j'ai un petit soucis avec mes commentaires : je veux simplement faire une action dans toutes les cellules où il y a un commentaire donc j'utilise ce petit code :
dim Sh as shapes, Co as string
'
For Each Sh In Worksheets('valider').Shapes
If Sh.Name = 'Commentss' & Cel.Row Then
Co = Sh.AlternativeText
End If
Next
'puis je fais mon p'tit bazarre
Ca fonctionne très bien sauf que devant mon texte se trouve à chaque fois 'Zone de texte: 'mon texte''
Ma question vous l'aurez compris est comment enlever ce 'Zone de texte :' !
Est-il par exemple possible d'enlever à une valeur de type string un passage donné ?
merci d'avance !