VBA Macro

Résolu
Zeni -  
 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

  1.
    M-12 Messages postés 1349 Statut Membre 285
     
    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
    1
    1. Zeni
       
      Bonjour,

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

      Et si je voulais rajouter B15, E15:G15, B17:B25, D18:E24, E30 ? :-)
      0
  2. M-12 Messages postés 1349 Statut Membre 285
     
    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
    0
    1. Zeni
       
      Merci, j ai essayé de le faire de cette manière hier mais j ai dû mal faire qqch, je vais réessayer :-)
      0
    2. Zeni
       
      Superbe, ça fonctionne. Merciiiii :-)
      0

Discussions similaires

Transformer un chiffre en lettres dans excel sans macro
vincentphilippos -
tontong -

6 réponses
recup couleur de cellule sans macro
magouero -
JvDo -

7 réponses
erreur d'execution 9, l'indice n'appartient pas à la sélection
isidoh -
isidoh -

18 réponses
VBA excel : résoudre problème de capacité.
Juan Pedro -
Kunzi -

9 réponses
"L'indice n'appartient à la sélection" + VBA
fleur.31 -
geosevda -

2 réponses