Vba

Résolu
benzi Messages postés 84 Statut Membre -  
 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

  1. Leahkim Messages postés 3219 Statut Membre 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
  2. 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
  3. 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
  4. 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
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    Bonjour,

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

    eric
    0
  7. 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
    1. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
       
      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
    2. benzi
       
      Oui c'est ce que j'ai compris après ton post.
      C'est toujours bon de comprendre le pourquoi.
      Merci.
      Dan
      0