WorksheetBase.PivotTables メソッド
ワークシート上の単一のピボットテーブル レポート (Microsoft.Office.Interop.Excel.PivotTable オブジェクト) または、すべてのピボットテーブル レポートのコレクション (Microsoft.Office.Interop.Excel.PivotTables オブジェクト) のいずれかを表すオブジェクトを取得します。
名前空間: Microsoft.Office.Tools.Excel
アセンブリ: Microsoft.Office.Tools.Excel.v4.0.Utilities (Microsoft.Office.Tools.Excel.v4.0.Utilities.dll 内)
構文
'宣言
Public Function PivotTables ( _
index As Object _
) As Object
public Object PivotTables(
Object index
)
パラメーター
- index
型 : System.Object
レポートの名前または番号です。
戻り値
型 : System.Object
ワークシート上の単一のピボットテーブル レポート (Microsoft.Office.Interop.Excel.PivotTable オブジェクト) または、すべてのピボットテーブル レポートのコレクション (Microsoft.Office.Interop.Excel.PivotTables オブジェクト) のいずれかを表すオブジェクトです。
解説
省略可能なパラメーター
省略可能なパラメーターについては、「Office ソリューションの省略可能なパラメーター」を参照してください。
例
次のコード例では、PivotTables メソッドを使用して、現在のワークシートの Microsoft.Office.Interop.Excel.PivotTables コレクションを取得し、コレクション内の各ピボットテーブルを更新します。
この例は、ドキュメント レベルのカスタマイズ用に作成されています。
Private Sub RefreshPivotTables()
Dim pivotTables1 As Excel.PivotTables = _
CType(Me.PivotTables(), Excel.PivotTables)
If pivotTables1.Count > 0 Then
For Each table As Microsoft.Office.Interop.Excel.PivotTable _
In pivotTables1
table.RefreshTable()
Next
Else
MsgBox("This workbook contains no pivot tables.")
End If
End Sub
private void RefreshPivotTables()
{
Excel.PivotTables pivotTables1 =
(Excel.PivotTables)this.PivotTables();
if (pivotTables1.Count > 0)
{
foreach (Microsoft.Office.Interop.Excel.PivotTable table
in pivotTables1)
{
table.RefreshTable();
}
}
else
{
MessageBox.Show("This workbook contains no pivot tables.");
}
}
.NET Framework セキュリティ
- 直前の呼び出し元に対する完全な信頼。このメンバーは、部分的に信頼されているコードから使用することはできません。詳細については、「部分信頼コードからのライブラリの使用」を参照してください。