我怎样才能循环通过数据透视表的第一列?

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

红色的部分

我想遍历行字段项目(红色的部分)中的每个单元格。 我试过了:

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

但是无法得到这些名字。

有人可以帮帮我吗?

尝试使用类似于:

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

另外使用MsgBox是要创build一个popup式窗口的负载。 如果你只是使用这个进行debugging,可以考虑使用Debug.Print并在即时窗口( Ctrl + G )中查看,而不必closuresMsgBox

从评论更新:

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