Событие CustomXMLParts.PartBeforeDelete (Office)
Происходит непосредственно перед удалением объекта CustomXMLPart из коллекции CustomXMLParts .
Синтаксис
expression. 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 и обратная связь.