如何引用數據透視表中的值域VBA

我如何參考在屏幕上選擇的透視圖域： http://imgur.com/a/JYisG。它是一個值：「СуммпополюВестовара，т」（重量的總和，t）。如何引用數據透視表中的值域VBA

.DataLabelRange不會在這個結構中

代碼的主要目的是檢查如透視字段存在工作。這裏是我的代碼：

For Each f In p.PivotFields 
If f = "Product" Or f.Name = "Export-Import" Then 
f.Orientation = xlPageField 
ElseIf f.Name = "Company" Or f.Name = "Partner" Then 
f.Orientation = xlRowField 
ElseIf f.Name = "Weight." Then 
f.Orientation = xlDataField 
ElseIf f.Name = "USD" Then 
f.Orientation = xlDataField 
Else f.Orientation <> xlHidden Then 
f.Orientation = xlHidden 
End If 
Next

我要檢查是否存在這樣的重量和美元數據字段。如果他們然後跳過他們。否則，代碼將再次添加相同的數據字段。

來源

2017-07-14 Alexander Sid

您需要循環每個'PivotFields'來檢查該特定字段是否存在。 – kulapo

現在你的代碼有什麼不滿意的地方？ – PGCodeRider

有很多種方法。一個簡單的方法就是使用間接函數。示例=INDIRECT("B3",TRUE)

來源

2017-07-14 21:14:37 PGCodeRider

這不完全是。這是我的代碼 –

如何引用數據透視表中的值域VBA

回答

相關問題