共用方式為


Word) (Application.XMLSelectionChange 事件

會在目前選取範圍的上層 XML 節點變更時發生。

語法

運算式XMLSelectionChange' (Sel**, OldXMLNodeNewXMLNodeReason)

表達變數,表示已使用WithEvents關鍵字在類別模組中宣告的'Application' 物件。 如需搭配 Application 物件使用 事件的詳細資訊,請參閱 搭配 Application 物件使用事件

參數

名稱 必要/選用 資料類型 描述
Sel 必要 Selection 選取的文字 (包括 XML 元素)。 如果沒有選取任何文字,則 Sel 參數不會傳回任何資料,或者會傳回插入點右邊的第一個字元。
OldXMLNode 必要 XMLNode 插入點移動之前所在的 XML 節點。
NewXMLNode 必要 XMLNode 插入點移動之後所在的 XML 節點。

範例

下列範例會在將新的 XML 元素插入文件時,驗證此新增的 XML 元素。

Private Sub Wrd_XMLSelectionChange(ByVal Sel As Selection, _ 
 ByVal OldXMLNode As XMLNode, ByVal NewXMLNode As XMLNode, _ 
 Reason As Long) 
 
 Dim intResponse As Integer 
 
 If Reason = wdXMLSelectionChangeReasonInsert Then 
 If Not NewXMLNode Is Nothing Then 
 NewXMLNode.Validate 
 End If 
 End If 
 
End Sub

另請參閱

Application 物件

支援和意見反應

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