Bonjour a tous,

Je rencontre le probleme suivant: je dois envoyer des tableurs via des chats, et si je ne rajoute pas des espaces apres les cellules de la colonne A qui ont un nombre de caracteres inférieur a 13, (dans le chat) toutes les colonnes se décalent, et il faut ensuite les remettre en ordre (chronophage, pénible, repetitive).

En résumé, je cherche a avoir la formule suivante (=IF(LEN(Zw)<13;Zw & " ";Zw) dans les cellules de la colonne A, w étant la ligne mentionner.

Ca fait approximativement ce code, mais je ne sais pas comment faire varier le w dans la formule

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
    For w = 2 To 250
            Cells(w, 1).Value= "IF(LEN(Zw)<13;Zw & "       ";Zw)
    Next w
Je ne sais pas si je suis clair, n'hésitez pas a me poser des questions.

Merci d'avance