Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
 
 
Рейтинг 4.70/76: Рейтинг темы: голосов - 76, средняя оценка - 4.70
1 / 1 / 0
Регистрация: 03.11.2009
Сообщений: 92
1

Ворд: работа с колонтитулами

09.02.2010, 19:43. Показов 14441. Ответов 37
Метки нет (Все метки)

Как программно можно получить номер раздела документа по текущему положению курсора?
С уважением
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
09.02.2010, 19:43
Ответы с готовыми решениями:

Работа с колонтитулами: анализ групп объектов, подсчет количества фигур
Добрый день. На странице word имеется группа объектов (линии, текстовые блоки). Как обратиться к...

Поиск word документов с колонтитулами
help! Нужно организовать поиск word документам , которые содержат колонтитулы. Т.е. прошерстить...

Работа с колонтитулами в Word
Добрый день! Подскажите пожалуйста как изменить шрифт и размер для номеров страницы в документе...

Работа с колонтитулами на VBA
Доброго времени суток! Подскажите, пожалуйста, как решить следующую задачку: Задача:...

37
Заблокирован
09.02.2010, 20:13 2
Mikkelle,
Visual Basic
1
2
3
Sub SectionNumber()
MsgBox Selection.Information(wdActiveEndSectionNumber)
End Sub
А что ты там делаешь?
2
1 / 1 / 0
Регистрация: 03.11.2009
Сообщений: 92
10.02.2010, 09:55  [ТС] 3
Глобальная затея такова. В месте положения курсора вставлять раздел из одного листа с требуемыми параметрами (формат, ориентация, колонтитулы и т.д.)
0
Заблокирован
10.02.2010, 21:46 4
Mikkelle,
лист - это Excel. Word - это страница. Ты о ворде ведёшь речь или нет?
То есть тебе нужен Формат по образцу Раздела, я как-то тоже задавал этот вопрос в Форумах, но не получил ответа.
Т.е. тебе нужно передать параметры определённого Раздела в другой раздел? Тогда при чём здесь узнавание номера Раздела?
Дай ещё намёк.
0
1 / 1 / 0
Регистрация: 03.11.2009
Сообщений: 92
10.02.2010, 22:49  [ТС] 5
Прошу прощения за терминологию, ты абсолютно прав.
Из своего проекта я тайны не делаю. Попытаюсь объяснить подробнее. Есть документ оформленный по ГОСТу. Колонтитулы содержат объекты (таблицы, поля, графические объекты и т.д.) Зачастую бывает необходимость представить часть страниц в горизонтальном формате, но так, что бы колонтитулы оказались как бы повернуты на 90 градусов.
Путей решения данной проблемы много. Перебираю их по очереди и смотрю, что наиболее приемлемо. В частности при реализации данного проекта путем использования адаптированных макросов столкунулся с тем, что при выключении опции колонтитула "как в предыдущем разделе" курсор "сбегает" из текущего раздела. Вот и понадобилось как-то возвращать его на место.
К стати был бы очень признателен за ссылки на информационные ресурсы по Word VBA. Для меня после VB это такая большая проблема. Сталкиваешься то с глюками, то с нововведениями, а особеноо 2007 - это нечто. Не говорю, что он плох, но привыкать к новому крайне затруднительно.
Спасибо, что откликаетесь. Сути вашей проблемы тоже не понял, но если хотите, можете изложить подробнее или дать ссылку. Просто времени крайне мало, что бы просматривать все подряд.
С уважением.
0
Заблокирован
10.02.2010, 22:55 6
Mikkelle,
я вообще туго соображаю, а сейчас ещё и 1,5 л балтики 9 выпил, так что вообще не понимаю. Вставьте какой-нибудь пример что ли или графически изобразите, что вам надо, а то не догоняю - или пишите конкретные вопросы, а не глобально.
Не советую использовать Таблицы в Колонтитулах - программа Ворд - недоделанная.
0
Заблокирован
11.02.2010, 20:13 7
Mikkelle,
После рисунков.
Затем надо это скопировать.
Затем перейти в тот раздел, который нужно изменить и сделать то же самое, что на рисунках. Затем надо Вставить.

Если нужно скопировать параметры Последнего раздела, то предварительно надо вствить Разрыв раздела, скопировать его, а зетем, если он не нужен, то удалить.

Можно добавить параметры Раздела в Автотекст – смотри Справку. Затем просто выделять Разрыв раздела, который нужно изменить, и применять Автотекст.

Как сделать это программным путем – пока не знаю, может быть только какими-нибудь извращенными способами, если тебе очень надо – то можно попробовать.

