versuche gerade ein Problem zu knacken, doch ich komme irgend wie nicht weiter (Hirnblockade).
Mein Spinbutton1_SpinDown will einfach nicht laufen. Warum nicht??? Mein SpinButton1_SpinUp läuft doch auch.
Sinn dieses Codes ist es leere Zellen in der Anwahl auszulassen.
Kann mir jemand helfen?
EXCEL zeigt mir(wenn eine Leerzelle bevorsteht) einen Überlauffehler in der folgenden Zeile an:
For i = 22 To zeile Step -1
Wenn ich debugge stelle ich fest das i = 31 ist und Zeile = 30
Wie kann das angehen, wenn er in der Forschleife nur von 22 bis 30(Zeile) laufen darf. Warum ist i größer????
Nun noch die kompletten Codes?
Vielen Dank für Eure Hilfe
Gruß
Felix
Private Sub SpinButton1_SpinDown()
zeile = SpinButton1.Value
If Sheets("STATISTIK").Cells(zeile, spalte).Value = "" Then
For i = 22 To zeile Step -1
If Sheets("STATISTIK").Cells(i, spalte).Value <> "" Then
zeile = i
SpinButton1.Value = i
Exit For
End If
Next i
Else
SpinButton1.Value = zeile
End If
Def_Bem_Fäh_Kom
End Sub
Private Sub SpinButton1_SpinUp()
zeile = SpinButton1.Value
If Sheets("STATISTIK").Cells(zeile, spalte).Value = "" Then
For i = zeile To 155
If Sheets("STATISTIK").Cells(i, spalte).Value <> "" Then
zeile = i
SpinButton1.Value = i
Exit For
End If
Next i
Else
SpinButton1.Value = zeile
End If
Def_Bem_Fäh_Kom
End Sub