j'aimerai savoir comment changer dans une cellule uniquement la troisième lettre d'un ensemble de chiffres et de lettres comme par exemple dans une cellule 22D001 que je veux via visual basic transformer en 22F001
j'aimerai savoir comment changer dans une cellule uniquement la troisième lettre d'un ensemble de chiffres et de lettres comme par exemple dans une cellule 22D001 que je veux via visual basic transformer en 22F001
merci etoto pour ta réponse mais je tenais à utiliser vba car je copie une feuille dans une autre feuille et du coup écrase ta formule dans cette dernière. Du coup je suis obligé de la planquer dans la feuille copiée
cordialement
SUBSTITUE ne va pas car seule la 3ème lettre doit être remplacée.
Comme patricktoulon mais en choisissant le caractère :
VB:
Sub Remplacer()
Dim x$, y$
x = CStr(Trim(ActiveCell))
If Len(x) < 3 Then Exit Sub
y = Left(Trim(InputBox("3ème caractère :", "Remplacer")), 1)
If y = "" Then Exit Sub
Mid(x, 3, 1) = y
ActiveCell = x
End Sub