Habe eine andere Frage, SpinButton
01.08.2021 19:56:06
philipp
habe folgende Makro für die UF.
Private Sub SpinButton1_SpinUp()
Dim i
If Sheets.Count > ActiveSheet.Index Then
i = ActiveSheet.Index
Sheets(i + 1).Activate
End If
End Sub
Private Sub SpinButton1_SpinDown()
Dim i
If Sheets.Count > ActiveSheet.Index Then
i = ActiveSheet.Index
Sheets(i - 1).Activate
End If
End Sub
habe ich die letzte Tabelle ausgewählt, kann ich nicht zurück auswählen, steht fest.
Es klappt nur bis zur vorletzten Tabelle, dann kann ich zurück auswählen.
Und wenn ich an der 1. Tabelle bin kommt Fehlermeldung bricht ab.
mfg philipp b
