如何循环访问数据透视表的第一列？

Question

我有一个数据透视表，它有两个源列（国家，城市）作为其行字段。

我想通过在各行领域项目的细胞（红色部分）进行迭代。我试过了：

For Each pf In pvt.DataBodyRange.Columns 
    MsgBox pf.Value 
Next 

但是无法获得这些名字。

有人可以帮我吗？

Answer 1

尝试使用类似：

For Each pf In pvt.pivotfields("Country").DataRange 
    MsgBox pf.Value 
Next pf 

而且使用MsgBox将创建弹出窗口的负荷。如果你只是用这个调试考虑使用Debug.Print代替，看在立即窗口（按Ctrl +摹）您将不必保持驳回从评论的MsgBox

更新：

For Each pf in pvt.RowFields(1).DataRange 
    Debug.Print pf.value 
Next pf