Hallo xlKing,
danke für Deine Hilfe !! - bin vorher noch nicht dazu gekommen.
ich brauche aber wohl noch etwas mehr davon ;-)
Die Function InQuotes findet jetzt "Der Müller geht aus", aber nicht "Müller" allein...
Ich brauch das zum Einfügen von Fussnoten. Die Codewörter sttehen in einer XLS und wenn die gefunden werden, wird eine docx als Fußnote eingefügt - das klappt auch alles...
Es wäre sehr hilfreich, dass wenn die Wörter in "Anführungszeichen" gefunden wurden, die Suche weitergeht, bis sie im normalen Fleißtext stehen, oder auch nicht und das textende erreicht ist
bislang habe ich das mit einem GotoWEITERSUCHEN: vor
WEITERSUCHEN:
With Selection.Find
gemacht. Damit läuft das aber in eine Endlosschleife, wenn die Wörter in "Anführungszeichen" gefunden wurden und in der Loop die Goto steht
Dieses WEITERSUCHEN habe ich dafür verwendet, die Fussnote an die "richtige" Stelle zu kriegen - auch insbesondere für diese Anführungszeichenproblematik - vielleicht brauch ich das garnicht mehr. Ist zu lange her, dass ich das programmiert habe und noch den exakten Sinn weiß...
Hoffe, das ist nicht zu kompliziert ausgedrückt...
Danke DC
|