Pd CommandButton

[Pierrot]

Le CommandButton se trouve sur la feuil4, lorsque je clique sur le bouton j'ai une erreur pour la sélection de la cellule F15, est ce que quelqu'un pourrais me dire ce qui ne va pas.
Merci

Public Sub CmdSuivant_Click()
Application.ScreenUpdating = False
Sheets("Feuil4").Select
Range("A2").Select
Selection.ClearContents
Selection.AutoFilter Field:=10, Criteria1:=10
Columns("J:J").Select
Selection.EntireColumn.Hidden = False

Sheets("Feuil1").Activate
Range("F15").Select -----------> Erreur
UserForm1.Show
Application.ScreenUpdating = True
End Sub

 

[Fred]

Slt, pas de probleme ca devrait marcher essaye, et verifie que tes feuilles ou ton classeur ne sont pas protégés :

Public Sub CmdSuivant_Click()
Application.ScreenUpdating = False
Sheets("Feuil4").Select
Range("A2").Select
Selection.ClearContents
Selection.AutoFilter Field:=10, Criteria1:=10
Columns("J:J").Select
Selection.EntireColumn.Hidden = False

Sheets("Feuil1").Select
Range("F15").Select
UserForm1.Show
Application.ScreenUpdating = True
End Sub

 

[Pierrot]

Je n'ai rien de protégé, visiblement il m'exécute bien la macro, mais il m'affiche ce panneau d'erreur.

Erreur d'exécution 1004
La Méthode Select de la Classe Range a échoué.

?????????????????????

 

[Franck]

Essaye de remplacer
Sheets("Feuil4").Select
par
Sheets("Feuil4").Activate

 

[Pierrot]

Le but est d'aller de la feuil4 à la feuil1,j'ai donc essayé Sheets("Feuil1").activate mais cela ne change rien j'ai tjrs la même erreur

 

[Pierrot]

Personne ne trouve de solution .....

 

[STéphane]

poste un classeur exemple

 

[cobra]

Dans les propriété de ton bouton, mets la propriétés "takeFocusOnClick" à "False"