FindReplace.FindText 屬性 (Publisher)

會設定或擷取 字串 代表的文字以找出指定的範圍或選取範圍中。 讀取/寫入。

語法

運算式。FindText

表達 代表 FindReplace 物件的 變數。

傳回值

字串

註解

FindText 屬性會傳回選取範圍的純文字、 以未格式化的文字。 當您設定此屬性時，會指定搜尋文字。 您可以藉由指定適當的字元碼搜尋特殊字元。 例如， ^p 會對應至段落標記，並對 ^t 應至定位字元。

FindText 屬性的預設值為空字串。 因為只支援文字搜尋，所以必須明確設定 FindText 以避免執行階段錯誤。

範例

本範例會將選取範圍中所有出現的 This 一詞取代為每個開啟出版物中的該字。

Dim objDocument As Document 
 
For Each objDocument In Documents 
 With objDocument.Find 
 .Clear 
 .MatchCase = True 
 .FindText = "This" 
 .ReplaceWithText = "That" 
 .ReplaceScope = pbReplaceScopeAll 
 .Forward = True 
 .Execute 
 End With 
Next objDocument 

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。