Inverser chiffres [Résolu]

Signaler
Messages postés
293
Date d'inscription
mercredi 4 mars 2015
Statut
Membre
Dernière intervention
13 mai 2021
-
Messages postés
293
Date d'inscription
mercredi 4 mars 2015
Statut
Membre
Dernière intervention
13 mai 2021
-
Bonjour,
Selon la pièce jointe, avec la macro, j'inverse les chiffres de la cellule A. serait-il possible de faire la même chose sur plusieurs cellules par exemple A2-A3 ou B1-B2-B3 etc...
Merci beaucoup

https://www.cjoint.com/c/KEbmgMtro5l

1 réponse

Messages postés
9968
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
14 mai 2021
1 141
Bonjour,
Une possibilité, vous sélectionnez la plage désirée (expl : A1:A10) et clic sur votre bouton.
Avant de le faire vous modifiez votre code comme suit :
Sub es()
For Each cell In Selection
Range(cell.Address) = StrReverse(cell)
Next cell
End Sub

Messages postés
293
Date d'inscription
mercredi 4 mars 2015
Statut
Membre
Dernière intervention
13 mai 2021

Super merci Le Pingou c'est exactement ce que je voulais
Cordialement