Ajouter un espace en début de cellule vb

pgillou Messages postés 53 Statut Membre -  
pgillou Messages postés 53 Statut Membre -
Bonjour à tous,

Une belle journée pour un petit problème en vb.

Je cherche à ajouter un espace en début de cellule sur l'ensemble d'une colonne.

Exemple
la valeur de la cellule A1 esr "test" deviendrait " test"

Merci de votre aide!
A voir également:

2 réponses

cousinhub29 Messages postés 1125 Statut Membre 363
 
Bonjour,

En Vb, je ne sais pas trop, mais comme tu parles de cellules, je suppose que Vba devrait le faire...

Essaie ainsi :

Sub Espace_Devant()
Dim Tblo
Dim I As Long
Tblo = Range("A1", [A65000].End(xlUp)).Value
For I = LBound(Tblo) To UBound(Tblo)
    Tblo(I, 1) = " " & Tblo(I, 1)
Next I
Range("A1", [A65000].End(xlUp)).Value = Tblo
End Sub


PS, utilisation d'un tableau pour un traitement plus rapide...

Bonne journée
0