Méthode Application.ZoomReport (Project)

Article
04/07/2023

Zoome (agrandit ou réduit) le rapport actif sur le pourcentage spécifié de sa taille d’origine.

Syntaxe

expression. ZoomReport(Pourcentage,Entier)

expressionUne variable qui représente un objetApplication.

Paramètres

Nom	Requis/Facultatif	Type de données	Description
Pourcentage	Facultatif	Variant	Pourcentage de la taille d’origine.
Toute	Facultatif	Variant	Le paramètre Entire n’a aucun effet.
Pourcentage	Facultatif	Variant
Toute	Facultatif	Variant
Nom	Requis/Facultatif	Type de données	Description

Valeur renvoyée

Boolean

Remarques

Le paramètre Percent peut avoir une valeur de 10 à 400. Si la valeur est en dehors de cette plage, la méthode ZoomReport affiche une erreur d’exécution 1101, « La valeur de l’argument n’est pas valide ».

La méthode ZoomReport peut être appliquée à des rapports personnalisés et à des rapports intégrés, tels que Vue d’ensemble du projet. Lorsque vous modifiez la taille du rapport, basculez vers une autre vue, puis revenez au rapport précédent, le niveau de zoom reste en vigueur. Pour restaurer la taille d’origine, utilisez la commande suivante : ZoomReport 100.

Exemple

L’exemple suivant vérifie si un rapport existe : Si c’est le cas, l’exemple affiche le rapport, puis effectue un zoom sur le rapport à 80 % de sa taille d’origine.

Sub ReportZoom()
    Dim reportName As String
    reportName = "Report 1"
    
    If ActiveProject.Reports.IsPresent(reportName) Then
        ApplyReport reportName
        ZoomReport 80
    Else
        MsgBox Prompt:="No custom report name: " & reportName, Title:="Report apply error"
    End If
End Sub

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.

Partager via