Prozentuale Statusanzeige

So ein mist!
ich will mir anzeigen lassen wieviel Prozent der Dokumente abgearbeitet wurden.
Dcol.Count=Gesamtanzahl aller Dokumente
k=das aktuelle dokument

Print Round(100*k/Dcol.Count,1),"%"

immer (!) bricht mein Script bei folgender Rechnung mit einem Overflowerror ab:

Print Round(100*328/1178,1),"%"

das kann’s doch nicht sein! Gibt es einen besseren Weg?

Zwei Sachen
führe vor dem Print die Berechnung separat aus. Definiere als Ergebnisvariable eine Long Zahl
Dim Ergebnis as long

Ergebnis = round(100*K/Dcol.Count,1)

Print Ergebnis," %"

Zweitens:
Wenn du solche Fragen stellst ist es immer sehr hilfreich den kompletten Source Code zu sehen.

HTH Thomas

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

ich will mir anzeigen lassen wieviel Prozent der Dokumente
abgearbeitet wurden.
Dcol.Count=Gesamtanzahl aller Dokumente
k=das aktuelle dokument
Print Round(100*k/Dcol.Count,1),"%"
immer (!) bricht mein Script bei folgender Rechnung mit einem
Overflowerror ab:
Print Round(100*328/1178,1),"%"
das kann’s doch nicht sein! Gibt es einen besseren Weg?

Zwei Sachen
führe vor dem Print die Berechnung separat aus. Definiere als
Ergebnisvariable eine Long Zahl
Dim Ergebnis as long
Ergebnis = round(100*K/Dcol.Count,1)
Print Ergebnis," %"

Oder du dividierst vor der Multiplikation:
Print Round(k/Dcol.Count*100, 1), „%“
bzw.
Print Round(100*(k/Dcol.Count), 1), „%“

(auch)
HTH
Thomas

Vielen Dank,
jetzt tut’s :smile: