Вы не вошли. Пожалуйста, войдите или зарегистрируйтесь.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Сообщений [ 11 ]
- Ципихович Эндрю
- генерал-полковник
- Неактивен
- Зарегистрирован: 04.02.2010
- Сообщений: 506
- Поблагодарили: 23
Тема: Как узнать документ Ворда загрузился полностью?
Как узнать документ Ворда загрузился полностью?
Я делаю так:
Application.ScreenRefresh 'принудительное обновление экрана
Но всё же бывают случаи, что документ откылся, но не загрузился полностью, поэтому возник вопрос: как узнать зЗагрузился ли документ Ворда полностью?
Спасибо

- viter.alex
- Модератор
- Неактивен
- Откуда: Харьков, Украина
- Зарегистрирован: 21.12.2009
- Сообщений: 884
- Поблагодарили: 140
Re: Как узнать документ Ворда загрузился полностью?
Я в таких случаях заставляю документ подсчитать страницы, т.к. документ считается полностью загруженным, когда он разбит на страницы.
ActiveDocument.Range.ComputeStatistics(wdStatisticPages)
Или переразбить на страницы:
ActiveDocument.Repaginate
Лучше день потерять — потом за пять минут долететь!
- Ципихович Эндрю
- генерал-полковник
- Неактивен
- Зарегистрирован: 04.02.2010
- Сообщений: 506
- Поблагодарили: 23
Re: Как узнать документ Ворда загрузился полностью?
Вообще всего я "нарыл" 5 способов решения этого вопроса - 4 лёгких для восприятия и 1 сложноватый
так вот путём практики среди 4 лёгких способов я пытался выбрать наилучший, но при любом из них всё равно бывают случаи что всё же открывется документ не до конца загружённым. И самое интересное что даже случаи бывают, что если поставить все варианты подряд - всё также бывают случаи что всё же открывется документ не до конца загружённым:
'чтобы документ Ворда загрузился полностью перед его открытием
Application.ScreenUpdating = False 'отключаем дёргание экрана при выполнении кода
'1 вариант
'подсчитать страницы в активном документе
'так как документ считается полностью загруженным, когда он разбит на страницы
ActiveDocument.Range.ComputeStatistics (wdStatisticPages)
'2 вариант
ActiveDocument.Repaginate 'переразбить на страницы документ Ворда
'3 вариант
Selection.EndKey Unit:=wdStory 'спуститься вниз документа
Selection.HomeKey Unit:=wdStory 'подняться вверх документа
'4 вариант
Application.ScreenRefresh 'принудительное обновление экрана
Application.ScreenUpdating = True 'отмена отключения дёргания экрана при выполнении кода
Ваше мнение по этому?
- andrkar
- Модератор
- Неактивен
- Откуда: Томск
- Зарегистрирован: 10.03.2010
- Сообщений: 431
- Поблагодарили: 26
Re: Как узнать документ Ворда загрузился полностью?
В третьем варианте попробуйте вставить паузу небольшую..
- Ципихович Эндрю
- генерал-полковник
- Неактивен
- Зарегистрирован: 04.02.2010
- Сообщений: 506
- Поблагодарили: 23
Re: Как узнать документ Ворда загрузился полностью?
Selection.EndKey Unit:=wdStory 'спуститься вниз документа
Sleep 500
Selection.HomeKey Unit:=wdStory 'подняться вверх документа
то есть всё выбросить, оставить только это???
- andrkar
- Модератор
- Неактивен
- Откуда: Томск
- Зарегистрирован: 10.03.2010
- Сообщений: 431
- Поблагодарили: 26
Re: Как узнать документ Ворда загрузился полностью?
я же сказал, попробуй.. Остальное, на мой взгляд - чрезмерно..
- Ципихович Эндрю
- генерал-полковник
- Неактивен
- Зарегистрирован: 04.02.2010
- Сообщений: 506
- Поблагодарили: 23
Re: Как узнать документ Ворда загрузился полностью?
нет я ничего не говорю, когда не срабатывает, то есть открывается не загруженным, это после того как я его насилую
то есть шаблон подряд открываю, но ведь должна быть и теория, которая победит всю практику

