Méthode Application.ZoomReport (Project)
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. |
Entier | Facultatif | Variant | Le paramètre Entire n’a aucun effet. |
Pourcentage | Facultatif | Variant | |
Entier | 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 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.