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!

2 réponses

  1. cousinhub29 Messages postés 1114 Date d'inscription   Statut Membre Dernière intervention   383
     
    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