ReSQL.ru
     
powered by simpleCommunicator - 2.0.39     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / word vba Как разделить документ на станицы?
12 сообщений из 12, страница 1 из 1
word vba Как разделить документ на станицы?
    #38934102
viton-zizu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
viton-zizu
Участник
Ребят, такой вопрос, как с помощью vba разделить вордовский документ по две страницы и сохранить в туже папку!?
Вроде задача тривиальна, а у меня решения пока найти не удалось, подскажите пожалуйста!)
...
Рейтинг: 0 / 0
12.04.2015, 13:13
| Ответить | Цитировать | Написать  
word vba Как разделить документ на станицы?
    #38934106
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
А разделители страниц присутствуют?

Если нет, как-то так: - goto на страницу №3, шаг на символ назад - это будет конечный символ диапазона
...
Рейтинг: 0 / 0
12.04.2015, 13:32
| Ответить | Цитировать | Написать  
word vba Как разделить документ на станицы?
    #38934109
viton-zizu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
viton-zizu
Участник
Разделитель вроде как присутствует, если я правильно понимаю что это
"Разрыв раздела со следующей страницы" это он!?
Был уверен что как то так Documents[i] можно обращаться к страницам, а оказывается все сложнее...
...
Рейтинг: 0 / 0
12.04.2015, 13:44
| Ответить | Цитировать | Написать  
word vba Как разделить документ на станицы?
    #38934121
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
viton-zizuРазделитель вроде как присутствует, если я правильно понимаю что это
"Разрыв раздела со следующей страницы" это он!?он в том числе. Может быть просто разрыв страницы. Вопрос в том, как побит документ на страницы. Если с помощью разрывов, то можно искать по ним. Если с помощью разрывов разделов, тогда может быть даже есть проще путь - можно будет работать с разделами.
То есть вопрос, что логически вы принимаете за конец нужного диапазона - разрыв страницы, разрыв раздела или фактическое начало третьей страницы при автоматической разбивке на страницы (а оно может плавать, в зависимости от текущего принтера)
...
Рейтинг: 0 / 0
12.04.2015, 14:12
| Ответить | Цитировать | Написать  
word vba Как разделить документ на станицы?
    #38936495
LeCrunch
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
LeCrunch
Гость
viton-zizu,
http://www.sql.ru/forum/300911/word-kak-razdelit-dokument-po-listam
...
Рейтинг: 0 / 0
14.04.2015, 20:56
| Ответить | Цитировать | Написать  
word vba Как разделить документ на станицы?
    #38936632
anvg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
anvg
Гость
Доброе время суток
Задача не столь тривиальна, если не задан принудительно разрыв каждой страницы. В обычном документе разрыв страниц не частое явление. Зато проблемой может быть то, что часть параграфа может начинаться на одной странице, а заканчиваться на другой.
В общем и целом для решения задачи - это основная проблема в свободно набранном тексте. Плюс ещё одна из проблем возникает, если в документе есть разделы и для них определён различный размер страницы. Как заготовка для ваших размышлений
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Public Sub PrintParagraphPageNumberInfo()
    Dim p As Paragraph, pWords As Words, i As Long
    For i = 1 To ThisDocument.Paragraphs.Count
        Set p = ThisDocument.Paragraphs(i)
        Set pWords = p.Range.Words
        Debug.Print "Параграф: " & CStr(i) & _
                    ". Начало стр.: " & CStr(pWords(1).Information(wdActiveEndPageNumber)) & _
                    ". Конец стр.: " & CStr(pWords(pWords.Count).Information(wdActiveEndPageNumber))
    Next
End Sub


И к случаю вопрос. Кто-нибудь сталкивался - если включен автоматический перенос слов, то бывает ли перенос части слова с одной страницы на другую?
...
Рейтинг: 0 / 0
15.04.2015, 02:40
| Ответить | Цитировать | Написать  
word vba Как разделить документ на станицы?
    #38936773
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
anvgесли включен автоматический перенос слов, то бывает ли перенос части слова с одной страницы на другую?
Да, конечно. С учётом настройки висячих строк, само собой.
...
Рейтинг: 0 / 0
15.04.2015, 09:35
| Ответить | Цитировать | Написать  
word vba Как разделить документ на станицы?
    #38936776
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
anvgЗадача не столь тривиальна, если не задан принудительно разрыв каждой страницы.Задача не нетривиальная, а принципиально бессмысленная. Страница - это характеристика форматирования при отображении и печати, и связана она совсем даже не с документом, а с характеристиками текущего устройства отображения (экрана, принтера и т.п.).
...
Рейтинг: 0 / 0
15.04.2015, 09:37
| Ответить | Цитировать | Написать  
word vba Как разделить документ на станицы?
    #38936824
anvg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
anvg
Гость
AkinaДа, конечно. С учётом настройки висячих строк, само собой.
Спасибо большое за информацию.
AkinaСтраница - это характеристика форматирования при отображении и печати
Ну, как задачу, можно рассматривать в рамках ограничения на текущий монитор, компьютер, версию Word, принтер и т. д.
...
Рейтинг: 0 / 0
15.04.2015, 10:28
| Ответить | Цитировать | Написать  
word vba Как разделить документ на станицы?
    #38937616
Leonid Kudryavtsev
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Leonid Kudryavtsev
Участник
anvgНу, как задачу, можно рассматривать в рамках ограничения на текущий монитор, компьютер, версию Word, принтер и т. д.
AFAIK и IMHO, нет гарантии, что после копипаста одна страница не превратиться в несколько и/или наоборот.

"Элегантные брюки превращаются, брюки превращаются...." ( C ) известный фильм
YouTube Video
YouTube Video
...
Рейтинг: 0 / 0
15.04.2015, 18:32
| Ответить | Цитировать | Написать  
word vba Как разделить документ на станицы?
    #38937872
anvg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
anvg
Гость
Leonid KudryavtsevAFAIK и IMHO, нет гарантии, что после копипаста одна страница не превратиться в несколько и/или наоборот.
Так и нет гарантии, что обязательно превратится в несколько или наоборот;) Пример бы желательно, AFAIK и IMHO не доказательство. А так - "ручками" перекопировал 10 страниц по 2 с сохранением форматирования (на двух листах были были висячие строки, эти параграфы скопированы по частям) - "полёт" нормальный.
...
Рейтинг: 0 / 0
16.04.2015, 01:40
| Ответить | Цитировать | Написать  
word vba Как разделить документ на станицы?
    #38955329
lenaterzyan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lenaterzyan
Гость
Всем привет. в умных словах я профан)поэтому объясните человеческим языком. у меня документ (вордовский), все страницы делала через разрывы. вопрос: как каждую страницу сохранить как отдельный документ?
...
Рейтинг: 0 / 0
10.05.2015, 02:13
| Ответить | Цитировать | Написать  
12 сообщений из 12, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / word vba Как разделить документ на станицы?
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru             Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=38936632&tid=2173508]:
 0ms
get settings:
 10ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 31ms
get topic data:
 9ms
get forum data:
 3ms
get page messages:
 51ms
get tp. blocked users:
 2ms
others: 12ms
total:  139ms
созд. / загр.: 139ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]