Chaine de caracteres

[jexcel]

Bonjour,

Je cherche une macro toute simple capable de supprimer les deux premiers caracteres de chaque cellules d'une même colonne.

ex: jmmichel et je veux obtenir michel
dffrancois francois
ifflorence florence
reemmanuel emmanuel

merci d'avance,

jean

 

[pierrejean]

Re : Chaine de caracteres

bonjour tuexcel

en voila une

Sub efface()
Dim cel As Range
Dim x As String
For Each cel In Selection
x = Left(cel.Value, 2)
cel.Value = Replace(cel.Value, x, "")
Next cel
End Sub

 

[SergiO]

Re : Chaine de caracteres

Bonjour jexcel,

Un essai

Sub Supprime()
Ligne = Range("A65536").End(xlUp).Row
For Each Cell In Range("A2:A" & Ligne)
Cell.Value = Mid(Cell, 3, Len(Cell))
Next Cell
End Sub

@+

Edition : Bonjour Pierrejean

 

[joss56]

Re : Chaine de caracteres

bonjour,

essaye ça...

 

[joss56]

Re : Chaine de caracteres

bonjour Pierre Jean et Sergio,

je n'avais pas vu vos réponses, pardon