Поделиться через


Событие 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 и обратная связь.