WorksheetFunction.Substitute (Excel)

Ersetzt in einer Textzeichenfolge „Alter_Text“ durch „Neuer_Text“.

Substitute (Arg1, Arg2, ..., Arg4)

Dim strArg1 As String: strArg1 = 
Dim strArg2 As String: strArg2 = 
Dim strArg3 As String: strArg3 = 
Dim strSubstitute As String
strSubstitute = WorksheetFunction.Substitute(Arg1:=strArg1, Arg2:=strArg2, Arg3:=strArg3)

Arguments

Arg1 (String) - Text - der Text oder der Bezug auf eine Zelle mit Text, für die Sie Zeichen ersetzen möchten.

Arg2 (String) - Old_text – der Text, den Sie ersetzen möchten.

Arg3 (String) - New_text – der Text, durch den Sie old_text ersetzen möchten.

Arg4 - ntes_Auftreten - gibt an, welches Vorkommen von Alter_Text durch Neuer_Text ersetzt werden soll