VPF::Номер страницы на которой находится курсор

MAXIQ

Дата 16.9.2011, 09:56 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 92
Регистрация: 30.12.2006

Репутация: нет
Всего: нет

Нужно программно получить номер страницы на которой в данный момент находится курсор если кто знает функцию и константу подскажие пожалуйста. Что-то типа:
vVarDoc.OleFunction("ComputeStatistics",00000002); как для количества страниц документа. Заранее спасибо.
P.S. Притомил этот MSWORD.OLB

MAXIQ

Дата 21.9.2011, 19:15 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 92
Регистрация: 30.12.2006

Репутация: нет
Всего: нет

Код


Sub Get_The_ActivePage()

Dim curRange As Range
Dim curPage As Page
Set curRange = Selection.Range

curNo = curRange.Information(wdActiveEndPageNumber)
Set curPage = ActiveDocument.ActiveWindow.Panes(1).Pages(curNo)

End Sub

Кто-нибудь знает как прописать строку
curNo = curRange.Information(wdActiveEndPageNumber)

Это должно быть что-то типа:
vRange.OlePropertyGet("Information") а куда wdActiveEndPageNumber прилепить???

MAXIQ

Дата 23.9.2011, 15:28 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 92
Регистрация: 30.12.2006

Репутация: нет
Всего: нет

Код


int iN1=vRange.OlePropertyGet("Information",1); //Текущая страница
int iN2=vRange.OlePropertyGet("Information",2); //Текущий раздел
int iN3=vRange.OlePropertyGet("Information",3); //Просматриваемая страница 
int iN4=vRange.OlePropertyGet("Information",4); //Из страниц
int iN5=vRange.OlePropertyGet("Information",5); //А вот чего не знаю дык того не знаю

Office 2003, Borland C++ Builder6
Спасибо всем, кто просматривал эту тему, за поддержку)))

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Программирование, связанное с MS Office \| Следующая тема »