Ersetzungsobjekt (Word)
Stellt die Kriterien für das Ersetzen für ein Suchen-und-Ersetzen-Vorgang dar. Die Eigenschaften und Methoden des Replacement-Objekts entsprechen den Optionen im Dialogfeld Suchen und Ersetzen.
HinwBemerkungeneise
Verwenden Sie die Replacement-Eigenschaft , um ein Replacement-Objekt zurückzugeben. Im folgenden Beispiel wird das nächste Auftreten des Worts "hi" durch das Wort "hello" ersetzt.
With Selection.Find
.Text = "hi"
.ClearFormatting
.Replacement.Text = "hello"
.Replacement.ClearFormatting
.Execute Replace:=wdReplaceOne, Forward:=True
End With
Legen Sie zum Suchen und Ersetzen der Formatierung sowohl den Suchtext als auch den Ersetzungstext auf leere Zeichenfolgen ("") fest, und legen Sie das Format-Argument der Execute-Methode auf True fest. Im folgenden Beispiel wird die gesamte Fettformatierung im aktiven Dokument entfernt. Die Bold-Eigenschaft ist True für das Find-Objekt und False für das Replacement-Objekt.
With ActiveDocument.Content.Find
.ClearFormatting
.Font.Bold = True
.Text = ""
With .Replacement
.ClearFormatting
.Font.Bold = False
.Text = ""
End With
.Execute Format:=True, Replace:=wdReplaceAll
End With
Methoden
Name |
---|
ClearFormatting |
Eigenschaften
Name |
---|
Anwendung |
Creator |
Font |
Frame |
Highlight |
LanguageID |
LanguageIDFarEast |
NoProofing |
ParagraphFormat |
Parent |
Style |
Text |
Siehe auch
Referenz zum Word-Objektmodell
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.
Feedback
https://aka.ms/ContentUserFeedback.
Bald verfügbar: Im Laufe des Jahres 2024 werden wir GitHub-Issues stufenweise als Feedbackmechanismus für Inhalte abbauen und durch ein neues Feedbacksystem ersetzen. Weitere Informationen finden Sie unterFeedback senden und anzeigen für