Supprimer 0 devant immatriculation

Bonjour à tous,

Novice sur Excel, j'ai besoin de votre aide pour réaliser un comparatif entre deux colonne. Juste là tout va bien, j'ai fais ma fonction RECHERCHEV qui fonctionne.

Je rencontre un problème cependant sur certaines immatriculations. Je m'explique, il y à des 0 devant les immat' de certaines colonnes.

Ex : 06891SE33 ; 00678TM33

De ce fait, je souhaiterai supprimer les 0 pour donner la forme suivante : 6291SE33 et 0678TM33.

J'avais cette macro :

Sub VireMoiLesZeros()

With Range("A1", Range("A65536").End(xlUp))

.Replace what:="0", replacement:="", searchorder:=xlByRows

End With

End Sub

Mais le problème est que lorsque j'ai une immat' du type 00678TM33, il me faut garder un zéro, car qui fait partie de l'immat'. Je voudrais donc avoir 0678TM33.

Merci par avance de l'aide que vous pourriez m'apporter,

Cordialement,

Ugo.

Bonsoir,

essaye ce code :

Sub Viremoile0()
derligne = Range("A" & Rows.Count).End(xlUp).Row 'remplacer la lettre A par la lettre de la colonne où sont tes immats
For i = 1 To derligne ' mettre i = le numéro de la ligne ou commence tes immats
    If Left(Range("A" & i), 1) = "0" Then Range("A" & i) = Right(Range("A" & i), Len(Range("A" & i)) - 1)
Next
End Sub

Cordialement.

bonjour

a premiere vue

=DROITE(B2;8)

B2 = l'immat a traiter

ta formule de recherche devient

RECHERCHEV (.....; droite(la plage ;8);2 ou autre;0) la fonction devient matricielle donc tu devras la valider en faisant

CTRL MAJ Entrée les 3 touches en meme temps ;les { } se mettent automatiquement ,preuve que ...

cordialement

Merci à tous pour vos réponses rapides !

La macro de Bigdaddy154 fonctionne !

Bonne continuation,

Cordialement,

Ugo.

Rechercher des sujets similaires à "supprimer devant immatriculation"