Commande " bouton effacer" sur une feuille masqué

Bonjour,

J'arrive à créer une commande pour effacer le contenu de cellules séléctionnées

Sub Annulation()

Sheets("Feuil2").Select
Range("B18:F449").ClearContents
End Sub

Sauf que la commande ne marche plus si la feuil2 est masquée dans le classeur.

"La méthode select de la classe Worksheet a échoué."

Avez vous une astuce pour contourner ce problème ?

Merci.

Bonjour

Sans sélectionner la feuille

Sub Annulation()
  Sheets("Feuil2").Range("B18:F449").ClearContents
End Sub

Bonsoir,

Pour répondre au problème posé : "Sauf que la commande ne marche plus si la feuil2 est masquée dans le classeur", il convient de rendre visible la feuille 2 puis d'effacer les données :

Sub Annulation()
Sheets("Feuil2").Visible = True
Sheets("Feuil2").Select
Range("B18:F449").ClearContents
End Sub

Pour rendre la feuille2 à nouveau masquée, il suffit d'ajouter en fin de code

Sheets("Feuil2").Visible = False

Cordialement.

"C'est en forgeant que l'on devient forgeron."

Merci. pour l'astuce.