aximand
Goto Top

VBA. 4stelliger Moneywert wird in Excel auf 2 Stellen gerundet

Moin zusammen,

ich greife ein Money-Feld mit 4 Nachkommastellen aus dem SQL-Server über ADODB ab.

Der Wert des Feldes wird korrekt ausgelesen und z.B. über eine MSGBOX auf 4 stellen korrekt angezeigt.
Im Frontend wird aber trotz unten stehender Formatierung immer auf die 2. Stelle gerunded. Warum dies?
Hat jemand einen Tipp für mich, dass ich die 4 NKS in der Zelle angezeigt bekomme?

Danke fein!

1
2
Sheets(i).Cells(introw, intcolumn + 7).NumberFormat = "#,##0.0000€"  
Sheets(i).Cells(introw, intcolumn + 7) = rst.Fields("MEK").Value  

Content-ID: 362225

Url: https://administrator.de/forum/vba-4stelliger-moneywert-wird-in-excel-auf-2-stellen-gerundet-362225.html

Ausgedruckt am: 08.04.2025 um 21:04 Uhr

Meierjo
Lösung Meierjo 24.01.2018 um 15:48:42 Uhr
Goto Top
Hallo

Ist doch dasselbe Problem, wie hier, oder??

Gruss
Aximand
Aximand 24.01.2018 um 16:02:39 Uhr
Goto Top
Naja bedingt schon. Ich brauche allerdings den Wert als Currency. Na egal, nutze ich die Krücke face-smile Danke
Meierjo
Meierjo 24.01.2018 um 16:45:28 Uhr
Goto Top
Hallo

Und die Variante von damals
1
Daten.Cells(izaehler, 7).Value = CDbl(rst.Fields("EK").Value)  

hilft hier auch nicht??

Gruss