Определение кол-ва листов в документе Ворд

//IID_HeaderFooter - Указатель на информацию о типе интерфейса
    OLECHAR* szMember = L"PageNumbers"; //метод
    int cNames = 2;     //число элементовszMember
             id_get=0;    //Указатель на массив DISPID,

//получаем указатель на IDispatch:
LPDISPATCH pDisp = WordApp->ActiveDocument->BuiltInDocumentProperties;
//используем для вызова функции:
int Words = pDisp->GetIDsOfNames(IID_HeaderFooter, &szMember , cNames, LOCALE_SYSTEM_DEFAULT, &id_get) ;
 ShowMessage(Words);