Insérer un espace

[Lamoriciere]

Bonjour,
Comment peut-on faire pour insérer un espace au début d'un mot se trouvant dans une cellule.
J'ai adapté cette macro:
Sub esp()
Range('Q3') = ' ' & Left(Range('Q3'), 10)
End Sub
Mais je n'arrive pas à l'adapter pour le contenu d'une colonne, par exemple de Q3 à Q30.
Je fais appel à vous.

Merci bien

 

[dg62]

Bonjour lamoriciere

une simple boucle for... next

Sub esp() 
dim i as integer
for i = 3 to 30
Range('Q' & i) = ' ' & Left(Range('Q' & i), 10) 
next i
End Sub

 

[Robert]

Bonjour Lamoricière, bonjour Didier,

Lamoricière, il est urgent que tu lises la Charte du forum. Cela te permettra de comprendre pourquoi je ressemble à un sapin... En bref, j'ai les Lien supprimé !!!

 

[PascalXLD]

Bonjour

Robert je te trouve de mauvaise foi

Il ne s'agit pas du tout de la même question

C'est de 3 à 30 et non de 3 à 75

de plus la macro s'appelle 'esp' et non 'menage'

🙂 🙂 🙂 🙂 🙂

Bonne journée Robert et le forum

 

[Robert]

Oui Pascal,

En plus d'avoir les boules de sapin je suis de mauvais foie gras... Que veux-tu c'est Noël !!!

 

[dg62]

Bonjour pascal, Robert


je crois qu'il nous teste !


hier réponse au bout de 10 minutes mais c'est vrai la boucle était plus longue.
Aujourd'hui en 6 minutes

on verra bien demain.