Forums Neueste Beiträge
 

Suchen & Ersetzen in Fokus bringen

04/02/2009 - 15:22 von Frank Spade | Report spam
Guten Tag,

ich habe ein Makro geschrieben um eine Textpassage durch eine Andere zu
ersetzen. Wie kann ich dafür sorgen, dass die Ersetzungsstelle im Window
angezeigt wird? Ich hab's u.a. wie folgt versucht, aber damit keinen Erfolg:

Selection.GoTo wdGoToLine, wdGoToAbsolute, 1 'Gehe zu Zeile 1
Selection.Find.ClearFormatting
With Selection.Find
.Text = "such mich"
End With
ActiveWindow.ScrollIntoView Selection.Find

Herzlichen Gruß

Frank
 

Lesen sie die antworten

#1 Bernhard Sander
04/02/2009 - 16:20 | Warnen spam
Hallo Frank,

ich habe ein Makro geschrieben um eine Textpassage durch eine Andere zu
ersetzen. Wie kann ich dafür sorgen, dass die Ersetzungsstelle im Window
angezeigt wird? Ich hab's u.a. wie folgt versucht, aber damit keinen Erfolg:

Selection.GoTo wdGoToLine, wdGoToAbsolute, 1 'Gehe zu Zeile 1
Selection.Find.ClearFormatting
With Selection.Find
.Text = "such mich"


hier fehlt noch die Zeile
.Execute
End With
ActiveWindow.ScrollIntoView Selection.Find



Gruß
Bernhard Sander

Ähnliche fragen