ich habe eine UserForm.
In dieser habe ich Multiseiten eingefügt (3 Pages).
Nun möchte ich auf jeder der 3 Pages Daten einlesen.
Page1 aus Tabelle Kompolett.
Page2 aus Tabelle Resliste.
Page3 aus Tabelle Komplett (aber andere Spalte).
Das realisiere ich über den folgenden Code:
Private Sub UserForm_Initialize()
Dim lR3%
lR3 = Worksheets("Komplett").Cells(Rows.Count, 1).End(xlUp).Row
ListBox1.RowSource = "Komplett!b4:b" & lR3
ListBox1.ListIndex = 0
End Sub
Das funzt auch soweit.
Allerdings kann ich immer nur eine Page über initialize ansprechen.
Ich habe versucht den obigen Code 3 mal zu verwenden mit unterschiedlichen
lr's (dim lr1% dim lr2% dim lr3%)und den entsprechenden unterschiedlichen Listboxnummern (1bis3) und den entsprechenden Tabellenbezeichungen.
Einzeln funzt jedes, aber sobald ich 2 oder alle 3 nehme bekomme ich in der Userform nichts mehr angezeigt. Egal ob einzeln eingegeben oder in einem zusammen.
Ich hoffe ich konnte mich verständlich ausdrücken.
Was ich brauche?
Die Möglichkeit die Daten einzulesen egal auf welchen Tab ich in der Userform klicke.
Weiterhin sollen zu den angezeigten Werten dann in der Userform weiter unten die entsprechenden Infos angezeigt werden die in der gleichen Reihe aber in einer anderen Spalte stehen. ( das versuch ich dann zu realisiern wenn die Sache mit der Pageumschaltung funzt). Sollte jemand ne Lösung parat haben wäre ich natürlich nicht abgeneigt diese zu erfahren um sie einzusetzen ;-)
Gruß und danke im Voraus
Heinz