VBA/Excel, problème de sélection de feuille

Résolu
sabouna_d Messages postés 20 Date d'inscription   Statut Membre Dernière intervention   -  
sabouna_d Messages postés 20 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Je suis une débutant en VB
Dans mon fichier excell j'ai environ une vintaine de feuilles. Mes feuilles seront nommées 408, 302-3,...bref
En générale pour sélectionner une feuiille je sais qu'on fait
Sheets("408").Select

Mais moi ce que je veux c'est que dans ma première feuille, par exemple dans la cas A2, j'entre le nom de la feuille et en appuyant sur un boutant (auquel est affecter une macro), la feuille dont le nom a été tapé en A2 s'ouvre.

Voici mon code:
Dim a As Variant

a = Sheets("Acceuil").Range("A2").Value


et l'erreur est ici :
Sheets("a").Select

Je ne sais pas comment faire?

Merci d'avance pour votre aide
A voir également:

10 réponses

zavenger Messages postés 811 Date d'inscription   Statut Membre Dernière intervention   161
 
essaie avec cela

a = Sheets("Acceuil").Range("A2").Text
Sheets (a).select
1
zavenger Messages postés 811 Date d'inscription   Statut Membre Dernière intervention   161
 
Bonjour,

Sheets(a).Select

devrait resoudre ton probleme ("a" est la chaine de caractere constante, a est une variable)
0
sabouna_d Messages postés 20 Date d'inscription   Statut Membre Dernière intervention   1
 
Non ca ne marche pas, j'ai essayé
0
ribery_7_91 Messages postés 234 Date d'inscription   Statut Membre Dernière intervention   16
 
essaye sans les parenthèses autour du a
0

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

Posez votre question
sabouna_d Messages postés 20 Date d'inscription   Statut Membre Dernière intervention   1
 
si j'ai bien compris ribery_7_91 je tape:
Sheets a.select?


si c'est ca, j'ai essaye ca ne marche pas il dit utilisation incorrecte de la propriété
0
zavenger Messages postés 811 Date d'inscription   Statut Membre Dernière intervention   161
 
est-tu sure que ta variable contient la bonne valeur?
-> ajoute la ligne

a = Sheets("Acceuil").Range("A2").Value
MsgBox a

pour afficher son contenu. Cela pourrait aussi etre une faute de frappe : Acceuil <-> Accueil par ex?
0
sabouna_d Messages postés 20 Date d'inscription   Statut Membre Dernière intervention   1
 
oui ca contient la bonne valeur par exemple en A2 j'ai mis 408, dans mon msg box j'ai 408
0
ribery_7_91 Messages postés 234 Date d'inscription   Statut Membre Dernière intervention   16
 
Sheets (a).select

essaye ça
0
sabouna_d Messages postés 20 Date d'inscription   Statut Membre Dernière intervention   1
 
non ca ne marche pas, de toute facon qd j'écris sheets (a).select Vb l'arrange directement en sheets(a).select
0
sabouna_d Messages postés 20 Date d'inscription   Statut Membre Dernière intervention   1
 
merci beaucoup ça marche:)
0