Anzeige

Anzeige

HERBERS

Excel-Forum (Archiv)

20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Vorheriger Thread

Vorheriger Thread

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Nächster Thread

Nächster Thread

Vorwärts blättern

Anzeige

Inhaltsverzeichnis

ersetzten innerhalb einer stringvariable

Forumthread: ersetzten innerhalb einer stringvariable
5 Beiträge zu diesem Forumthread
Anzeige
Threads zu ähnlichen Themen

Forumthread: ersetzten innerhalb einer stringvariable

ersetzten innerhalb einer stringvariable

07.02.2016 17:09:12

matthias

Hallo ihr Helferlein
suche den Befehl, der innerhalb einer srting-variable alle , (Kommas) mit . (Punkte) ersetzt. - Ich habe in einer Tabelle Längengrad und Breitengrad getrennt gespeichert. als Abfrage bei google apis möchte muss ich im IE die Trennung mit Punkten eingeben 48.12342 udn 11.32434 anstelle der Kommas.
string2 = Replace(string1, ",", ".") geht bei mir nicht?
wer kann helfen?
Vielen Dank
VG Matts

Anzeige

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: ersetzten innerhalb einer stringvariable

07.02.2016 17:11:53

Hajo_Zi
AW: ersetzten innerhalb einer stringvariable

07.02.2016 17:30:15

Hajo_Zi
Teste das mal mit folgender EreignisProzedur, ...

07.02.2016 19:36:36

Luc:-?
If .count=2 and .columns.count = 1 then ..

07.02.2016 23:16:10

Gerd
Das ist kein Anwendungs-, sondern nur ein ...

08.02.2016 04:58:50

Luc:-?

Anzeige

AW: ersetzten innerhalb einer stringvariable

07.02.2016 17:11:53

Hajo_Zi

ich benutze immer
Application.Substitute()

AW: ersetzten innerhalb einer stringvariable

07.02.2016 17:30:15

Hajo_Zi

mit Code

Option Explicit
Sub n()
Dim StWert As String
StWert = "11,32434"
StWert = Application.Substitute(StWert, ",", ".")
MsgBox StWert
End Sub

Anzeige

Teste das mal mit folgender EreignisProzedur, ...

07.02.2016 19:36:36

Luc:-?

…Matthias:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim xZ$(1, 0)
xZ(0, 0) = Replace(Target.Cells(1).Text, ",", ".")
xZ(1, 0) = WorksheetFunction.Substitute(Target.Cells(2).Text, ",", ".")
Target.Offset(0, 1) = xZ
End Sub

Das Target, also die Quelle für die Aktion, muss 2 Zellen einer Spalte umfassen, um beide Varianten gleichzeitig testen zu können. Das Ergebnis wird in der NebenSpalte ausgegeben.
Das gleiche Ergebnis erhält man übrigens mit den ZellFmln …
=ERSETZEN(A1;3;1;".") → engl =REPLACE(A1,3,1,".") bzw
=WECHSELN(A2;",";".") → engl =SUBSTITUTE(A2,",",".")
Gruß, Luc :-?
Besser informiert mit …

Anzeige

If .count=2 and .columns.count = 1 then ..

07.02.2016 23:16:10

Gerd

Dann gehört die Restriktion für Target in die Prozedur.
Gruß Gerd

Das ist kein Anwendungs-, sondern nur ein ...

08.02.2016 04:58:50

Luc:-?

…TestPgm, Gerd,
das 1. zeigen soll, wie so etwas angewendet wird, und 2., dass es idR schnurz ist, ob hier die vbFkt Replace oder die WsFkt .Substitute angewendet wird. Hätte ich ein fertiges Pgm liefern wollen, hätte ich das wohl nicht in Form eines SchnellTests per EventProc getan und dann noch Teste mal geschrieben (wäre ganz untypisch für mich)! Ich nahm an, dass das deutlich zu erkennen wäre, denn das wäre ja sonst auch ziemlich sinnfrei — meinste nicht auch… :-]
Morrn, Luc :-?

Anzeige

Forumthreads zu verwandten Themen

Speichern unter in festgelegtem Pfad

Hallo Zusammen
Ich habe vor einiger Zeit mit großer Hilfe aus diesem Forum folgendes Makro erstellt.
Es funktioniert einwandfrei, nur möchte ich jetzt, dass das Word Dokument automatisch in einem bestimmten Pfad abgespeichert wird.
Mit meinem VBA Wissen habe ich nur immer den Namen...

12.02.2020 11:22:30

Thread-ID: 1739914

Problem beim Öffnen von Word aus Excel

Hallo,
ich benötige eure Hilfe. Ich habe auf einem Rechner eine Excel-Datei mit Excel 15.0 und auf dem anderen Rechner Excel 16.0.
Mit dieser Excel-Datei möchte ich eine Word-Vorlage öffnen, welche einen Zugriff auf Excel macht.
Wenn ich diese Datei veranlasse die Wordvorlage zu öffnen k...

