Bindestrich im Text suchen und löschen

Question

Hallo,

ich möchte per Makro einen Bindestrich in einem Text suchen und anschliessend löschen.

In Exel geht es mit der Funktion Wechseln(), englisch SUBSTITUTE(), jedoch für ein Makro habe ich diese Funktion nicht gefunden.

Kann mir da jemand weiterhelfen

Gruß

Helmut

Answer 1

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

Weitere Erläuterung in der VBA-Hilfe.

mfg, Massaraksch

Answer 2

Obige Replace-Funktion wird auf String-Variablen (-> expression) angewendet.

Es gibt auch eine Replace-Methode für Ranges (Zellbereiche):

Ausdruck.Replace(What, Replacement, LookAt, SearchOrder, MatchCase, MatchByte, SearchFormat, ReplaceFormat)

mfg, Massaraksch

Answer 3

Hallo,

besten Dank, war das was ich suchte

Gruß

Helmut

Answer 4

Hallo Helmut,

mit Wechseln() geht das so.

Option Explicit

Sub Bindestrich_weg()
Dim rngC As Range
Application.EnableEvents = False
For Each rngC In Range("A1:A10")
rngC.Value = WorksheetFunction.Substitute(rngC.Value, "-", "")
Next
Application.EnableEvents = True
End Sub

Dieser Code entfernt den Strich im Bereich A1:A10

Gruss
Rainer