TextFrame nicht in StoryRanges
09.11.2016 10:38:20
Max2
Ich ersetzte ein paar Begriffe in Word mit Variablen
Ich benutze StoryRanges um im kompletten Dokument das Wort zu finden und zu ersetzen
Ich habe 2 TextFrames im Dokument, im ersten werden die Wörter ersetzt, im zweiten auf der letzten Seite des Dokuments aber nicht.
Hier ein Stück Code:
For Each rngDoku In objDoc.StoryRanges
With rngDoku.Find
.Text = RTe(0)
.Replacement.Text = Str(i)
.Execute Replace:=wdReplaceAll, Forward:=True, _
Wrap:=wdFindContinue