Форум программистов «Весельчак У»
Добро пожаловать,
Гость
. Пожалуйста,
войдите
или
зарегистрируйтесь
.
Вам не пришло
письмо с кодом активации?
1 час
1 день
1 неделя
1 месяц
Навсегда
Рекомендуем проверить настройки временной зоны в вашем профиле (страница "Внешний вид форума", пункт "Часовой пояс:").
У нас больше нет рассылок. Если вам приходят письма от наших бывших рассылок mail.ru и subscribe.ru, то знайте, что это не мы рассылаем.
Начало
Наши сайты
Галерея
Весельчак У
Наша Вики
Хранилище
Проекты
Правила
Правила форума
Правила русского языка
Помощь
Поиск
Календарь
Почта
Войти
Регистрация
Форум программистов «Весельчак У»
>
Программирование
>
VisualBasic
(Модератор:
Naghual
) > Тема:
VB в Word
Страниц: [
1
]
Вниз
« предыдущая тема
следующая тема »
Печать
Автор
Тема: VB в Word (Прочитано 10035 раз)
0 Пользователей и 3 Гостей смотрят эту тему.
Ilia
Помогающий
Offline
Пол:
VB в Word
«
:
21-10-2004 07:46 »
Здравствуйте. Извиняюсь за детские вопросы, просто с VB работаю первый раз. У меня форматируется текст в Ворде, проблема в том, как применить это форматирование к каждой странице, т.е. нужно по идее получить количество страниц (они однотипные) и сделать цикл на это количество. Может кто делал такое, мне кажется это должно быть не очень сложно.
Спасибо.
Записан
Кто выпил весь кофе!
npak
Команда клуба
Offline
Пол:
VB в Word
«
Ответ #1 :
21-10-2004 22:11 »
Ilia
, получить число страниц
Function GetNumberOfPages(Doc As Document) As Integer
GetNumberOfPages = ActiveDocument.Range.Information(wdNumberOfPagesInDocument)
End Function
Перейти на начало страницы, возвращает номер символа, с которого начинается страница.
Function GoToPageStart(Doc As Document, PageNum As Integer) As Integer
GoToPageStart = Doc.Range.GoTo(wdGoToPage, wdGoToAbsolute, PageNum).Start
End Function
Записан
UniTesK -- индустриальная технология надежного тестирования.
http://www.unitesk.com/ru/
Alf
Гость
VB в Word
«
Ответ #2 :
22-10-2004 07:26 »
Именно такую операцию сам не делал, но IMHO для этого не обязательно знать точное количество страниц.
Дело в том, что страницы документа включены в коллекцию
Pages
, а для перебора всех элементов коллекции не обязательно знать их число. Достаточно использовать конструкцию VB
For Each
, которая наилучшим образом подходит для подобных задач.
Записан
Ilia
Помогающий
Offline
Пол:
VB в Word
«
Ответ #3 :
22-10-2004 07:29 »
npak
, спасибо большое, попробую
.
Записан
Кто выпил весь кофе!
Ilia
Помогающий
Offline
Пол:
VB в Word
«
Ответ #4 :
22-10-2004 08:47 »
Alf
, кстати а это идея. Спасибо, сейчас пороюсь в MSDN может найду примеры.
Записан
Кто выпил весь кофе!
Ilia
Помогающий
Offline
Пол:
VB в Word
«
Ответ #5 :
22-10-2004 09:30 »
npak
,
Alf
, спасибо друзья, все работает. Кстати VB - хорошая штука оказывается
.
Записан
Кто выпил весь кофе!
Страниц: [
1
]
Вверх
Печать
« предыдущая тема
следующая тема »
Форум программистов «Весельчак У»
>
Программирование
>
VisualBasic
(Модератор:
Naghual
) > Тема:
VB в Word
Загружается...