Liste / kombinationsboks med macroer

Hvis jeg forstår dit spørgsmål ret, ville jeg gøre følgende:

Tilføj en UserForm til dit regneark. På din Userform smider du en ComboBox samt følgende kode:

Private Sub UserForm_Activate()
  'Sletter indhold af ComboBox
  ComboBox1.Clear
 
  'Fylder ComboBox op med valgmuligheder
  ComboBox1.AddItem "Vælg hvilken macro du vil køre" 'ListIndex = 0
  ComboBox1.AddItem "Kør Macro1" 'ListIndex = 1
  ComboBox1.AddItem "Kør Macro2" 'ListIndex = 2
  ComboBox1.AddItem "Kør Macro3" 'Listindex = 3
 
  'Vælger første punkt på listen som default
  ComboBox1.ListIndex = 0
End Sub

Private Sub ComboBox1_Click()
  'Aktiverer den valgte macro når den vælges
  Select Case ComboBox1.ListIndex
    Case 1
      Call Macro1
    Case 2
      Call Macro2
    Case 3
      Call Macro3
  End Select
  ComboBox1.ListIndex = 0
End Sub

Private Sub Macro1()
  MsgBox "Makro 1"
End Sub

Private Sub Macro2()
  MsgBox "Makro 2"
End Sub

Private Sub Macro3()
  MsgBox "Makro 3"
End Sub

Denn eUserForm kunne du så kalde frem ved Userform1.Show 0, enten ved f.eks. en trykknap eller automatisk når arket åbnes ved Sub Auto_Open().

Vil du dele dine macroer op i flere comboBox'e kan du bare smide flere på formen. Alternativt kan du droppe formen, og smide ComboBoxene direkte i dit regneark.

Håber det var det du søgte - Martin

Tak for hjælpen.
Jeg fandt helt anden løsning på behov, men går ud fra dit forslag også virker :o)