Vba Supprimer les 3 derniers...

Résolu
M&m -  
 M&m -
Bonjour,

J'aimerais pouvoir supprimer les 3 derniers caractères de toute une colonne en vba :

J'ai pu trouver un morceau de code intéressant :

Sub test()
Dim c As Range
For Each c In Range("A1", Range("A65536").End(xlUp))
If Len(c) > 2 Then c = Mid(c, Len (c) - 3)
Next c
End Sub

J'ai testé sur une colonne :

Exemple
Exemple
Exemple
Exemple
Exemple
Exemple
Suite

et j'ai obtenu

mple
mple
mple
mple
mple
mple
uite


En plus de me supprimer les 3 premiers (au lieu des 3 derniers) , il ne supprime qu'une seule lettre sur le mot "Suite".


Quelqu'un aurait il une idée?


Je vous remercie d'avance,

M&m

A voir également:

2 réponses

bacus13 Messages postés 30 Date d'inscription   Statut Membre Dernière intervention   8
 
pareil, mais en utilisant la fonction Left (c, Len(c) - 3)
0
M&m
 
Merci Bacus, plus de problème à l'horizon ;)
0