CommandButton kopieren
07.02.2005 21:56:14
louis
ich bräuchte noch mal eure hilfe
ich habe eine userform mit einer multipage von 10 seiten.
jetzt möchte ich jeweils auf jede seite einen commandbutton mit weiter und einen mit zurück damit ich in den seiten blättern kann, das klappt auch soweit bei den ersten zwei seiten.
wenn ich das jetzt für jede seite mache wird der code super lang. hat jemand eine idee wie ich das anders hinbekomme?
Private Sub Weiter_Page1_Click()
With MultiPage1
If Value < .Pages.Count - 1 Then
.Value = .Value + 1
Else
.Value = 0
End If
End With
End Sub
Diesen code müsste ich jetzt für jede schaltfläche anlegen kann man das optimieren?
mfg
louis