Pb Userform et commande

Bonjour,

Question qui doit être toute bête...
j'ai crée un userform avec des boutons de commande.
le code des boutons est ci dessous.
Pourtant le code renvoi une erreur "impossible de définir la propriété visible de la classe worksheets.
pourtant, dans mon fichier, l'utilisation de ce meme code sur un bouton de controle fonctionne parfaitement...
Pouvez vous m'aider???

Code:

Private Sub CommandButton3_Click()
Me.Hide
Worksheets("feuil1").Visible = False
Worksheets("amenagement").Visible = True
Worksheets("amenagement").Activate

End Sub


Merci a tous

Guillaume