page im command button wechseln
22.08.2022 21:33:00
Maik
Ich habe eine Listboxen auf mehrere pages in einer userform. Mit ein command butten führe ich ein Makro auf dem jeweiligen tabbellenblatt aus um eine bestimmte spalte zu sortieren. Das funktioniert auch alles super. Um dann die Listbox richtig sortiert zu aktualisieren. Beende ich die userform und starte sie dann wieder. Leider springt er dann immer auf Page 0. Auch wenn ich angebe er soll auf page 1 oder 2 usw wechseln. WIe gesagt sortieren und neu befüllen der Listbox funktioniert alles.
Private Sub CommandButton115_Click()
Sortieren_Name
Unload Me
Startbildschirm.Show
MultiPage1.Value = 1
Habe auch einen CommanButton 216 mit dem Inhalt MultiPage1.Value = 1
Einzelnd funktioniert der Button aber nicht in verbindung mit dem Button 115
Private Sub CommandButton115_Click()
Sortieren_Name
Unload Me
Startbildschirm.Show
Call CommandButton216_Click
End Sub
Hier lass ich die Listboxen abarbeiten zum befüllen und das er mir bei start der userform die Page0 ausgiebt.
Private Sub UserForm_Initialize()
Dim lZeile As Long
'Einträge in die Listbox100
ListBox100.ColumnCount = 2
Call listboxaktualisieren(0)
'Einträge in die ListBox200
ListBox200.ColumnCount = 2
Call listboxaktualisieren2(0)
MultiPage1.Value = 0
End Sub