VBA Macro [Résolu]

Signaler
-
 Zeni -
Bonjour,

J'ai fait une petite macro :

Sub Clear()

Range("B10").Select
Selection.ClearContents
Range("D10:S10").Select
Selection.ClearContents
Range("U10:AA10").Select
Selection.ClearContents
Range("AC10").Select
Selection.ClearContents

End Sub

Serait-il possible qu'elle s'active en feuil6 lorsqu'on ferme le fichier excel ?

Merci beaucoup pour vos réponses. :-)

Configuration: Windows / Edge 91.0.864.67

2 réponses

Messages postés
1081
Date d'inscription
lundi 22 septembre 2008
Statut
Membre
Dernière intervention
20 juillet 2021
230
Bonjour,
macro à placer dans le ThisWorbook du classeur
Private Sub Workbook_BeforeClose(Cancel As Boolean)
  Sheets("Feuil6").Range("B10,D10:S10,U10:AA10,AC10").ClearContents
End Sub
Bonjour,

Navrée pour le retard de ma réponse :-). Merci beaucoup ça fonctionne. :-D
Bonjour M-12

Et si je voulais rajouter B15, E15:G15, B17:B25, D18:E24, E30 ? :-)
Messages postés
1081
Date d'inscription
lundi 22 septembre 2008
Statut
Membre
Dernière intervention
20 juillet 2021
230
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets("Feuil6").Range("B10,D10:S10,U10:AA10,AC10,B15, E15:G15, B17:B25, D18:E24, E30").ClearContents
End Sub
Merci, j ai essayé de le faire de cette manière hier mais j ai dû mal faire qqch, je vais réessayer :-)
Superbe, ça fonctionne. Merciiiii :-)