Elite Veteran
Beiträge: 866
Ort: Wien | Hallo!
klauskinski
...
Wenn ein Betrag - per UserForm - bergeben wurde, dann wird der richtig umgewandelt also "2.134,09" wird zu "zweitausendeinhundertvierunddreiig". Aber jetzt kommt der Knackpunkt, ich bentige die Dezimalstellen auch noch, aber nicht als Wortwert sondern so wie auf Quittungen blich angegeben "... und 09/100". Kann mir das jemand erklren oder coden?
...
Ich kenne die Schreibweise bzw. deren Regeln nicht. Wenn das immer genau so aussehen soll, also mit (nur) 2 Stellen als Hunderstel, dann versuche es mal so:
Aufruf: fctDezi_In_Hund(Me!Hoppla)
Public Function fctDezi_In_Hund(dblZahl As Double) As String
fctDezi_In_Hund = Mid(Format(dblZahl - Int(dblZahl), ".00\/1\0\0"), 2)
End Function
----- Servus
Karl
*********
Access-Entwickler-Konferenz: https://www.donkarl.com/?aek - Jetzt anmelden für 19./20.10. in Nürnberg
Access DevCon Vienna: https://www.donkarl.com/devcon
Access Forever: https://www.accessforever.org
Access News: https://www.youtube.com/playlist?list=PLVCeBbJIMDvdJ8ghMbEakJ6_EQyvy... |