Inverser chiffres

Résolu
mic6259 Messages postés 343 Date d'inscription   Statut Membre Dernière intervention   -  
mic6259 Messages postés 343 Date d'inscription   Statut Membre Dernière intervention   -
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

  1.
    Le Pingou Messages postés 12276 Date d'inscription   Statut Contributeur Dernière intervention   1 478
     
    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
    1. mic6259 Messages postés 343 Date d'inscription   Statut Membre Dernière intervention   1
       
      Super merci Le Pingou c'est exactement ce que je voulais
      Cordialement
      0

Discussions similaires

clavier passé en qwerty
hulkhogan -
Dy -

40 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
Combinaisons possibles avec 3 séries de 3 nombres
Jao -
acefalo -

1 réponse
Liste de codes à 6 chiffres allant de 0 à 9.
Alex -
Medorinkashishikato -

7 réponses