Index プロパティ

ワークブックの Sheets コレクション内でのシートの1から始まるインデックス位置を返します

Idx := Workbook.Sheets[1].Index;