Ajout ce caractere par une macro

Bonjour

J'aimerais savoirsi quelqu'un pouvait me donner le code VBA pour faire la chose suivante

J'aimerais rajouter dans des cellule selectionnées le carcteres * devant et derriere le contenu des cellule selectionné

Merci

Bonsoir,

un petit exemple :

Sub ajout()
Dim cel As Range
For Each cel In Range("A1:A10")
    cel = "*" & cel & "*"
Next cel
End Sub

bonsoir,

en choisissant une cellule et double clic.

https://www.excel-pratique.com/~files/doc/Nom_etoile.xls

salut felix.

amicalement

Claude.

Salut le forum

J'aimerais rajouter dans des cellules selectionnées le caractère * devant et derriere les cellules.

Sub Ajout_Avant_Apres()
Dim cellule As Range
For Each cellule In Selection
    cellule = "*" & cellule & "*"
Next cellule
End Sub

Mytå

P.S. Pas lu de plage de cellules spécifiques.... Et pour le [A1].Select de Claude oufs si on

est à la ligne 600 et la colonne CD....Au moins je demeure sur la dernière cellule...