Bonjour Joco7915, le forum,
Dans un module standard:
Sub LargeurColonneAuto()
With Sheets("TaFeuille")
.Columns("A:Z").AutoFit
End With
End Sub
Macro à affecter à un bouton où un raccourci clavier
CTRL + e pour exécuter la macro
Sinon, dans le module de la feuille:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim plage As Range
Set plage = Range("A1:Z200")
If Not Application.Intersect(Target, plage) Is Nothing Then Columns("A:Z").AutoFit
cancel = True
End Sub
La macro s'exécute automatiquement dès que tu modifies une cellule dans la plage A1:Z200...
Cordialement,
EDIT: Salut oxydum