Clever-Excel-Forum

Normale Version: Bedingte Combobox befüllung
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo,

ich bin totaler VBA Anfänger. Ich möchte Ein Formular erstellen. Als erstes soll der Arbeitsbereich ausgewählt werden. Abhängig von ausgewählten Bereich mittels Opttionsbutton soll denn ein Combobox mit einer Tabelle gefüllt werden.

Ich wäre so vorgegangen, dass ich eine Variable definiere, die bei bei angeklickten Button einen Wert bekommt.
Private Sub OptionButton_Puls_HP_Click()
Dim AP As String
Worksheets("Listen-Werte").Activate
If OptionButton_Puls_HP.Value = True Then AP = "Puls_HP"
End Sub

Dann wollte ich im Userform Initialize

Ein select case machen in dem ich dann die Variable abfrage. Aber ich habe das gefühl, dass die abfrage der Variable wohl nicht im userform stattfinden sollte. Auf jedenfall funktioniert es nicht.
Private Sub UserForm_Initialize()
Select Case AP
    Case "Puls_HP" then userform1.combobox_AP.rowsource = "Tabelle_Arbeitsschritt_EF_PULS"
   
End Select
End Sub

Ich hoffe, dass meine Problemstellung klar ist, und freue mich auf Hilfe
Da war wieder jemand "fleißig" (deshalb auch die kleine Schrift, kommt vom C&P).
Herber und VBA-Forum habe ich bisher "entdeckt".