Bonjour le forum,
J'ai cette macro qui tourne depuis plusieurs mois,
Sub SupprimeAnnee()
Dim i As Integer
Sheets("SWI08").Select
If MsgBox("Nous sommmes, le " & Format(Date, "dddd dd mmmm yyyy") & vbNewLine & "Vous voulez supprimer l'année 2009 ?", vbYesNo) = vbYes...