vba Résolu/Fermé

Question

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

Configuration: Windows XP / Internet Explorer 8.0

Leahkim · Answer

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

Benzi · Answer

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

Benzi · Answer

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

Benzi · Answer

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

eriiic · Answer

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

benzi · Answer

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

Vba

6 réponses

Discussions similaires