Méthode Report.Delete (Project)
Supprime le rapport.
Syntaxe
expression. Supprimer
Expression Variable qui représente un objet « Report ».
Valeur renvoyée
Nothing
Exemple
L’exemple suivant détermine si un rapport nommé Report 1 existe et, le cas échéant, supprime le rapport. Si le rapport est actif, passez à une autre vue avant de le supprimer . Sinon, Project affiche l’erreur d’exécution 1004 : la table « Rapport 1 » est en cours d’utilisation et ne peut pas être copiée ou supprimée.
Sub DeleteAReport()
Dim reportName As String
reportName = "Report 1"
If ActiveProject.Reports.IsPresent(reportName) Then
' To delete the active report, change to another view.
ViewApplyEx Name:="&Gantt Chart"
ActiveProject.Reports(reportName).Delete
Else
MsgBox Prompt:="No report name: " & reportName, Title:="Report delete error"
End If
End Sub
Voir aussi
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.