macro pour ajouter un texte

[minichine]

bonjour à tous,

voila je cherche a ajouter un texte commun au début de plusieurs cellules sous excel sous forme de macro car j'ai plus de 500 cellules a modifier

ex en b2 j'ai "rick blonde"
en b3 j'ai "rick chatain"
en b4 etc,ect

je voudrais avoir

en b2 "Perruque rick blonde"
en b3 "Perruque rick chatain"

merci d'avance

 

[SergiO]

Re : macro pour ajouter un texte

Bonjour minichine,

Une possibilité:

Sub Texte()
Derlig = Range("B65536").End(xlUp).Row
For L = 2 To Derlig
Cells(L, 2) = "Perruque " & Cells(L, 2)
Next L
End Sub

Tu peux aussi le faire par formule :

En C2 : ="Perruque "&B2
puis recopie vers le bas
enfin un Copier - Collage spécial - Valeurs

@+

 

[minichine]

Re : macro pour ajouter un texte

merci Sergio
j'ai utilisé la 1er méthode par le code car j'aurais besoin de celui-ci dans d'autres application

et encore merci pour la rapidité de réponse de ce super forum

bonne journée a tous

minichine