message d'erreur code vba pour l'ouverture d'une feuille maquer

pascal cfp 49

XLDnaute Nouveau
bonjour à tous

Dans un fichier composé de nombreuses feuilles, j'ai créé un UserForm avec des boutons qui ouvre les feuilles masqué par le code VBA suivant:


Private Sub CommandButton1_Click()
WorkSheets("Journal").Visible = True
ActiveCell.Select
Sheets("Journal").Select
Unload UserForm5
End Sub

Ces codes fonctionnaient parfaitement jusqu'à aujourd'hui, lorsque j'active un bouton pour ouvrir une feuille
j'ai le message d'erreur suivant:

erreur d'exécution '1004':
La méthode Select de la classe Worksheet à échoué.

Je suis désemparer
peut-être avez vous été confronter à ce problème

merci D'avance

Pascal CFP 49
 

Discussions similaires

Statistiques des forums

Discussions
311 720
Messages
2 081 926
Membres
101 841
dernier inscrit
ferid87