:: Visual Foxpro, Foxpro for DOS
Копирование страниц в Word
lili
Автор

Сообщений: 432
Откуда: Сыктывкар
Дата регистрации: 07.11.2005
Приветствую всех!
Есть некий шаблон в формате Word (на одной странице). Требуется - скопировать эту страницу на новую страницу в том же файле.
Пробовала так (см. ниже)- не получается. Пробовала в Word выяснить команды в режиме записи макроса - почему-то в этом режиме не доступно выделение и копирование (?!).
LOCAL oWord as Word.Application
oWord=CREATEOBJECT('Word.Application')
oword.Documents.Open(pShablon, True, False,False,"","",False,"","",1)
WITH oword
.selection.wholestory
.selection.copy
.selection.paste
ENDWITH
Ratings: 0 negative/0 positive
Re: Копирование страниц в Word
ssa

Сообщений: 12999
Откуда: Москва
Дата регистрации: 23.03.2005
lili
к (см. ниже)- не получается. Пробовала в Word выяснить команды в режиме записи макроса - почему-то в этом режиме не доступно выделение и копирование (?!).
.selection.copy
.selection.paste
Вставка выделенного в сам выделенный кусок. Что вы ожидали в таком случае? Что выделенная область сама изменится? Может таки сменить указание на место вставки?

------------------
Лень - это неосознанная мудрость.
Ratings: 0 negative/0 positive
Re: Копирование страниц в Word
lili
Автор

Сообщений: 432
Откуда: Сыктывкар
Дата регистрации: 07.11.2005
А можно подробнее - как указать на место вставки, а именно - в конец страницы (или на новый лист)?
Ratings: 0 negative/0 positive
Re: Копирование страниц в Word
of63

Сообщений: 25161
Откуда: Н.Новгород
Дата регистрации: 13.02.2008
Ctrl-End, и вставить разрыв страницы. Все как руками.

* Вставить PageBreak в конце текущего документа: (добавить разрыв - перевод страницы [c сменой форматирования])
* Делать эту команду ПЕРЕД КАЖДЫМ ДОБАВЛЯЕМЫМ ДОКУМЕНТОМ, КРОМЕ ПЕРВОГО
* Делать эту команду ПОСЛЕ ОДНОСТРАНИЧНОГО ДОКУМЕНТА ПРИ ПЕЧАТИ НА ДВУСТОРОННЕМ ПРИНТЕРЕ
m.oWord.Selection.EndKey(6) && Ctrl-End
IF условие
m.oWord.Selection.InsertBreak(2) && новый раздел (возможно новое форматирование добавляемых страниц)
ELSE
m.oWord.Selection.InsertBreak() && перевод страницы (форматирование предыдущего документа сохраняется)
ENDIF



Исправлено 3 раз(а). Последнее : of63, 15.01.20 12:04
Ratings: 0 negative/1 positive
Re: Копирование страниц в Word
lili
Автор

Сообщений: 432
Откуда: Сыктывкар
Дата регистрации: 07.11.2005
Спасибо. Получилось.
У вас где-то есть описание этих команд или через макросы выясняли?
Ratings: 0 negative/0 positive
Re: Копирование страниц в Word
AleksM

Сообщений: 17881
Дата регистрации: 11.11.2003
Лично я, что для EXCEL, что для WORD, сначала записывал макрос, а потом адаптировал его к VFP.


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

Сообщений: 25161
Откуда: Н.Новгород
Дата регистрации: 13.02.2008
lili
Спасибо. Получилось.
У вас где-то есть описание этих команд или через макросы выясняли?

Также макросы смотрю, в волшебном окне Immediate можно пробовать команды, также в нем работает IntelleSence, нажимаешь точку и оно показывает какие команды бывают. И хелп по F1 работает, и в верде и в экселе, и в интернете полно советчиков. Страна советов )
Ratings: 0 negative/1 positive
Re: Копирование страниц в Word
akvvohinc

Сообщений: 4203
Откуда: Москва
Дата регистрации: 11.11.2008
lili
У вас где-то есть описание этих команд или через макросы выясняли?
Можно поискать что-то подходящее на рутрекере (поиск по "VBA") - видеокурсы, книги, сами программы...

Например, там есть (или было):
1) Конспект программиста - Малышев С.А - Самоучитель VBA. Как это делается в Word, Excel, Access [2001, PDF, RUS] + Code (книга)
2) Слепцова Л.Д. Программирование на VBA в Microsoft Office 2010 (книга)
3) Microsoft Word VBA Macro Programming - Introduction (видео)

и т.д. и т.п.
Ratings: 0 negative/0 positive
Re: Копирование страниц в Word
lulgu

Сообщений: 1838
Дата регистрации: 30.11.2016
docs.microsoft.com

docs.microsoft.com



Исправлено 1 раз(а). Последнее : lulgu, 15.01.20 19:11
Ratings: 0 negative/0 positive


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

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

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