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

Résolu/Fermé
sabouna_d Messages postés 20 Date d'inscription mercredi 2 juillet 2008 Statut Membre Dernière intervention 24 juillet 2008 - 4 juil. 2008 à 09:47
sabouna_d Messages postés 20 Date d'inscription mercredi 2 juillet 2008 Statut Membre Dernière intervention 24 juillet 2008 - 4 juil. 2008 à 10:12
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 vendredi 29 février 2008 Statut Membre Dernière intervention 20 avril 2012 161
4 juil. 2008 à 10:09
essaie avec cela

a = Sheets("Acceuil").Range("A2").Text
Sheets (a).select
1
zavenger Messages postés 811 Date d'inscription vendredi 29 février 2008 Statut Membre Dernière intervention 20 avril 2012 161
4 juil. 2008 à 09:52
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 mercredi 2 juillet 2008 Statut Membre Dernière intervention 24 juillet 2008 1
4 juil. 2008 à 09:53
Non ca ne marche pas, j'ai essayé
0
ribery_7_91 Messages postés 233 Date d'inscription jeudi 22 novembre 2007 Statut Membre Dernière intervention 4 septembre 2010 16
4 juil. 2008 à 09:53
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 mercredi 2 juillet 2008 Statut Membre Dernière intervention 24 juillet 2008 1
4 juil. 2008 à 09:56
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 vendredi 29 février 2008 Statut Membre Dernière intervention 20 avril 2012 161
4 juil. 2008 à 09:57
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 mercredi 2 juillet 2008 Statut Membre Dernière intervention 24 juillet 2008 1
4 juil. 2008 à 10:00
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 233 Date d'inscription jeudi 22 novembre 2007 Statut Membre Dernière intervention 4 septembre 2010 16
4 juil. 2008 à 10:04
Sheets (a).select

essaye ça
0
sabouna_d Messages postés 20 Date d'inscription mercredi 2 juillet 2008 Statut Membre Dernière intervention 24 juillet 2008 1
4 juil. 2008 à 10:08
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 mercredi 2 juillet 2008 Statut Membre Dernière intervention 24 juillet 2008 1
4 juil. 2008 à 10:12
merci beaucoup ça marche:)
0