Очень просто - в контейнере страниц все страницы идут в том же порядке, в котором они представлены в окне текущего документа. Получить индекс можно например так:

class Macro
{
public static int GetPageIndex()
{
int i = -1;
Document d = TFlex.Application.ActiveDocument;

if (d==null)
return i;

Page p = d.ActivePage;

if (p!=null)
foreach (Page page in d.Pages)
{
i++;

if (page == p)
return i;
}
return i;
}}