07.11.2021 14:07:44

Thread-ID: 1855415

Alle nationalen Sonderzeichen in ASCII-Äquivalente umwandeln

Hallo in die Runde,

ich möchte gerne in einer Excel-Tabelle alle nationalen Sonderzeichen (vor allem aus der deutschen, der polnischen und der türkischen Sprache) durch ihre jeweiligen ASCII-Äquivalente ersetzen. Ich hatte folgendes schon mal probiert:

Function EntferneAkzen...

11.09.2025 15:56:33

Thread-ID: 2018519

Text-Datei: letzte Leerzeile löschen

Hallo!
Der folgende Code ersetzt bestimmte Zeichen in einer CVS-Datei.
Leider hat die Datei am Ende immer eine Leerzeile, die ich manuell löschen muss.
Gibt eine VBA-Lösung?
Merci für deine Hilfe!
Gregor
Sub Read_Extern_File_and_Replace_Signs() ' Trennungszeichen Strich...

28.08.2006 16:07:57

Thread-ID: 796301

VBA: Makro-Zeile änder

Nabend
vor einiger Zeit hab Ich nen Code via Googe gefunden,
diesen nutze Ich hin u. wieder.
Ist es Möglich an statt im ganzen Modul nur in Sub´s zu Suchen?
Option Explicit Private Sub Cbu_Suchen_Click() Zeichen_im_VBA_Modul_ersetzen ' Zeichen_in_den_VBA_Modulen_ersetzen Unlo...

10.01.2020 21:22:16

Thread-ID: 1733421

Formel zu lang beim Suchen und ersetzen

Hallo zusammen,
wie bekomme ich es hin in Zellen zu suchen und zu ersetzen wenn dort über 600 Zeichen vorhanden sind. Es kommt dann beim ersetzen immer die Meldung "Formel zu lang".
Wie geht das Über VBA, bzw. Wo ist der Fehler?
Sub Suchen_Ersetzen() Dim s_Such As String Dim s_Erse...

17.08.2004 23:55:08

Thread-ID: 471336

Anzeige

Suchen / Ersetzen VBA

Hallo zusammen,
ich habe folgendes Makro:
Sub Ersetzen_Funktion() Dim s_Such As String Dim s_Ersetz As String Dim Blatt As Worksheet s_Such = InputBox("Geben Sie den Suchbegriff ein!") s_Ersetz = InputBox("Geben Sie den Ersetzbegriff ein!") For Each o In Range("A1", "B6") o.Value = Rep...

27.02.2006 21:32:25

Thread-ID: 738396

String überprüfen und Stellen ersetzen?

Hallo Leute,
hier im Beispiel habe ich diesen String "DLH-DZA-PG-##-H001-GU-EG0-00-01-#-##-FREIGABE"
Per VBA soll überprüft werden, ob diese Datei "P:\Einstellungen\tag_read.txt" existiert.
Falls nicht, dann soll die Routine abgebrochen werden.
Beispiel Inhalt einer tag_read.t...

07.11.2020 20:01:50

Thread-ID: 1791841

2 Dim Anweisungen in einer SUB Modul1 mit 2 Tabellenblättern

Hallo Excel Freaks und Könner von VBA,

muss mal wieder lästig sein....es hört halt nicht auf mit den Fragen in der Gemeinschaft.

So: ich habe ein Modul1, da laufen mehrere Subs ab
Die Dim Anweisung 1:
Dim xJahr As String
' Wichtiger Hinweis, die DIM Zuweisung muss mit S...

23.09.2025 11:13:39

Thread-ID: 2018973

Txt - Text suchen und ersetzen VBA

Hie zusammen,
ich hoffe mir kann hier jemand helfen, ich habe einen Code aus dem Internet (oder sogar von der Seite hier) und den muss ich leider ein bisschen anpassen. Der Code sucht in einer Textdatei nach einer bestimmten Zeichenfolge STxtA und ersetzt diesen Text durch STxtB. Soweit so...

30.10.2008 14:09:28

Thread-ID: 1020573

Weitere verwandte Threads

In einen String ein Zeichen ersetzen VBA

VBA-Vergleichsoperatoren

CSV in VBA speichern / Formatierung

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

Anzeige

Anzeige

Live-Forum - Die aktuellen Beiträge

Datum

Titel

14.05.2026 13:31:09

Zeichen ausblenden

14.05.2026 09:50:42

Makro für MacOs

13.05.2026 19:14:18

Gleichheitszeichen

13.05.2026 14:24:56

VBA Projekt Passwort automatisch eingeben

13.05.2026 08:49:41

Reale Berechnung ohne Nachkommawerte

Keine passende Antwort im Forumarchiv gefunden?

Stelle deine Frage im Live-Forum