次の方法で共有


CalculatedMembers.Item プロパティ (Excel)

コレクションから単一のオブジェクトを返します。

構文

Item (インデックス)

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

パラメーター

名前 必須 / オプション データ型 説明
Index 必須 バリアント型 (Variant) オブジェクトの名前またはインデックス番号を指定します。

次の使用例は、集計メンバーが有効かどうかを通知します。 この例では、有効または無効な計算メンバーを含むアクティブワークシートにピボットテーブルが存在することを前提としています。

Sub CheckValidity() 
 
 Dim pvtTable As PivotTable 
 Dim pvtCache As PivotCache 
 
 Set pvtTable = ActiveSheet.PivotTables(1) 
 Set pvtCache = Application.ActiveWorkbook.PivotCaches.Item(1) 
 
 ' Handle run-time error if external source is not an OLEDB data source. 
 On Error GoTo Not_OLEDB 
 
 ' Check connection setting and make connection if necessary. 
 If pvtCache.IsConnected = False Then 
 pvtCache.MakeConnection 
 End If 
 
 ' Check if calculated member is valid. 
 If pvtTable.CalculatedMembers.Item(1).IsValid = True Then 
 MsgBox "The calculated member is valid." 
 Else 
 MsgBox "The calculated member is not valid." 
 End If 
 
Not_OLEDB: 
MsgBox "The source is not an OLEDB data source." 
Exit Sub 
 
End Sub

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

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