:: Visual Foxpro, Foxpro for DOS
Вопрос по отчету в MS Word
rud

Сообщений: 640
Откуда: Москва
Дата регистрации: 02.09.2000
Заказчик вдруг попросил, чтобы отчет, сформированный в MS Word (~100 страниц) в программе сразу открывлся на первой странице, а не на последней. Как это сделать? Пробовал перевести макрос в VFP, ничего не выходит.
Ratings: 0 negative/0 positive
Re: Вопрос по отчету в MS Word
AleksM

Сообщений: 17881
Дата регистрации: 11.11.2003
Где потуги перевода?

А там ведь всего одна строчка на VBA:
ActiveDocument.ActiveWindow.Selection.HomeKey


------------------
Лучше переесть, чем недоспать.
Не спеши, а то успеешь.
Ratings: 0 negative/0 positive
Re: Вопрос по отчету в MS Word
rud

Сообщений: 640
Откуда: Москва
Дата регистрации: 02.09.2000
Так и делаю. Естественно, в вордовом документе курсор переходит в начало последней строки. А мне надо, чтобы он попадал в начало всего документа. Перевести в VFP строку Selection.HomeKey Unit:=wdStory не знаю как.
Ratings: 0 negative/0 positive
Re: Вопрос по отчету в MS Word
ry

Сообщений: 2113
Дата регистрации: 24.09.2007
Selection.HomeKey(6)
Ratings: 0 negative/0 positive
Re: Вопрос по отчету в MS Word
rud

Сообщений: 640
Откуда: Москва
Дата регистрации: 02.09.2000
Спасибо. То, что надо.
Ratings: 0 negative/0 positive
Re: Вопрос по отчету в MS Word
Timo

Сообщений: 210
Откуда: г Волгоград
Дата регистрации: 27.05.2005
rud
Перевести в VFP строку Selection.HomeKey Unit:=wdStory не знаю как.

? wdStory
в окне Immediate в редактора VBA.
Ratings: 0 negative/0 positive
Re: Вопрос по отчету в MS Word
axeum
Автор

Сообщений: 107
Дата регистрации: 07.07.2020
Добрый день, а как перейти не в начало документа а в начало листа7
гор. клавиши нашел ctrl+alt+pageup
в макросах ворда вижу :
Selection.HomeKey Unit:=wdWindow где wdWindow = 11

ну и пытаюсь в фоксе повторить и прописываю
loWord.Selection.HomeKey(11)
и получаю ошибку:
OLE IDispatch exception code 0 from microsoft word: Неверный параметр

Не подскажете что я делаю не так, ну или как можно переходить в ворде в начало именно листа?

upd. нашел решение
loword.Selection.GoTo(1,,,lnPage) lnPage - Номер страницы, на которой надо подняться в начало



Исправлено 1 раз(а). Последнее : axeum, 16.08.22 07:09
Ratings: 0 negative/0 positive


Извините, только зарегистрированные пользователи могут оставлять сообщения в этом форуме.

On-line: 24 akvvohinc  (Гостей: 23)

© 2000-2024 Fox Club 
Яндекс.Метрика