Bonsoir,
dernière colonne utilisée par une feuille :
ActiveSheet.UsedRange.Columns.Count
donc :
Range(Cells(1, 1), Cells(1, ActiveSheet.UsedRange.Columns.Count)).EntireColumn.AutoFit
Cela règle les colonnes, le principe est le m^me pour les lignes .Rows
@ bientôt
LouReeD