Wert abgeschnitten

GünterD · 10. Juli 2023, 19:52

Hallo Zusammen,

ich stehe mal wieder auf dem SCHLAUCH.

In einem Excel-Makro verwende ich folgendes

Visual Basic-Quellcode

ShZiel.Cells(z, s).Value = ShQuelle.Cells(z, s).Value

Für mich unerklärlich warum ein abgeschnittener Wert in der Zelle der Ziel-Mappe ankommt.
D.h. in der Quell-Zelle steht der Wert=0,1234€ und in der Ziel-Zelle kommt der Wert 0,1200€ an!!

Was kann der Grund sein?

Haudruferzappeltnoch · 10. Juli 2023, 21:49

Eine Währung hat wohl nur 2 Nachkommastellen denkt sich Excel.
Versuche mal den Wert umgewandelt zwischenzuspeichern:

Visual Basic-Quellcode

Dim val as Double
val = ShQuelle.Cells(z, s).Value
ShZiel.Cells(z, s).Value = val

VaporiZed · 10. Juli 2023, 21:53

Nimm nicht .Value, sondern .Value2, dann klappt es (zumindest bei mir).

Haudruferzappeltnoch · 10. Juli 2023, 22:00

Aja das macht sogar dasselbe wie mein Vorschlag

Der einzige Unterschied zwischen dieser Eigenschaft und der Value-Eigenschaft besteht darin, dass die Value2-Eigenschaft die Datentypen Currency und Date nicht verwendet.
Sie können auf Werte, die mit diesen Datentypen formatiert sind, als Gleitkommazahlen zugreifen, indem Sie den Datentyp Double verwenden

Wenn man .Value als Variant abspeichert, kann man beim Debuggen den Wert 0,1234 lesen, geschrieben wird trotzdem 0,1200.
Mit Value2 ist hingegen egal, ob man das nur für die Quell- oder Zielzelle nutzt, es funktioniert.

INOPIAE · 11. Juli 2023, 05:13

Was ist denn in den Optionen für die Genauigkeit eingestellt (Optionen - Erweitert - Berechnung für die Arbeitsmappe)? Genauigkeit wie angezeigt?

petaod · 12. Juli 2023, 16:37

Haudruferzappeltnoch schrieb:

geschrieben wird trotzdem 0,1200.

geschrieben oder angezeigt?
Vielleicht ist auch einfach nur das Anzeigeformat der Zelle unzureichend.

Haudruferzappeltnoch · 12. Juli 2023, 17:58

Wie muss man eine Zelle formatieren damit 0,1200 angezeigt wird, obwohl nicht 0,1200 geschrieben wurde?

petaod · 13. Juli 2023, 10:41

Wenn tatsächlich 0,1200 angezeigt wird, sind die Nullen natürlich da.
Ich war mir nur nicht sicher, ob nicht etwa 0,12 angezeigt wird, dann hätte es das Anzeigeformat sein können.

Wert abgeschnitten

Wert abgeschnitten

Visual Basic-Quellcode

Visual Basic-Quellcode

Haudruferzappeltnoch schrieb:

Ähnliche Themen

5 Benutzer haben hier geschrieben