共用方式為

Office) (CustomXMLParts.PartBeforeDelete 事件

  • 發行項

會從 CustomXMLParts 集合中刪除 CustomXMLPart 物件之前發生。

語法

運算式。PartBeforeDelete (OldPart)

表達 會傳回 CustomXMLParts 物件的 運算式。

參數

名稱 必要/選用 資料類型 描述
OldPart 必要 CustomXMLPart 即將刪除的組件。

範例

下列範例會確認使用者想要刪除自訂 XML 元件，如果使用者在對話方塊中選擇 [ 是 ]，則會刪除該元件。

Sub CustomXMLParts_PartBeforeDelete(ByVal oldPart As CustomXMLPart) 
Dim result As Boolean 
 
result = MsgBox("Are you sure you want to delete the " & oldPart.ID & " part?", vbYesNo) 
 
If result Then 
   oldPart.Delete 
End If 
 
End Sub

另請參閱

支援和意見反應

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