Mod
01.09.2003 10:30:59
Stephan
Ich habe ein Problem mit der Funktion Mod.
Ich will prüfen, ob eine eingegebener Wert durch 0,25 teilbar ist. Wenn nein, soll eine Fehlermeldung ausgegeben werden.
Bei der Zeile e = target.value Mod 0.25 bekomm ich die Fehlermeldung 11: Division durch Null !?!?
Kann mir bitte jemand erklären wieso das so ist und wie ich die Teilbarkeit durch 0,25 prüfen kann ?
Hier noch der gesamte Code:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Intersect(Target, Range("D11:AK1000")) Is Nothing Then
Exit Sub
Else
e = Target.Value Mod 0.25
If e <> 0 Then
MsgBox "Fehler"
End If
End If
End Sub
Vielen DANK
Stephan