Excel) (CalculatedMembers.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 支援與意見反應。