Hallo,
den Fehler kann ich zwar nicht nachvollziehen, aber weil es offenbar
immer wieder Probleme mit dem Währungsformat gibt, hier etwas aus dem
Arsenal der diesbezüglichen Ratschläge:
- Deklariere deine Variable als Double, oder auch gleich als Currency
- Einen Versuch soll auch der Variant-Untertyp Decimal wert sein.
(Du kannst aber keine Variable als Decimal deklarieren, sondern
musst die Typumwandlung mit CDec verwenden.)
- Was auch funktionieren sollte, wäre
ActiveSheet.Cells(Zeil, 2).Value = Format(AnrNettoPflicht, "##,###.00 €")
Viel Erfolg!
|