macro pour mise en page d'un tableau

Bonjour tous le monde


Je cherche a a encadrer chaque cellule grace a une macro

Mon tableau est fixe sur le nombre de colonne (de A a H) mais le nombre de ligne varie

C'est possible un petit boue de code pour encadrer selement les ligne utiliser??

Merci de votre aide

Code:

---

1 2 3

With Sheets("Feuil1") 'à adapter .Range("A1:H" & .Cells(Rows.Count, 1).End(xlUp).Row).Borders.LineStyle = xlContinuous End With

---

merci c'est absolument sa :ccool:



PS :

Pour éviter de modifier le nom a chaque foi on pe utilisé ceci :

Code:

---

1 2 3 4 5

nom_feuille = ActiveSheet.Name With Sheets(nom_feuille) .Range("A1:H" & .Cells(Rows.Count, 1).End(xlUp).Row).Borders.LineStyle = xlContinuous End With

---

bonne continuation