Événement CustomXMLParts.PartBeforeDelete (Office)

Se produit juste avant la suppression d’un objet CustomXMLPart de la collection CustomXMLParts .

Syntaxe

expression. PartBeforeDelete (OldPart)

Expression Expression qui renvoie un objet CustomXMLParts .

Parameters

Nom	Requis/Facultatif	Type de données	Description
OldPart	Requis	CustomXMLPart	Partie sur le point d'être supprimée

Exemple

L’exemple suivant confirme que l’utilisateur souhaite supprimer le composant XML personnalisé, puis supprime le composant si l’utilisateur choisit Oui dans la boîte de dialogue.

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

Voir aussi

• Membres de l’objet CustomXMLParts

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.