aide sur VB excel combobox

Question

Je souhaite utiliser un combobox pour activer derri&#232;re ma userform une des feuilles de mon classeur, sachant que ces feuilles ont des noms diff&#233;rents et que la liste est non exhaustive. Si quelqu'un peut m'aider, merci d'avance.

krabym

cs_ifix · Answer

peux tu preciser :
les noms des feuilles du classeur sont dans ton combobox ?

si c'est ca tu fais met un evenement change() a ton combobox et tu fais:
mafeuille=combobox.list(combobox.listindex)
sheets(mafeuille).select

ifix

krabym · Answer

merci IFIX, mais en me grattant la t&#234;te hier soir et en passant par une listbox, j'ai fini par sortir ce que je voulais : pour info:


pour afficher la liste de mes feuilles dans la listbox :

Private Sub UserForm_Activate()
   ListBox1.Clear
   a =  ListBox1.Value
      For Each sh In ThisWorkbook.Sheets
      UserForm2.ListBox1.AddItem sh.Name
      Next sh
End Sub

 Pour s&#233;lectionner ma feuille &#224; partir de ma listbox: 

Private Sub ListBox1_Click()
   a  = ListBox1.Value
   ThisWorkbook.Sheets(a).Select
End Sub

Aide sur VB excel combobox

2 réponses

Discussions similaires