Gewusst wie: Suchen und Ersetzen von Text in Dokumenten
Aktualisiert: November 2007
Betrifft |
---|
Die Informationen in diesem Thema gelten nur für die angegebenen Projekte und Versionen von Visual Studio Tools for Office von Microsoft Office. Projekttyp
Microsoft Office-Version
Weitere Informationen hierzu finden Sie unter Verfügbare Features nach Anwendung und Projekttyp. |
Mithilfe eines Find-Objekts können Sie ein Microsoft Office Word-Dokument durchlaufen und nach einem bestimmten Text oder eine bestimmten Formatierung oder einen Stil suchen. Mithilfe der Replacement-Eigenschaft können Sie alle gefundenen Elemente ersetzen.
Im folgenden Code wird die aktuelle Auswahl durchsucht. Dabei werden alle Vorkommen der Zeichenfolge find me durch die Zeichenfolge Found ersetzt. Wenn Sie dieses Beispiel verwenden möchten, führen Sie es von der ThisDocument-Klasse oder der ThisAddIn-Klasse im Projekt aus.
Beispiel
Private Sub SearchReplace()
Dim FindObject As Word.Find = Application.Selection.Find
With FindObject
.ClearFormatting()
.Text = "find me"
.Replacement.ClearFormatting()
.Replacement.Text = "Found"
.Execute(Replace:=Word.WdReplace.wdReplaceAll)
End With
End Sub
private void SearchReplace()
{
Word.Find findObject = Application.Selection.Find;
findObject.ClearFormatting();
findObject.Text = "find me";
findObject.Replacement.ClearFormatting();
findObject.Replacement.Text = "Found";
object replaceAll = Word.WdReplace.wdReplaceAll;
findObject.Execute(ref missing, ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing, ref missing,
ref replaceAll, ref missing, ref missing, ref missing, ref missing);
}
Kompilieren des Codes
Die Find-Klasse verfügt über eine ClearFormatting-Methode. Die Replacement-Klasse verfügt ebenfalls über eine eigene ClearFormatting-Methode. Wenn Sie einen Such- und Ersetzungsvorgang ausführen, müssen Sie die ClearFormatting-Methode beider Objekte verwenden. Wenn Sie diese Methode nur beim Find-Objekt anwenden, erhalten Sie im Ersatztext möglicherweise unerwartete Ergebnisse.
Ersetzen Sie mithilfe der Execute-Methode des Find-Objekts jedes gefundene Element. Geben Sie die zu ersetzenden Elemente mit dem Replace-Parameter an. Dieser Parameter kann einen der folgenden WdReplace-Werte aufweisen:
wdReplaceAll: Ersetzt alle gefundenen Elemente.
wdReplaceNone: Ersetzt keines der gefundenen Elemente.
wdReplaceOne: Ersetzt das erste der gefundenen Elemente.
Siehe auch
Aufgaben
Gewusst wie: Suchen nach Text in Dokumenten
Gewusst wie: Festlegen von Suchoptionen in Word
Gewusst wie: Durchlaufen gefundener Elemente in Dokumenten
Gewusst wie: Wiederherstellen der Auswahl nach Suchvorgängen