Bonjour,
J'aurais besoin de l'aide des spécialistes...
Alors tout est dans le titre, mais je m'explique.
J'ai un fichier avec des références: A, B, C, D, E...
Lorsqu'une pièce est valable pour plusieurs références à la suite "ABCDEF", dans ma cellule j'ai "A-F".
J'aimerais pouvoir transformer ça "A-F" en ça "ABCDEF" afin de pouvoir traiter par macro derrière...
Pour info, je n'ai pas de références supérieures à Z.
J'ai essayé avec table de conversion, mais je n'y arrive pas...
Re : Transformer chaîne caractères avec tiret => A-D en ABCD
Bonsour®
un petit coup de baguette magique...
définir préalablement la variable Alphabet :
="ABCDEFGHIJKLMNOPQRSTUVWXYZ"
puis le nom Flint :
=STXT(Alphabet;TROUVE(GAUCHE(A1);Alphabet);TROUVE(DROITE(A1);Alphabet)-TROUVE(GAUCHE(A1);Alphabet)+1)
Re : Transformer chaîne caractères avec tiret => A-D en ABCD
Bonjour,
En VBA :
Code:
Sub Test()
Dim Alpha As String
Dim Chaine As String
Alpha = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
Chaine = "F-P"
MsgBox Mid(Alpha, InStr(Alpha, Left(Chaine, 1)), InStrRev(Alpha, Right(Chaine, 1)) - InStr(Alpha, Left(Chaine, 1)) + 1)
End Sub