Sub AutoFitColumns() Cells.Select Cells.EntireColumn.AutoFit End Sub
Ce code s’adapte rapidement automatiquement à toutes les colonnes de votre feuille de calcul. Ainsi, lorsque vous exécutez ce code, il sélectionne toutes les cellules de votre feuille de calcul et adapte instantanément toutes les colonnes.