エクセルのピボットテーブルで、RowRangeを使って行ラベルの中身すべてを取得して配列に入れたいです。

Question

前提・実現したいこと

下図のようなピボットテーブルをVBAで扱っています。

図の左が元データ、右上がピボットテーブルです。
右下は、フィールド「プロジェクト名」にフィルターをかけて「Aプロジェクト」だけを表示させたものです。
「Aプロジェクト」のデータを持たない「たけし」が、行ラベルが消えています。
この状態で行ラベル「たろう」「はなこ」を配列で取得したいです。

PivotFields(”氏名”).PivotItemsの操作では「たけし」も含まれてしまうため、目的のものが取得できませんでした。
そこで、RowRangeを使うことを検討しています。

簡単に行ラベルをすべて取得する方法を教えて下さい。

試したこと

以下のように、index番号を引数にすることを考えましたが、うまくいきませんでした。

For i = 1 to RowRange.Count-2
  Labels(i) = RowRange( i + 1 )
next i

RowRangeは引数にindex番号を取れない？ようです。

補足情報（FW/ツールのバージョンなど）

Excel 2016

Answer 1

みなさん、ありがとうございました。
RowRangeではなく、
ピポットフィールド.DataRangeプロパティで目的なものがとれました。
ピポットフィールド.DataRange.Item()で、引数にindexや行列番号を指定することで一つずつ取り出すことができました。

Answer 2

これなら目的のデータが取れる思いますがいかがでしょうか？

With Sheets(1).PivotTables(1)
    .PivotSelect "氏名[All]", xlLabelOnly
End With
    
配列 = Selection.Value

Answer 3

これでどうでしょうか。

Dim pt As PivotTable
Set pt = PivotTables(1)

For i = 1 to pt.RowRange.Count - 2
  Labels(i) = pt.RowRange( i + 1 )
next i