Méthode Application.VisualReportsSaveCube (Project)

Enregistre un cube de rapports visuels dans le répertoire par défaut ou dans un répertoire spécifié.

Syntaxe

expression. VisualReportsSaveCube( _strNamePath_, _PjVisualReportsCubeType_, _ReportAlLFields_, _PjVisualReportsDataLevel_ )

expressionUne variable qui représente un objetApplication.

Paramètres

Nom	Requis/Facultatif	Type de données	Description
strNamePath	Facultatif	String	Nom et chemin d’accès complet de l’emplacement dans lequel enregistrer le fichier de cube (.cub).
PjVisualReportsCubeType	Facultatif	Long	Type de cube à enregistrer. Il peut s’agir de l’un des consants PjVisualReportsCubeType . La valeur par défaut est pjTaskTP.
ReportAlLFields	Facultatif	Boolean	Si la valeur est True, tous les champs non personnalisés sont inclus dans le rapport. Valeur par défaut est False.
PjVisualReportsDataLevel	Facultatif	Long	Niveau de données à enregistrer. Il peut s’agir de l’une des constantes PjVisualReportsDataLevel . La valeur par défaut est pjLevelAutomatic.

Valeur renvoyée

Boolean

Remarques

Le paramètre PjVisualReportsDataLevel spécifie le niveau auquel les données chronologiques sont accessibles. Par exemple, si pjLevelMonths (mois) est spécifié, il n’est pas possible d’accéder à pjLevelDays (jours).

Affecter au paramètre ReportAllFields la valeur True peut nuire aux performances.

Exemple

Le code suivant enregistre un cube.

Sub a() 
 Dim tf As Boolean 
 tf = Application.VisualReportsSaveCube("c:\cube.cub", pjTaskNTP, , pjLevelQuarters) 
 If tf = True Then 
 MsgBox ("Cube saved successfully") 
 Else 
 MsgBox ("Cube not saved successfully") 
 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.