Wert wird 0 und führt zur Endlosschleife
31.05.2005 13:49:25
Sammy
Durch mangelndes Programierwissen und Nutzung durch dritte, kann es vorkommen das eine Variable den Wert 0 annimmt. Das wiederum führt dazu, dass eine Schleife endlos wird...
z.B. das DatumEnde
#If DatumLaufende <= DatumHeute Then
Do While DatumEnde <= DatumHeute
TagEnde = TagEnde
MonatEnde = MonatEnde + Laufzeit
JahrEnde = JahrEnde
DatumEnde = DateSerial(JahrEnde, MonatEnde, TagEnde)
.Cells(z, 11) = DatumEnde
Loop
wie kann ich diesen Fehler vermeiden, so das er die Zeile überspringt?
Grüße
Sammy