當前位置:編程學習大全網 - 編程語言 - 請教vba中execute的用途用法

請教vba中execute的用途用法

Execute 方法

================================

應用於 Find 對象的 Execute 方法。

================================

運行指定的查找操作。如果查找成功,則返回 True。Boolean 類型。

expression.Execute(FindText, MatchCase, MatchWholeWord, MatchWildcards, MatchSoundsLike, MatchAllWordForms, Forward, Wrap, Format, ReplaceWith, Replace, MatchKashida, MatchDiacritics, MatchAlefHamza, MatchControl)

expression 必需。該表達式返回 Find 對象。

FindText Variant 類型,可選。指定需搜索的文本。可用空字符串 ("") 搜索格式,也可通過指定相應的字符代碼搜索特殊字符。例如,“^p”對應段落標記,“^t”對應制表符。有關可以使用的特殊字符列表,請參閱查找和替換文本或其他項。

MatchCase Variant 類型,可選。如果為 True,則指定查找文本區分大小寫。相當於“編輯”菜單“查找和替換”對話框中的“區分大小寫”復選框。

MatchWholeWord Variant 類型,可選。如果為 True,則查找操作只定位於完全匹配的單詞,而並非長單詞中的部分文字。相當於“查找和替換”對話框中的“全字匹配”復選框。

MatchWildcards Variant 類型,可選。如果為 True,則查找的文字包含特殊搜索操作符。相當於“查找和替換”對話框中的“使用通配符”復選框。

MatchSoundsLike Variant 類型,可選。如果為 True,則查找操作定位於與要查找的文字發音相近的單詞。相當於“查找和替換”對話框中的“同音”復選框。

MatchAllWordForms Variant 類型,可選。如果為 True,則查找操作定位於要查找的文字的所有形式(例如,查找“sit”的同時,還查找“sitting”和“sat”),相當於“查找和替換”對話框中的“查找單詞的各種形式”復選框。

Forward Variant 類型,可選。如果為 True,則向下(向文檔尾部)搜索。

Wrap Variant 類型,可選。如果搜索從不是文檔的起始位置開始,並已搜索到文檔的末尾(如 Forward 設置為 False,則相反),用本參數控制接下來的操作。當存在選定內容或區域,而又沒有在該選定內容或區域中找到搜索文字時,也可用本參數控制接下來的操作。可取下列 WdFindWrap 常量之壹。

WdFindWrap 可以是下列 WdFindWrap 常量之壹:

wdFindAsk 搜索完選定內容或者區域後,Microsoft Word 會顯示壹條消息,詢問是否搜索文檔的其他部分。

wdFindContinue 到達搜索區域的開始或者結尾時,繼續執行查找操作。

wdFindStop 到達搜索區域的開始或者結尾時,停止執行查找操作。

Format Variant 類型,可選。如果為 True,則查找操作定位於格式或帶格式的文本,而不是查找文本。

ReplaceWith Variant 類型,可選。替換文字。若要刪除由 Find 參數指定的文字,可使用空字符串 ("")。與 Find 參數相似,本參數也可以指定特殊的字符和高級搜索條件。若要將圖形對象或者其他非文本項指定為替換內容,可將這些項置於“剪貼板”上,然後將 ReplaceWith 指定為“^c”。

Replace Variant 類型,可選。指定執行替換的個數:壹個、全部或者不替換。可取下列 WdReplace 常量之壹。

WdReplace 可以是下列 WdReplace 常量之壹:

wdReplaceAll

wdReplaceNone

wdReplaceOne

MatchKashida Variant 類型,可選。如果為 True,則查找結果應與阿拉伯語文檔中區分 kashidas 的文本相匹配。由於選擇或安裝的語言支持不同(例如,英語(美國)),此參數可能不可用。

MatchDiacritics Variant 類型,可選。如果為 True,則查找操作在從右向左的語言的文檔中按照匹配音調符號來匹配文字。由於選擇或安裝的語言支持不同(例如,英語(美國)),此參數可能不可用。

