Sujet Précédent Sujet Suivant

Inverser chiffres

Résolu
mic6259 Messages postés 371 Statut Membre -  
mic6259 Messages postés 371 Statut Membre -
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

Réponse 1 / 1
Le Pingou Messages postés 12713 Date d'inscription   Statut Contributeur Dernière intervention   1 467
 
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
0
mic6259 Messages postés 371 Statut Membre 1
 
Super merci Le Pingou c'est exactement ce que je voulais
Cordialement
0

Discussions similaires

Toutes les combinaisons à 4 chiffres de 0000 a 9999
Sarah -
baladur13 -

11 réponses
Touche a et q inversé
kingking62 -
LiliBert -

8 réponses
Combien de combinaison possible avec 3 chiffres
LA MENACE -
Marion_P92 -

14 réponses
clavier passé en qwerty
hulkhogan -
Dy -

40 réponses
le A devient Q, le Z devient W
vrp74 -
Lacrim -

14 réponses