"Quadrillage automatique"

[Dolichotis]

Bonjour !

J'ai une petite question sur laquelle je bloque...
J'aimerais quadriller un tableau automatiquement qui se créerait sur le nombre de lignes d'un autre document (variable). Pour les lignes, j'arrive à faire une boucle mais pour les colonnes, ça ne marche pas. J'en ai conclu qu'il n'était pas possible d'incrémenter des chaines de caractères.

Y a-t-il une autre manière de faire ça ? En boucle si possible parce que j'ai environ 40 colonnes à traiter ?
... Ou sans passer par vba ?

Worksheets("Feuil1").Range("L20:L50").Borders(xlEdgeRight).Weight = xlThin
    Worksheets("Feuil1").Range("M20:M50").Borders(xlEdgeRight).Weight = xlThin
    Worksheets("Feuil1").Range("N20:N50").Borders(xlEdgeRight).Weight = xlThin
    Worksheets("Feuil1").Range("O20:O50").Borders(xlEdgeRight).Weight = xlThin
    Worksheets("Feuil1").Range("P20:P50").Borders(xlEdgeRight).Weight = xlThin

Merci pour vos idées !

 

[ChTi160]

Re : "Quadrillage automatique"

Re
Arff je n'ai pas du tout comprendre mais je poste Lol

Le fichier : Regarde la pièce jointe Exemple-xxx.xls

Bonne fin de journée

 

[ChTi160]

Re : "Quadrillage automatique"

Re

Un autre exemple avec une méthode qui permet de mettre en forme sans Boucle
Voir l'aide Méthode Borders

On fait intervenir le nombre de ligne transférées

Le Fichier : Regarde la pièce jointe Exemple-x.xls

Bonne fin de Journée