Übergabe von MsForms
29.04.2018 12:46:45
MsForms
Ich habe eine Frage in Bezug der Möglichkeit der Übergabe von MSForms. Ich weiß, dass man einzelne MSForms z. B. chk_Box as MSForms.Checkbox übergeben kann.
Meine Frage zielt jedoch darauf ab, ob es eine Möglichkeit gibt eine solche Übergabe auch an einen allgemein formulierten Platzhalter durchzuführen. Denn bei der Übergabe werden im konkreten Fall für ein und denselben Platzhalter mehrere MsForms einer Sorte übertragen und je nach Situation kommt nur eine zum Einsatz.
Die Übergabe erfolgt wie folgt: Call Datenselektionsprozess_Schritt2(CByte(1), CByte(bytAnzahl), CStr("erste"), CStr("zweite"), CStr("dritte"), lst_Uebereinstimmung1_P2, lst_Uebereinstimmung2_P2, lst_Uebereinstimmung3_P2, lbl_Einbeziehung1_P2, lbl_Einbeziehung2_P2, lbl_Einbeziehung3_P2, opt_And1_P2, opt_And2_P2, opt_And3_P2, opt_Or1_P2, opt_Or2_P2, opt_Or3_P2, chk_Alle1_P2, chk_Alle2_P2, chk_Alle3_P2)
Erste Zeile der Übernahmeprozedur:
Private Sub Datenselektionsprozess_Schritt2(bytDurchlauf As Byte, bytAnzahl As Byte, strNummer1 As String, strNummer2 As String, strNummer3 As String, lst_Uebereinstimmung1_P2 As MSForms.Listbox, lst_Uebereinstimmung2_P2 As MSForms.Listbox, lst_Uebereinstimmung3_P2 As MSForms.Listbox, lbl_Einbeziehung1_P2 As MSForms.Label, lbl_Einbeziehung2_P2 As MSForms.Label, lbl_Einbeziehung3_P2 As MSForms.Label, opt_And1_P2 As MSForms.OptionButton, opt_And2_P2 As MSForms.OptionButton, opt_And3_P2 As MSForms.OptionButton, opt_Or1_P2 As MSForms.OptionButton, opt_Or2_P2 As MSForms.OptionButton, opt_Or3_P2 As MSForms.OptionButton, chk_Alle1_P2 As MSForms.Checkbox, chk_Alle2_P2 As MSForms.Checkbox, chk_Alle3_P2 As MSForms.Checkbox)
Vor diesem Hintergrund soll z. B. für die drei lst_Uebereinstimmung1_P2, lst_Uebereinstimmung2_P2 und lst_Uebereinstimmung3_P2-Listen eine Zuordnung zur allgemeinen Variablen lst_Uebereinstimmung möglich sein. Dies ist aufgrund der weiteren Schritte erforderlich.
Alle bisherigen Versuche sind bereits gescheitert. Die Deklaration von lst_Uebereinstimmung als MSForms.Listbox in der neuen Prozedur war genauso ein Rohrkrepierer wie eine Deklaration als Control und Object. ich denke das zentrale Problem wird sein, dass die Listbox lst_Uebereinstimmung nicht existiert, sondern nur ein Platzhalter sprich Phantom ist. Daher kommt bei jedem Durchlauf eine Fehlermeldung mit dem Hinweis auf ein fehlendes Objekt. Würde nur eine lst_Uebereinstimmung übergeben werden, dann wäre alles kein Problem, weil ich diese grundsätzlich nennen kann wie ich möchte.
Für eine Rückantwort im Voraus besten Dank.
Gruß Sandra