autosize des colonnes

[rudymagny]

Rebonjour forum,

je sais que pour les colonnes s'autosize, il faut faire ça:

Columns('B:AF').EntireColumn.AutoFit

mais ou placer ce bout de code?

merci d'avance

 

[porcinet82]

Salut Rudymagny,

Un petit exemple valant mieux qu'un long discours, je te propose de regarde le fichier joint.

A noter toutefois qu'il faut utiliser le code suivant (avec le nom de la feuille) :

Worksheets('designation').Columns('A:I').AutoFit

[file name=Rudymagny.zip size=8011]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Rudymagny.zip[/file]

@+

 

[rudymagny]

bonjour porcinet82!

Merci de ta réponse!

Mais si je veux le faire à l'ouverture de la feuille?

 

[porcinet82]

re,

Je te conseil a ce moment la de mettre carrement le code dans le module ThisWorkbook, ce qui te donnera ceci :

Private Sub Workbook_Open()
    Worksheets('feuil1').Columns('A:F').AutoFit
End Sub

Ainsi, le format de tes colonnes sera adaptées a chaque ouverture de ton fichier.

Sinon tu peux utiliser (a mettre dans le module de la feuille 1):

Private Sub Worksheet_Activate()
    Worksheets('feuil1').Columns('A:F').AutoFit
End Sub

Le format de tes colonnes sera adaptées a chaque fois que la feuille 1 sera activée.

Voili, voilou,

@+

 

[rudymagny]

Merci porcinet82!

C ce que je cherchais!

Merci et bonne journée