Huhu Zusammen, ich versuche eine Zelle in Excel und VBA aus Excel 2000 eine Zelle als Währung zu formatieren.
Die Währung sollte dynamisch sein und kommt später aus einer Combobox.
Mein Codeschnipsel:
Dim waehrung as string
waehrung = "EUR"
Worksheets("Tabelle1").Range("A1:A5").NumberFormat = "#,##0.00 \" & waehrung
Ist die Variable waehrung mit "EUR" wie im Beispiel befüllt oder setze ich "SFR" ein, funktioniert die Formatierung, wenn ich allerdings "USD" oder "YEN" eingebe, bekomme ich eine Fehlermeldung:
Laufzeitfehler: 1004 - Die NumberFormat-Eigenschaft, des Range-Objektes kann nicht festgelegt werden.
Kann mir jemand schreiben wo der Fehler ist?
Habt Dank auf bald
Thomas |