generer inversion de caractère puis équivalence

[nicroq]

bonjour a tous,
un probleme assez compliqué à faire en vba s'est ouvert à moi et je compte donc sur votre aide !!!!

voici mon problème :
il faut savoir que :
B=W
C=P
D=A
E=R

Si : A1= BBCCDBEEECCBD

je souhaiterai faire en A2 l'inverse : DBCCEEEBDCCBB puis mettre les caractères équivalents c'est a dire : A2 = AWPPRRRWAPPWW.

j'espère avoir était clair.
En vous remerciant
cordialement

 

[titiborregan5]

Re : generer inversion de caractère puis équivalence

Bonjour nicroq, le forum

voir fichier joint.

A+

Edit: nouveau fichier

 

[pierrejean]

Re : generer inversion de caractère puis équivalence

Bonjour nicroq

Avec une fonction personnalisée

Edit: Salut titiborregan

 

[nicroq]

Re : generer inversion de caractère puis équivalence

grand merci a vous titi et pierrejean
cependant j'ai fait une petite erreur dans l'explication de mon probleme concernant le code :
B=W
W=B
D=A
A=D
donc Si : A1= ABBWWADDA

je souhaiterai faire en A2 l'inverse : ADDAWWBBA puis mettre les caractères équivalents c'est a dire : A2 = DAADBBWWD.

desolé pour cette erreur
cdlt

 

[CBernardT]

Re : generer inversion de caractère puis équivalence

Bonjour,

Par une fonction VBA Result()

 

[pierrejean]

Re : generer inversion de caractère puis équivalence

Re

Vois ceci

Edit : Salut bernard

 

[CBernardT]

Re : generer inversion de caractère puis équivalence

Bien le bonjour pierrejean

 

[nicroq]

Re : generer inversion de caractère puis équivalence

merci a vous tout marche nikel!!!
vous etes trop rapide , c est top!!

bonne journée