Bestimmte Zeichen einer Zelle verändern-Excel-VBA

Weiß jmd wie man bestimmte Zeichen einer Zelle mit einem VBA-Code in Excel verändert?

Also zb wenn in einer zelle „abc123“ steht, die 1 durch eine 2 ersetzen, sodass: abc223

Temp = Replace(„abc123“, „1“, „2“)

Muss das in VBA sein? Es ginge auch eine Verknüpfung gängiger Formeln (angenommen Dein Ausgangswert steht in Zelle A1):

=VERKETTEN(TEIL(A1;1;3);TEIL(A1;4;1)+1;TEIL(A1;5;3))

Hallo,
bin leider dafür nicht der richtige Ansprechpartner, vielleicht kann dir jemand anderes weiterhelfen. Sorry,
herzlich,
Kch.

hallo jondoeon,

bereich markieren,
menue ->bearbeiten ->ersetzen oder (Strg+H)
im fenster „suchen und ersetzen“ die relevanten zeichen eingeben.

gruß

Hallo,

angenommen du willst 10 Zellen nacheinander überprüfen, geht das z.B. so:

Sub test()
For i = 1 To 10
dummy = Cells(i, 1).Text
result = Search(1, dummy)
If result > 0 Then '1 wurde irgendwo gefunden
Rückgabewert = Replace(dummy, „1“, „2“)
End If
Next i
End Sub

Statt der search kannst du auch das find() nehmen. Funktioniert ganz ähnlich

Grüße,
Andre

Also zb wenn in einer zelle „abc123“ steht, die 1 durch eine 2
ersetzen, sodass: abc223

Hi jondoejon!

Ausschnitt aus der Excel-Hilfe:

_"
Replace-Funktion

Gibt eine Zeichenfolge zurück, in der eine festgelegte, untergeordnete Zeichenfolge mit einer festgelegten Häufigkeit durch eine andere untergeordnete Zeichenfolge ersetzt wurde.

Syntax
Replace(expression, find, replace[, start[, count[, compare]]])

"_

Beispiel:
In Zelle A1 steht der Wert „abc123“ drin.

cells(1,1) = replace(cells(1,1), „1“, „2“)

Somit hat sich der Wert von Zelle A1 auf „abc223“ verändert.

Ich hoffe dir damit weitergeholfen zu haben. Und noch ein kleiner Tipp am Rande. Schau mal in die Hilfe (F1) rein. Da stehen oft nützliche Tipps drin :wink:

Lg neotokyo_1

Einfach mal die VBA Hilfe für „Replace“ Funktion ansehen
Gruss