Ouvrir une feuille à partir de la valeur d'une listBox
F
Bonjour à tous,
Je souhaite ouvrir une feuille portant un nom (Onglet et Propriété VBA) à partir d'un click effectué dans une listbox
Private Sub LstEquipement_Click()
Dim Feuille As string
Feuille = LstEquipement.Value
'Recherche de la page = LstEquipement.Value
Sheets(ListEquipement.Value).Activate
'déchargement de cet écran et affichage de la feuille
Unload UsfMenuP
End SubMais evidemment ça ne fonctionne pas
A savoir qu'il y aura beaucoup de feuille, et donc des choix multiples en listbox, il faut donc utilisé une variable pour la valeur de la listebox
Merci
En fait j'ai trouvé c'est bon :
Private Sub LstEquipement_Click()
Dim Feuille As String
Feuille = LstEquipement.Value
'Recherche de la page = LstEquipement.Value
Worksheets(Feuille).Activate
'déchargement de cet écran et affichage de la feuille
Unload UsfMenuP
End SubBonjour,
Sans voir le fichier , à essayer :
Private Sub LstEquipement_Click()
Sheets(LstEquipement.ListIndex + 1).Activate
Unload Me
End SubSi terminé, merci de cloturer le fil en cliquant sur le V vert à coté du bouton Editer
Amicalement