OVH Cloud OVH Cloud

écriture inversée

3 réponses
Avatar
bolobo
bonjour =E0 tous
voil=E0 une question b=EAte.. mais bon, il en faut sinon on
s'ennuierait..!!
Existe t'il une formule ou une macro ou.. autre pour inverser les
lettres dans une cellule: si j'=E9cris "papa": cela devient "apap"... Si
j=E9cris "maison" cela devient "nosiam"... "anna" devient "anna".. c'est
pour un jeu..
alors si ce sujet a d=E9j=E0 =E9t=E9 trait=E9 je m'en excuse mais je n'ai
rien trouv=E9..
merci d'avance =E0 tous les =E9rudits et =E0 tous les autres aussi...

3 réponses

Avatar
JB
Bnjour,

Dans un module:

Function inverse(mot)
For i = Len(mot) To 1 Step -1
temp = temp & Mid(mot, i, 1)
Next i
inverse = temp
End Function

Dans la feuille de calcul : =Inverse(A1)

Cordialement JB


bonjour à tous
voilà une question bête.. mais bon, il en faut sinon on
s'ennuierait..!!
Existe t'il une formule ou une macro ou.. autre pour inverser les
lettres dans une cellule: si j'écris "papa": cela devient "apap"... Si
jécris "maison" cela devient "nosiam"... "anna" devient "anna".. c'est
pour un jeu..
alors si ce sujet a déjà été traité je m'en excuse mais je n'ai
rien trouvé..
merci d'avance à tous les érudits et à tous les autres aussi...


Avatar
AV
Il existe une fonction vba toute prête qui fait ça : StrReverse

Donc avec une fonction perso :

Function INVERS(chain$)
INVERS = StrReverse(chain)
End Function

Dans la feuille de calcul :
=INVERS(A1)

AV
Avatar
bolobo
que vous dire sinon un grand merci ..!!