Herbers Excel-Forum - das Archiv
Formatierung als Währung
- Formatierung als Währung von Franz W. vom 30.11.2003 09:17:34
- AW: Formatierung als Währung - von Sigi am 30.11.2003 10:27:47
- Ah, jetzt versteh ich.. - von Franz W. am 30.11.2003 11:03:33
- Ah, jetzt versteh ich.. - von Franz W. am 30.11.2003 11:03:33
- AW: Formatierung als Währung - von Sigi am 30.11.2003 10:27:47
 |
Betrifft: Formatierung als Währung
von: Franz W.
Geschrieben am: 30.11.2003 09:17:34
Guten Morgen,
ich hab Schwierigkeiten mit der Formatierung einer Zelle als Währung bzw. mit der Ausgabe des Wertes in VBA:
- die Zelle ist formatiert als Währung: 123€, 2 Nachkommastellen
- in VBA wird der Wert der Zelle eingelesen in die Variable "Gebuehr",
Dim Gebuehr as Currency
Aber ausgegeben wird eine Zahl ohne Nachkommastellen (und schon gar nicht mit Währungssymbol).
Geht das nicht als "Währung", muss ich das als "Zahl" nehmen? Oder was mache ich falsch?
Vielen Dank schon mal im Voraus und Grüße
Franz
 |
Betrifft: AW: Formatierung als Währung
von: Sigi
Geschrieben am: 30.11.2003 10:27:47
Hallo Franz,
es kommt darauf an, wie du die Variable definiert hast.
Numerische Variablen (currency, single, doulbe, etc.) nehmen i m m e r nur den Wert
des Excelfeldes an!
Du brauchst eine Variable des Typs string um auch Formatierungen mit aufnehmen zu können
oder du musst für die Ausgabe ein Format mitgeben.
Beispiel:
Sub Test()
Dim FeldInhalt As String
Dim Währung As Currency
FeldInhalt = Range("C6").Text
Währung = Range("C6").Value
MsgBox FeldInhalt & vbCr & _
Währung & vbCr & _
Format(Währung, "#,##0.00 €")
End Sub
Gruß
Sigi
|
Betrifft: Ah, jetzt versteh ich..
von: Franz W.
Geschrieben am: 30.11.2003 11:03:33
Hallo Sigi,
ja, da klappt! Und ich hab's glaub ich auch kapiert. Ganz vielen Dank dafür.
Beste Grüße
Franz
| |