- Вождь
- Модератор
- Неактивен
- Зарегистрирован: 07.01.2010
- Сообщений: 745
- Поблагодарили: 181
Re: Как узнать документ Ворда загрузился полностью?
Что определяет, что документ загрузился полностью?
Наверное, речь надо вести о разбивке на страницы. Тогда самый правильный вариант - Document.Repaginate.
Разбивка документа актуальна только при View.Type=wdPrintView. В других режимах просмотра переход в конец документа будет мгновенным. Т.е. способы с HomeKey и EndKey работать не будут. Кроме того, перед использованием HomeKey и EndKey надо убедиться, что Selection находится в главной части документа.
При принудительной разбивке на страницы, наверно надо выставлять параметр Options.Pagination=False - фоновая разбивка на страницы. По-моему, на команду Document.Repaginate это не влияет, но лучше подстраховаться.
Макросы под заказ и готовый пакет - mtdmacro.ru
- Ципихович Эндрю
- генерал-полковник
- Неактивен
- Зарегистрирован: 04.02.2010
- Сообщений: 506
- Поблагодарили: 23
Re: Как узнать документ Ворда загрузился полностью?
То есь я понял, так?
Options.Pagination = False 'фоновая разбивка на страницы
ActiveDocument.Repaginate 'переразбить на страницы документ Ворда
Спасиба попробую!!
- Ципихович Эндрю
- генерал-полковник
- Неактивен
- Зарегистрирован: 04.02.2010
- Сообщений: 506
- Поблагодарили: 23
Re: Как узнать документ Ворда загрузился полностью?
Я бы сказал, что Вы гений в Ворде, да ещё в том, что Вы мне на второй трудный для меня вопрос отвечаете. Насиловал я насиловал и не вынасиловал шаблон, код:
Options.Pagination = False 'фоновая разбивка на страницы
ActiveDocument.Repaginate 'переразбить на страницы документ Ворда
самый верный, открывается полностью загруженным. Спасибо большое, очень большое.
ЗЫ сегодня ещё один вопрос задам, посмотрите пожалуйста
- Ципихович Эндрю
- генерал-полковник
- Неактивен
- Зарегистрирован: 04.02.2010
- Сообщений: 506
- Поблагодарили: 23
Re: Как узнать документ Ворда загрузился полностью?
насиловал далее раз тридцать подряд открыл подряд шаблон, раза три не загрузился до конца, на моих глазах догружался. Уже руки опускаются!
Сообщений [ 11 ]
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Как узнать документ Ворда загрузился полностью?
Вам приходилось, к примеру, редактировать текст, весом с хороший булыжник, где нерадивый наборщик поставил по сорок пробелов между словами? На портале о Microsoft Office Word вы узнаете про: редакторская правка в word.
Пытались ли вы когда-нибудь вручную поменять в Microsoft Word стили? Вы перешли на новую версию программы, все непривычно и непонятно? Наш сайт о Microsoft Office Word даст ответ про: антонним к слову я.
А может, наоборот, вам пришли в голову оригинальные решения, которыми вы хотите поделить с другими пользователями? На портале о Microsoft Office Word вы узнаете про: как написать линию в ворде.
Приглашаем вас посетить форум Ворд Эксперт, где собраны все основные вопросы по этой программе, касательно настроек, работы с документами, в том числе и сложные случаи исправления чужих ошибок и косяков. На портале о Microsoft Office Word вы узнаете про: автоматическое создание списка в ворде 2007.
Побывав на форуме, вы поймете, что написать макрос – легко и просто, а при желании найдете литературу на этой теме (список прямо на главной). На портале о Microsoft Office Word вы узнаете про: как вставить примечание в word 2003.
Возможно, ответ на свой вопрос или решение проблемы вы отыщете в разделах автоматизации или готовых решений. На портале о Microsoft Office Word вы узнаете про: почему когда вставляешь столбики нумерация страниц изменяется.
Если ваша проблема уникальна, можно всегда сделать заявку в соответствующем разделе. Также в этих разделах вы можете выложить свои наработки. Наш сайт о Microsoft Office Word даст ответ про: уплотнённый текст.
Что приятно, на форуме довольно строгий контроль спама и флуда, на Ворд Эксперт общаются профессионально, но на доступном и понятном языке. Наш сайт о Microsoft Office Word даст ответ про: как поставить запятую над словом в майкрософт ворд.
Для общих тем существует «курилка», для пожеланий по работе предусмотрен свой раздел.