in einer UF sollen 3 Zahlen (Betrag1, Wechselkurs, Betrag2) stehen. Beim Aufruf wird standardmäßig überall 1 eingetragen. Dabei sollen die Beträge mit Tausender-Punkt und 2 Nachkommastellen stehen, der Kurs mit 4 Nachkommastellen.
Aus meiner Recherche hatte ich das Nachfolgende ausprobiert:
Private Sub UserForm_Initialize()
Dim Exchange As Double, Betrag1 As Double, Betrag2 As Double
Exchange = Format(CDbl(1), "#.##0,00")
Betrag1 = Format(CDbl(1), "#.##0,00")
Betrag2 = Format(CDbl(1), "#.##0,00")
Leider klappt es nicht. Ohne das ganze "Format-Zeugs" standen wenigstens die Zahlen drin und ich konnte damit auch rechnen. Jetzt bleiben alle Textfelder einfach leer. Habe schon diverse Kombinationen ausprobiert, ohne Erfolg.
Was mach ich falsch?
Danke!
Gruß
David