Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
492to496
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
492to496
492to496
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Formatierte Zahlen

Formatierte Zahlen
29.09.2004 20:08:09
Rainer
Hallo,
eine Frage zur Formatierung von Zahlen:
e = 13,5
Cells(1, 1) = "Der Preis ist " & e
Und da soll stehen: "Der Preis ist 13.5"
Das Komma soll ein Punkt und kein Beistrich sein.
Kann man das mit VBA hinkriegen?
Wenn nicht:
Der Beistrich ist das Ergebnis der Formateinstellung in Excel (weiss aber nicht, wo). Diese sollte aber nicht geändert werden, denn der Anwender soll ja nicht mit neuen Einstellungen das Programm verlasen.
Wie oder wo kann man diese Einstellung ändern und am Programmende wieder zurücksetzen?
Danke,
Rainer.

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Formatierte Zahlen
29.09.2004 20:24:08
Rainer
Oder anders gefragt:
Wie kann ich erreichen, dass
e = Val("13,5")
der Wert 13,5 rauskommt?
Bei mir kommt eben 13, denn der Beistrich wird nicht als Kommepunkt gelesen.
AW: Formatierte Zahlen
29.09.2004 20:26:59
Ramses
Hallo
VBA kann nur englisch :-)
e = 13.5
Cells(1, 1) = "Der Preis ist " & e
Gruss Rainer
e = Val("13.5") oT
29.09.2004 20:28:38
Ulf
o
AW: Formatierte Zahlen
29.09.2004 20:27:57
Reinhard
Hi Rainer,

Sub ttt()
wert = 13
stelle = InStr(wert, ",")
If stelle <> 0 Then
wert = Left(wert, stelle - 1) & "." & Mid(wert, stelle + 1)
Else
wert = wert & ".0"
End If
Cells(1, 1) = "Der Preis ist" & wert
End Sub
Else
wert = wert & ".0"
kann entfallen wenn du keine NachmommaNull brauchst

Gruß
Reinhard
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige