---

Hi Leute,

ich hab mal wieder ein kleines aber feines Problem:
MIttels

Dim VOLUME_V5 As Double
Dim VOLUME_V5_1 As String, VVV As String
VOLUME_V5_1 = parameters2.Item("VOLUME_V5").ValueAsString
VVV = Split(VOLUME_V5_1, "mm")
VOLUME_V5 = FormatNumber(Round(VVV(0),0),0)

hole ich mir von 3D Modellen das Volumen aus den Properties, entferne die Einheit sowie formatiere und runde den Wert; dieser wird im weiteren Verlauf des Macros in den Schriftkopf geschrieben.

Mein Problem:
Ist das Volumen >= 1000 wird beim Formatieren (FormatNumber) ein 1000er Trennzeichen (z.B. 1.234) eingefügt; dieses möchte ich jedoch nicht im Wert haben. Sprich ich möchte dass das Ergebnis 1234 und nicht 1.234 ist.

Hat jemand eine Idee wie ich das Einfügen des Trennzeichens erreichen kann?

Danke und Gruß
Sven

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ich vermute das Catia hier auf die Windows Regions- und Sprachoptionen zugreift.
We wäre vielleicht mal ein Versuch wert die Windows optionen entsprechen um zu stellen?

------------------
- Robert

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi Robert,

leider sind die Windows Settings bei uns im Geschäft komplett gesperrt und werden definitiv nicht geändert werden...

Gruß
Sven

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Wenn es nur darum geht der Punkt aus dein String zu löschen:
VVV2 = Replace(VVV,".","")

------------------
- Robert

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP