Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 10:08:11
Summieren von Zellen mit bedingter Formatierung
26.04.2024 09:08:00
Export alle Tabellenblätter als csv - in bestimmten Ordner
26.04.2024 08:56:40
Über alle Spalten nur €-Werte zählen
26.04.2024 08:08:24
Pivot Vormonatsveränderung
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1448to1452
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1448to1452
1448to1452
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Punkt durch Komma erstetzen OHNE Replace

Punkt durch Komma erstetzen OHNE Replace
06.10.2015 10:19:04
Hannes
Hallo Zusammen, hoffe ihr könnt mir helfen :S
ich habe folgendes Problem:
Ich muss ein . durch ein , ersetzen. Das funktioniert auf den Desktop PC super schnell mit Hilfe der Replace Funktion.
Auf den Server (wo das Makro später laufen soll) dauert dies aber ca. 5 Minuten.
Gibt es eine andere Möglichkeit ein Punkt durch ein Komma zu ersetzen ohne die Replace Funktion zu verwenden?

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Punkt durch Komma erstetzen OHNE Replace
06.10.2015 10:55:26
Daniel
Hi
kommt darauf an, was du machen willst.
Englische Zahlen mit Punkt als Dezimalzeichen in deutsche Zahlen, welche Excel erkennt, wandeln?
Wenn ja und nur wenige Spalten betroffen sind, könnte man die Umwandlung auch mit Text in Spalten machen.
Ansonsten ist die Excel-Menüfunktion Ersetzen (Replace) schon das schnellste was ich kenne.
Beachte, dass VBA und Excel englisch miteinander reden, dh. wenn du englische in deutsche Zahlen wandeln willst, musst du in VBA den Punkt durch einen Punkt ersetzen.
Gruß Daniel

nicht ganz richtig bei Textzahlen
06.10.2015 11:14:48
Tino
Hallo,
das stimmt nicht so ganz,
es kommt auf die Ländereinstellung an wie bei einer Textzahl das Komma verwendet wird.
Beispiel
Sub Bsp()
Dim sZahl$, PunktOrKomma$
sZahl = "0.5"
MsgBox sZahl * 2
sZahl = "0,5"
MsgBox sZahl * 2
PunktOrKomma = IIf("0.5" * 2 = 1, ".", ",")
sZahl = "0.5"
MsgBox Replace(sZahl, ".", PunktOrKomma) * 2
sZahl = "0,5"
MsgBox Replace(sZahl, ".", PunktOrKomma) * 2
End Sub
Gruß Tino

Anzeige
AW: nicht ganz richtig bei Textzahlen
06.10.2015 11:23:57
Daniel
Hi Tino
ich ging eigentlich von Range().Replace aus.
Gruß Daniel

ach so, ich von Text. oT.
06.10.2015 11:59:54
Text.

AW: Punkt durch Komma erstetzen OHNE Replace
06.10.2015 12:26:20
Hannes
Erstmal danke für eure Hilfe!!
Ich glaube ich muss mein Beispiel konkreter machen :S
Ich habe folgenden Daten als TEXT vorliegen:
A | B | C | D | E | F
0 |8.68 |29.6 |300 | 1001.89|569.97094
.
.
.
Insgesamt sind es ca. 8000 Zeilen.
Ich brauche die in Werte als ZAHL mit zwei Dezimalstellen und nicht als TEXT.

AW: Punkt durch Komma erstetzen OHNE Replace
06.10.2015 12:40:21
Daniel
Hi
wenns reicht, dass die 2 NK-Stellen angezeigt werden und die Werte aber original erhalten bleiben dann:
With Range("A:F")
.Replace ".", ".", Lookat:=part
.Numberformat = "0.00"
end with
oder ohne Replace, auch hier mit Beibehaltung der originalwerte: 
Dim C As Range
For Each C In Range("A:F").Columns
C.TextToColumns _
Destination:=C(1), _
DataType:=xlFixedWidth, _
FieldInfo:=Array(0, 1), _
DecimalSeparator:=".", _
ThousandsSeparator:=","
Next
Range("A:F").NumberFormat = "0.00"
wenn die Zahlen auch hart gerundet werden sollen (nicht nur angezeigt),dann so: 
Dim arr
Dim z As Long, s As Long
Dim x
With ActiveSheet.UsedRange.Resize(, 6)
arr = .Value
For z = 1 To UBound(arr, 1)
For s = 1 To UBound(arr, 2)
x = Val(arr(z, s))
If x  0 Then arr(z, s) = WorksheetFunction.Round(x, 2)
Next s
Next z
.Value = arr
End With
Gruß Daniel
Anzeige

308 Forumthreads zu ähnlichen Themen

Eingabe formatiert zurückgeben (Komma und Punkt)
Lemmi

Hallo zusammen,
ich möchte Euch eine wahrscheinlich einfache Frage stellen, die ich mir gerade mal nicht beantworten kann!
Wie stelle ich sicher das auch wenn ein Punkt als Trennzeichen eingegeben worden ist, am Ende immer ein Komma in der Zelle steht?
Eingabe 10,0........Ausgabe...
07.08.2008 21:35:00
Thread-ID: 1000105
5 Beiträge
Anzeige
"#Wert!" suchen, durch "" ersetzen
Detlef

Hallo Experten,
warum lässt sich im VBA der Ausdruck "#Wert!" nicht durch "" ersetzen.
(im Excel geht es)
mit "1234567" geht es auch ohne Probleme ?
Selection.Replace What:="#WERT!", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
macht er nich...
29.08.2008 11:23:20
Thread-ID: 1005759
6 Beiträge
, ersetzen durch einen .
andreas

Hallo,
wenn ich in einer Spalte ein , durch einen . ersetzen will verschiebt sich der Punkt um 2 Stellen nach links und macht dann z. B. aus 14,7204 dann 0.147204.
Kann mir jemand sagen wie ich aus der Zahl mit dem Komma exakt die Zahl mit dem Punkt bekomme.
Vielen Dank
Andreas<...
07.09.2008 18:47:00
Thread-ID: 1007995
3 Beiträge
Anzeige
Eintrag z.B. KW 52 durch Datum ersetzen
Hubert

Hallo liebe Forumsmitglieder,
aktuelle habe ich eine Frage zur Lösung folgender Aufgabenstellung:
In einer Zelle habe ich den Eintrag KW 51, KW 52,....
In der darunterliegenden zelle möchte ich automatisch das Datum dieser Woche eintragen:
Für die KW 15 : 15.12. - 21.12.08
...
18.12.2008 10:40:00
Thread-ID: 1033798
3 Beiträge
internetseite Punkt ist ein komma
Michael

Hallo!
Ich versuche die internetseite http://www.ls-d.de/Kursabfragen.15.0.html die Daten auszuwerten. Jedoch gibt es nach der Aktualisierung immer wieder den Punkt aus. 23.203 damit kann man keine Rechenoperation ausführen. Gibt es eine Möglichkeit die Werte mit einem Komma darzustellen au...
28.01.2009 17:27:33
Thread-ID: 1044643
4 Beiträge
TextBox Komma in Punkt umwandeln
Heinz

Hallo Leute
Wie kann ich bitte,wenn in Textbox6 ein Komma eingegeben wird, das es automatisch auf Punkt wechselt ?
Gruß
Heinz
28.01.2009 17:42:00
Thread-ID: 1044650
3 Beiträge
CSV selbst erstellt - Komma statt Punkt
Philipp

Hallo an alle!
Ich erzeuge über ein - im Archiv gefundenes - Makro aus den Daten eine CSV-Datei.
Für die verschiedenen Spalten brauch ich eigene Formatierungen (zB Spalte 2: Datumsformat mit ".", klappt).
Wie bekommen ich es hin, dass er bei den Werten (Spalten 4, 5 und 6) ein Komm...
29.07.2009 11:08:31
Thread-ID: 1092173
7 Beiträge
Punkt in xlText-file per vba durch Komma ersetzen
Bernd


Liebe Excel-Gemeinde,
mit dem nachstehenden Code wird ein Blatt mit xls-Format in ein Blatt txt-Format konvertiert.
With wbZiel
Application.DisplayAlerts = False
.SaveAs strFile, _
FileFormat:=xlText, CreateBackup:=False 'Zeile neu aufgenommen f. tabstopp getrennt<...
08.01.2010 14:27:26
Thread-ID: 1128272
7 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
4
5
2
6
2
3
2
6
6
3
2
5
2
3
5
4
8
2
2
4
2
1
1
4