Vba

Résolu
benzi Messages postés 66 Date d'inscription   Statut Membre Dernière intervention   -  
 benzi -
Bonjour,

J'ai un petit souci dont je ne comprend pas.
J'ai crée un bouton pour revenir à ma page d'accueil sur plulsieurs feuilles de mon classeur, puis une fois sur cette page, je souhaite qu'une cellule soit sélectionnée.
mon code est le suivant:

Private Sub CommandButton1_Click()
Sheets("ACCUEIL").Select
Range("A1").Select
End Sub

Débogage sur Range, cela me met "La méthode Select de la classe Range a échouée"
Quelqu'un pourrait me dire pourquoi et qu'elle serait la correction? Merci de vos réponses.
Dan

6 réponses

Leahkim Messages postés 3081 Date d'inscription   Statut Membre Dernière intervention   281
 
quand tu mets "range", je crois qu'il faut spécifier une plage de cellule, et non pas une cellule.

met A1:A1 ça devrait passer
0
Benzi
 
Merci pour ta réponse mais cela ne fonctionne pas.
C'est à vrai dire "Select" qui ne convient pas, tout comme "Activate"
Cette formule fonctionne avec un bouton formulaire avec cet exemple:

Sub Sommaire()
Sheets("Accueil").Select
Range("B2").Select
End Sub

Je ne comprend pas pourquoi cela ne marche pas avec un bouton vba.
Il y a une raison qui m'échappe. Si quelqu'un sait pourquoi, sa réponse sera la bien venue.
Dan
0
Benzi
 
Merci pour ta réponse mais cela ne fonctionne pas.
C'est à vrai dire "Select" qui ne convient pas, tout comme "Activate"
Cette formule fonctionne avec un bouton formulaire avec cet exemple:

Sub Sommaire()
Sheets("Accueil").Select
Range("B2").Select
End Sub

Je ne comprend pas pourquoi cela ne marche pas avec un bouton vba.
Il y a une raison qui m'échappe. Si quelqu'un sait pourquoi, sa réponse sera la bien venue.
Dan
0
Benzi
 
Merci pour ta réponse mais cela ne fonctionne pas.
C'est à vrai dire "Select" qui ne convient pas, tout comme "Activate"
Cette formule fonctionne avec un bouton formulaire avec cet exemple:

Sub Sommaire()
Sheets("Accueil").Select
Range("B2").Select
End Sub

Je ne comprend pas pourquoi cela ne marche pas avec un bouton vba.
Il y a une raison qui m'échappe. Si quelqu'un sait pourquoi, sa réponse sera la bien venue.
Dan
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 276
 
Bonjour,

Il faut que tu reprécises la feuille :
Sheets("Accueil").Range("A1").Select
ou
ActiveSheet.Range("A1").Select

eric
0
benzi
 
Bonjour Eric,

Merci pour ta réponse, cela fonctionne.
J'avais pourtant utilisé ces formules mais je n'avais pas compris qu'il fallait je je reprécise la feuille.

Résolu.

Dan
0
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 276
 
Normalement range() s'adresse par défaut à la feuille active.
Je pense que c'est le fait que tu sois dans un Sub CommandButton qui appartient à une autre feuille qui nécessite de re-préciser la feuille désirée.
Je met en résolu pour toi...
eric
0
benzi
 
Oui c'est ce que j'ai compris après ton post.
C'est toujours bon de comprendre le pourquoi.
Merci.
Dan
0