Comment ajouter un caractère automtiquement ?

renzi · 2 Septembre 2004

J'aimerai pouvoir ajouter M plus un espace devant le nom sur une colonne automatiquement, sans avoir à chaque fois à taper a chaque fois dans chaque cellule ( y'en a 10 000 )

le probleme c que je voudrais qu'il le fasse pour que les cellules ou y'a pas de M, c'est possible ?

Merci de votr aide, parce que je peux pas me faire a l'idée de tout faire manuellement !

Lord Nelson · 2 Septembre 2004

Salut Renzi,

Voici une petite macro qui va te faire ça aux petits oignons :

Sub Monsieur()
Dim CL As Range
For Each CL In Selection
If CL <> "" Then
If Left(CL, 2) <> "M " Then
CL = "M " & CL.Text
End If
End If
Next
End Sub

Pour chaque cellule sélectionnée :
Cellule vide --> ne rien faire
Cellule commençant par M --> ne rien faire
Autre contenu --> ajouter M au début

Il te suffit de copier / coller la macro dans un module de code.

A bientôt pour de nouvelles aventures.
Horatio

renzi · 2 Septembre 2004

Merci du fond du coeu vous me sauvez la vie ( et mon apres midi) ;-)

Comment ajouter un caractère automtiquement ?

renzi

Guest

Lord Nelson

Guest

renzi

Guest

Discussions similaires