XL 2021 Ouvrir une feuille en fonction d'une cellule

Lorenzio · 22 Octobre 2023

Bonjour,

J'aimerais pouvoir afficher une feuille existante de mon classeur, en fonction du nom de cette dernière qui serait dans la cellule E11 par exemple.

J'ai testé plusieurs chose mais sans résultat. Exemple :

Dim Nom As String
Nom = Worksheets(Range("E11").Value).Name

Worksheets("Non").Visible = True

Merci de votre aide.

sylvanu · 22 Octobre 2023

Nom et Non sont deux variables différentes.
Si vous aviez commencé le code avec "Option explicit", VBA vous aurez mis cette ligne en erreur.

sylvanu · 22 Octobre 2023

Bonjour Lorenzio,
"Non" est une chaine de caractères,
Non est le nom d'une variable. Les guillemets font toute la différence.

VB:

Dim Nom As String
Nom = Range("E11")
Sheets(Nom).Visible = True
Sheets(Nom).Select

chris · 22 Octobre 2023

Bonjour

La feuille est masquée ?

Nom et Non sont différentes et s tu définit Nom pas besoin de guillemets

Lorenzio · 22 Octobre 2023

sylvanu à dit:
Dim Nom As String Nom = Range("E11") Worksheets(Non).Visible = True Worksheets(Non).Select

Bonjour Sylvanu,
Avec ta formule ça me met un débogage sur :

Worksheets(Non).Visible = True

Bonjour Chris,
Oui la feuille est masquée. Vous avez raison pour les "Guillemets" mais ça ne fonctionne quand même pas

sylvanu · 22 Octobre 2023

Nom et Non sont deux variables différentes.
Si vous aviez commencé le code avec "Option explicit", VBA vous aurez mis cette ligne en erreur.

Lorenzio · 22 Octobre 2023

sylvanu à dit:
Nom et Non sont deux variables différentes.
Si vous aviez commencé le code avec "Option explicit", VBA vous aurez mis cette ligne en erreur.

ah ... euh ... oui... je me sent bête
Tous fonctionne correctement. Merci a vous

XL 2021 Ouvrir une feuille en fonction d'une cellule

Lorenzio

XLDnaute Nouveau

sylvanu

sylvanu

XLDnaute Barbatruc

chris

XLDnaute Barbatruc

Lorenzio

XLDnaute Nouveau

sylvanu

XLDnaute Barbatruc

Lorenzio

XLDnaute Nouveau

Discussions similaires