VBA, Word - Suchen/Ersetzen nur 1 Wort
29.04.2020 12:22:07
Sebastian
Set objDoc = appwd.Documents.Open(datei)
With objDoc.Content.Find
.text = "01.01.2020"
.Forward = True
.Replacement.text = CDate("01.03.2020")
.Wrap = wdFindContinue
.Execute Replace:=wdReplaceall
End With
Ich will nun aber, dass nur das erste gefundene Datum geändert wird. Ich dachte erst an " .Execute Replace:=wdReplaceOne", aber dann wird gar kein Wort mehr ersetzt.
Hat jemand einen Tipp? Danke!