Ajouter signe moins devant un chiffre par VBA
moseca80
-
kant1 -
kant1 -
Bonjour,
J'ai une chaine de caractère composé de chiffre et de lettre. Exemple : 1ABC12XYF3ECD.
J'aimerais ajouter un signe moins devant les chiffres de cette chaine de caractère??
Merci de m'aider.
J'ai une chaine de caractère composé de chiffre et de lettre. Exemple : 1ABC12XYF3ECD.
J'aimerais ajouter un signe moins devant les chiffres de cette chaine de caractère??
Merci de m'aider.
1 réponse
-
si j'ai bien compris tu veux rajouter un signe "-" devant chaque chiffre de ta chaine de caractere. si c'est bien cela voici le code :
a = "1ABC12XYF3ECD"
For i = 1 To Len(a)
If Mid(a, i, 1) = "0" Or Mid(a, i, 1) = "1" Or Mid(a, i, 1) = "2" Or Mid(a, i, 1) = "3" Or Mid(a, i, 1) = "4" Or Mid(a, i, 1) = "5" Or Mid(a, i, 1) = "6" Or Mid(a, i, 1) = "7" Or Mid(a, i, 1) = "8" Or Mid(a, i, 1) = "9" Then
b = b & "-"
End If
b = b & Mid(a, i, 1)
Next i
MsgBox (b)
