j'ai un userform avec un combobox et un bouton de commande,
sur ce combobox sont afficher toutes mes feuilles, je voudrai en cacher
quelques unes et également lorsque je selectionne sur mon combobox un
feuillet en appuyant sur le bouton de commande, j'y accede.
savez vous quel est le code§?
merci
de votre
aide
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
anonymousA
bonjour,
supposons que ton listbox où apparaissent les noms de tes feuilles soit "listefeuille"
Private Sub listefeuille_Click()
Dim selectionclass As Workbook Dim selectionfeuille As Object
Set selectionclass = ActiveWorkbook Set selectionfeuille = selectionclass.Sheets(listefeuille.Value)
selectionfeuille.Visible = False end sub
Pour la faire réapparaitre, évidemment true au lieu de false. Attention au fait que tu dois toujours avoir une feuille visible donc qu'il te faut gérer cet impératif sous peine d'avoir une erreur lors d'un click par l'utilisateur sur la dernière feuille visible dans ton listbox. Si tu veux commander la cache ou la décache par un bouton à part au lieu du Click dans le listbox les commandes restent globalement les mêmes.
bjr,
j'ai un userform avec un combobox et un bouton de commande, sur ce combobox sont afficher toutes mes feuilles, je voudrai en cacher quelques unes et également lorsque je selectionne sur mon combobox un feuillet en appuyant sur le bouton de commande, j'y accede. savez vous quel est le code§? merci de votre aide
bonjour,
supposons que ton listbox où apparaissent les noms de tes feuilles soit
"listefeuille"
Private Sub listefeuille_Click()
Dim selectionclass As Workbook
Dim selectionfeuille As Object
Set selectionclass = ActiveWorkbook
Set selectionfeuille = selectionclass.Sheets(listefeuille.Value)
selectionfeuille.Visible = False
end sub
Pour la faire réapparaitre, évidemment true au lieu de false. Attention au
fait que tu dois toujours avoir une feuille visible donc qu'il te faut gérer
cet impératif sous peine d'avoir une erreur lors d'un click par l'utilisateur
sur la dernière feuille visible dans ton listbox.
Si tu veux commander la cache ou la décache par un bouton à part au lieu du
Click dans le listbox les commandes restent globalement les mêmes.
bjr,
j'ai un userform avec un combobox et un bouton de commande,
sur ce combobox sont afficher toutes mes feuilles, je voudrai en cacher
quelques unes et également lorsque je selectionne sur mon combobox un
feuillet en appuyant sur le bouton de commande, j'y accede.
savez vous quel est le code§?
merci
de votre
aide
supposons que ton listbox où apparaissent les noms de tes feuilles soit "listefeuille"
Private Sub listefeuille_Click()
Dim selectionclass As Workbook Dim selectionfeuille As Object
Set selectionclass = ActiveWorkbook Set selectionfeuille = selectionclass.Sheets(listefeuille.Value)
selectionfeuille.Visible = False end sub
Pour la faire réapparaitre, évidemment true au lieu de false. Attention au fait que tu dois toujours avoir une feuille visible donc qu'il te faut gérer cet impératif sous peine d'avoir une erreur lors d'un click par l'utilisateur sur la dernière feuille visible dans ton listbox. Si tu veux commander la cache ou la décache par un bouton à part au lieu du Click dans le listbox les commandes restent globalement les mêmes.
bjr,
j'ai un userform avec un combobox et un bouton de commande, sur ce combobox sont afficher toutes mes feuilles, je voudrai en cacher quelques unes et également lorsque je selectionne sur mon combobox un feuillet en appuyant sur le bouton de commande, j'y accede. savez vous quel est le code§? merci de votre aide
