A voir également:
- [VBA] Modifications commentaires en chaines
- Suivi des modifications word - Guide
- Recherche automatique des chaînes ne fonctionne pas - Guide
- Clément a partagé le fichier mme bovary. il a écrit des commentaires dans le document. quel est le 2e commentaire ? - Guide
- Annulation des modifications apportées à votre ordinateur - Windows 11
- Samira a modifié le menu du jour que juliette lui avait envoyé. retrouvez les modifications proposées par samira : acceptez celles concernant les entrées, refusez celles concernant les plats et les desserts. combien de caractères (en incluant les espaces) contient la version finale du menu ? - Forum Matériel & Système
1 réponse
Bonjour,
en l'absence de réponse, j'ai tenté de faire quelque chose à base de bout de code que je connais.
Cela ne marche pas, pas étonnant au regard de mon niveau...
Voilà ce que j'ai tenté,
Sub list()
On error resume next
derlg = Range("D534")End(xlUp).Row
For i = derlg To 2 Step -1
If Not IsErreor(Range("D" & i).Value) Then
cel.comment.Text Replace(cel.comment.Text, "100002", ("D" & i).value)
End if
next
End Sub
Merci au bon samaritain voulant m'aider
en l'absence de réponse, j'ai tenté de faire quelque chose à base de bout de code que je connais.
Cela ne marche pas, pas étonnant au regard de mon niveau...
Voilà ce que j'ai tenté,
Sub list()
On error resume next
derlg = Range("D534")End(xlUp).Row
For i = derlg To 2 Step -1
If Not IsErreor(Range("D" & i).Value) Then
cel.comment.Text Replace(cel.comment.Text, "100002", ("D" & i).value)
End if
next
End Sub
Merci au bon samaritain voulant m'aider