zur Anzeige von Daten, aus mehreren Tabellen, die über einen Key verbunden sind, habe ich ein userform, mit einer Combobox und einer Multipage angelegt.
Wenn ich in der Combobox einen Eintrag auswähle, sollen die dazu passenden Daten in der Multipage angezeigt werden.
Private Sub UserForm_Initialize()
'TeilnehmerIn auswaehlen
Worksheets("Teilnehmer").Activate
form_TN_Uebersicht.TN_Combo_Name.RowSource = "x2:x50"
'Teilnehmerdaten anzeigen - Dies habe ich hier bei herber gefunden.
Dim iCounter As Integer, iRow As Integer
Dim sTxt As String
For iCounter = 1 To 5
For iRow = 1 To 5
sTxt = sTxt & Cells(iRow, iCounter).Value & vbLf
Next iRow
sTxt = Left(sTxt, Len(sTxt) - 1)
Controls("TextBox" & iCounter).Text = sTxt
sTxt = ""
Next iCounter
End Sub
Wie verbinde ich die Combobox so mit den Feldern in der Multipage, dass die jeweils passenden Einträge angezeigt werden?Und wie muss der Code "Teilnehmerdaten anzeigen" geändert werden ,dass nicht alle Einträge, aus den Spalten, in den Textboxen angezeigt wird?
Wie beziehe ich die Daten aus anderen Tabellen? With Teilnehmer, With Urlaub, usw.?
Um weiter zu lernen, wäre es toll, wenn ich zu den Tipps auch eine Erklärung bekommen könnte.
Euch ein schönes, erholsames Wochenende
Christian