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

Question

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

zavenger · Answer

Bonjour,

Sheets(a).Select 

devrait resoudre ton probleme ("a" est la chaine de caractere constante, a est une variable)

sabouna_d · Answer

Non ca ne marche pas, j'ai essayé

ribery_7_91 · Answer

essaye sans les parenthèses autour du a

sabouna_d · Answer

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é

zavenger · Answer

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?

sabouna_d · Answer

oui ca contient la bonne valeur par exemple en A2 j'ai mis 408, dans mon msg box j'ai 408

ribery_7_91 · Answer

Sheets (a).select

essaye ça

sabouna_d · Answer

non ca ne marche pas, de toute facon qd j'écris sheets (a).select        Vb l'arrange directement en  sheets(a).select

zavenger · Answer

essaie avec cela

a = Sheets("Acceuil").Range("A2").Text
Sheets (a).select

sabouna_d · Answer

merci beaucoup ça marche:)

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

10 réponses

Votre réponse

Discussions similaires