Largeur automatique des colonnes

Bonjour

Je suis à la recherche d'un code vba pour ajuster automatiquement la largeur de certaines colonnes

sur plusieurs onglets exemple onglet poule 1 ,poule 2 ainsi de suite total 8 onglets

Les colonnes à ajuster sont B et de G:Y

Merci pour votre aide

Crdlt

Bonjour,

un truc dans le genre :

    For I = 1 To Worksheets.Count
        Sheets(I).Range("B:B,G:Y").EntireColumn.AutoFit
    Next I

@ bientôt

LouReeD

Bonjour ,

Sub Ajuster()
Dim mapoule&
   For mapoule = 1 To 8: Sheets("POULE " & mapoule).Range("b1,g1:y1").EntireColumn.AutoFit: Next
End Sub

edit : + 3 minutes => hors délai

Re bonjour

Merci pour votre aide

Bon WE