Суть будет в том, что с помощью VBA будем выделять эти самые Разрывы разделов, затем переходить к Разрыву раздела, к которому нужно применить форматирование, а затем производить вставку (аналог Ctrl + C).
0
Миниатюры
Ворд: работа с колонтитулами   Ворд: работа с колонтитулами  
1 / 1 / 0
Регистрация: 03.11.2009
Сообщений: 92
11.02.2010, 23:50  [ТС] 8
А какой функцией можно определить свойство колонтитула "как в предыдущем разделе", при этом не входя в режим редактирования колонтитулов?
0
Заблокирован
12.02.2010, 07:48 9
Mikkelle,
запиши макрос с помощью макрорекордера и посмотри код.
0
1 / 1 / 0
Регистрация: 03.11.2009
Сообщений: 92
13.02.2010, 12:52  [ТС] 10
Эту функцию я знаю, но я указал в вопросе функцию, которая функционирует без выхода в режим редактирования колонтитулов!
0
Заблокирован
13.02.2010, 12:55 11
Mikkelle,
вставь код, который ты знаешь?
0
1 / 1 / 0
Регистрация: 03.11.2009
Сообщений: 92
14.02.2010, 11:51  [ТС] 12
PureBasic
1
2
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
Selection.HeaderFooter.LinkToPrevious = false
Без первой строки, вторая дает ошибку.
0
Заблокирован
14.02.2010, 12:18 13
Mikkelle,
Visual Basic
1
ActiveDocument.Sections(1).Headers(wdHeaderFooterPrimary).LinkToPrevious = False
Добавлено через 22 минуты
Это будет применяться для раздела, где находится курсор
Visual Basic
1
Selection.Sections(1).Headers(wdHeaderFooterPrimary).LinkToPrevious = False
1
1 / 1 / 0
Регистрация: 03.11.2009
Сообщений: 92
14.02.2010, 18:37  [ТС] 14
Большое спасибо!!! Я полагаю Seections(1) это то чего мне не хватало.
Подскажи тогда еще, как обратиться к объекту "поле", находящемуся в ячейке таблицы, которая в свою очередь находится в "надписи" и все это хозяйство в колонтитуле?
0
Заблокирован
14.02.2010, 19:26 15
Mikkelle,
зачем таблица находится в надписи?
0
1 / 1 / 0
Регистрация: 03.11.2009
Сообщений: 92
14.02.2010, 19:59  [ТС] 16
А тут получается очень хитрая ситуация. Допустим, я хочу иметь таблицу в колонтитулах. Если ее (таблицу) поместить в колонтитулы просто так, то каким-то странным образом он начинает влиять на основной текст. При прежних покзателях параметров полей страницы печатная область основного текста "корячится" как угодно (можешь попробовать сам, меня при этом свойства таблицы). Возможно это какой то из глюков Ворда, потому что при определенных "танцах с бубном" это припятствие преодолеть удается. Другое дело, если таблица помещена в надпись и сама надпись имеет обтекание "разместить за текстом" (например). Если попробуешь, увидишь разницу сам. Вот где так.
0
Заблокирован
14.02.2010, 20:04 17
Mikkelle,
а вставь образец своего колонтитула сюда.
0
1 / 1 / 0
Регистрация: 03.11.2009
Сообщений: 92
14.02.2010, 20:09  [ТС] 18
Прошу прощения, не понял, куда именно вставить?
0
Заблокирован
14.02.2010, 20:13 19
Mikkelle,
файл сюда можно вставить. Где пишешь, ниже есть расширенный режим, там можно файл вставить. Ты свои данные замени другими словами, чтобы просто представление иметь, что у тебя за колонтитул.
0
1 / 1 / 0
Регистрация: 03.11.2009
Сообщений: 92
15.02.2010, 02:11  [ТС] 20
Вот что-то типа такого.
Таблица в колонтитуле а по верх нее должен идти основной текст.
0
Вложения
Тип файла: doc sampdoc.doc (84.0 Кб, 92 просмотров)
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
15.02.2010, 02:11

Работа с колонтитулами в документе MS Word
Доброго времени суток! Возможно, эта тема поднималась, и не раз, но я либо туплю, либо плохо гуглю...

Работа с колонтитулами docx через Open XML
Добрый день, уважаемые форумчане ! Появилась необходимость найти и заменить некоторые слова в...

Глюк с колонтитулами!
Всем привет, такая проблема - когда копировал с 1 документа в другой, заглючили размера нижнего...

Как вставить нумерацию страниц, осложнено колонтитулами
Здравствуйте, дорогие форумчане, в полном отчаянии прошу помощи у гуру. Подскажите пожалуйста,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
20
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.