次の方法で共有


Application.VisualReportsSaveCube メソッド (Project)

既定のディレクトリ、または指定したディレクトリにビジュアル レポート キューブを保存します。

構文

VisualReportsSaveCube( _strNamePath_, _PjVisualReportsCubeType_, _ReportAlLFields_, _PjVisualReportsDataLevel_ )

expressionApplication オブジェクトを 表す変数。

パラメーター

名前 必須 / オプション データ型 説明
strNamePath 省略可能 String キューブ ファイル (.cub) の保存先にする場所の名前および完全パスを指定します。
PjVisualReportsCubeType 省略可能 長整数型 (Long) キューブの種類を保存します。 PjVisualReportsCubeType consants のいずれかをすることができます。 既定では pjTaskTP です。
ReportAlLFields 省略可能 ブール型 (Boolean) のかどうか は True 、ユーザー設定以外のすべてのフィールドは含まれているレポートにします。 既定では false を指定 します。
PjVisualReportsDataLevel 省略可能 長整数型 (Long) データ レベルを保存します。 PjVisualReportsDataLevel 定数のいずれかをすることができます。 既定では pjLevelAutomatic です。

戻り値

ブール型 (Boolean)

注釈

PjVisualReportsDataLevel パラメーターでは、タイム スケール領域のデータをアクセスできるレベルを指定します。 などの場合は pjLevelMonths (月数) が指定されている、 pjLevelDays にアクセスすることはできません (日) です。

ReportAllFields パラメーターを True に設定すると、パフォーマンスが低下することができます。

次のコードでキューブが保存されます。

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

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。