MatchAlefHamza Variant 類型,可選。如果為 True,則在阿拉伯語文檔中,查找內容應與區分 Alef Hamzas 的文本相匹配。由於選擇或安裝的語言支持不同(例如,英語(美國)),此參數可能不可用。

MatchControl Variant 類型,可選。如果為 True,則在從右向左的語言的文檔中,查找內容應與區分雙向控制字符的文本相匹配。由於選擇或安裝的語言支持不同(例如,英語(美國)),此參數可能不可用。

說明

如果 MatchWildcards 為 True,可為 FindText 參數指定通配符和其他高級搜索準則,例如,“*(ing)”查找任何以“ing”結尾的單詞。

若要搜索符號字符,可鍵入脫字符號 (^)、零 (0),然後鍵入符號字符的代碼。例如,“^0151”對應壹條長劃線 (—)。

除非另外指定,否則替換文本將沿用文檔中被替換文本的格式。例如,如果用“xyz”替換字符串“abc”,那麽加粗“abc”將被加粗字符串“xyz”所替換。

另外,如果 MatchCase 為 False,那麽查找到的大寫文本將被大寫的替換文本替換,而無論搜索文本和替換文本是否大小寫。上例中,“ABC”將被“XYZ”替換。

===================================

應用於 Dialog 和 KeyBinding 對象的 Execute 方法。

===================================

對於 Dialog 對象:應用 Microsoft Word 對話框的當前設置。

對於 KeyBinding 對象:運行與指定的組合鍵相關的命令。

expression.Execute

expression 必需。該表達式返回以上壹個對象。

================================

應用於 MailMerge 對象的 Execute 方法。

================================

執行指定的郵件合並操作。

expression.Execute(Pause)

expression 必需。該表達式返回以上壹個對象。

Pause Variant 類型,可選。如果為 True,則會在找到壹個郵件合並錯誤時,暫停 Microsoft Word 的運行並顯示壹個疑難解答對話框;如果為 False,則會報告新文檔中的錯誤。

===================================

示例

==================================

當應用於 Find 對象時。

本示例查找並選擇下壹個“library”。

With Selection.Find

.ClearFormatting

.MatchWholeWord = True

.MatchCase = False

.Execute FindText:="library"

End With

===================================

本示例在活動文檔中查找所有的“hi”,並且將其替換為“hello”。

Set myRange = ActiveDocument.Content

myRange.Find.Execute FindText:="hi", _

ReplaceWith:="hello", Replace:=wdReplaceAll

=====================================

當應用於 Dialog 對象時。

下面的示例激活“段落”對話框的“換行和分頁”選項卡中的“與下段同頁”復選框。

With Dialogs(wdDialogFormatParagraph)

.KeepWithNext = 1

.Execute

End With

=================================

當應用於 KeyBinding 對象時。

本示例將 Ctrl+Shift+C 組合鍵指定給 FileClose 命令,然後執行這個組合鍵(關閉當前文檔)。

CustomizationContext = ActiveDocument.AttachedTemplate

Keybindings.Add KeyCode:=BuildKeyCode(wdKeyControl, _

wdKeyShift, wdKeyC), KeyCategory:=wdKeyCategoryCommand, _

Command:="FileClose"

FindKey(BuildKeyCode(wdKeyControl, wdKeyShift, wdKeyC)).Execute

======================================

當應用於 MailMerge 對象時。

如果活動文檔是壹個帶有附加數據源的主文檔,則本示例執行郵件合並。

Set myMerge = ActiveDocument.MailMerge

If myMerge.State = wdMainAndDataSource Then MyMerge.Execute

  • 上一篇:編程開發不同類型軟件的特點都有哪些
  • 下一篇:用MAYA流體如何調出大氣的效果
  • copyright 2024編程學習大全網