Partilhar via


Evento CustomXMLParts.PartBeforeDelete (Office)

Ocorre antes que um objeto CustomXMLPart é excluído da coleção CustomXMLParts.

Sintaxe

expressão. PartBeforeDelete (OldPart)

Expressão Uma expressão que retorna um objeto CustomXMLParts .

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
OldPart Obrigatório CustomXMLPart A parte que será excluída.

Exemplo

O exemplo a seguir confirma que o usuário deseja excluir a parte XML personalizada e, em seguida, exclui a parte se o usuário escolher Sim na caixa de diálogo.

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

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.