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

  1.
    Le Pingou Messages postés 12273 Date d'inscription   Statut Contributeur Dernière intervention   1 476
     
    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 371 Statut Membre 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
le A devient Q, le Z devient W
vrp74 -
Lacrim -

14 réponses
Combinaisons possibles avec 3 séries de 3 nombres
Jao -
acefalo -

1 réponse