ReSQL.ru
     
powered by simpleCommunicator - 2.0.55     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как нумеровать строки в Word VBA
20 сообщений из 20, страница 1 из 1
Как нумеровать строки в Word VBA
    #37012724
studieren
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
studieren
Участник
(MS Office 2003).

Народ, не подскажите как в "Word"е программно (VBA) пронумеровать активную строку в 2 уровня?
Т.е. там где курсор мигает (как бы активная строчка) мне необходимо пронумеровать как "1.1.", "1.2." и вообще не обязательно при этом начинать с единички. Некоторые "активные строчки" у меня должны быть пронумерованы как "2.1." или скажем "5.5.".

Несколько раз попробовал запустить макрос и прочесть что пишет VBA. Но каждый раз почему-то получается одноуровневая нумерация типа так "1.", "2." и т.д.
...
Рейтинг: 0 / 0
14.12.2010, 10:04
| Ответить | Цитировать | Написать  
Как нумеровать строки в Word VBA
    #37012748
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
studierenНесколько раз попробовал запустить макрос и прочесть что пишет VBA. Но каждый раз почему-то получается одноуровневая нумерация типа так "1.", "2." и т.д.
Так запустите макрос и задайте в диалоге двухуровневую нумерацию, в чем проблема-то? Заодно задайте стартовые значения для нумерации - увидите, как это выглядит в коде.
...
Рейтинг: 0 / 0
14.12.2010, 10:20
| Ответить | Цитировать | Написать  
Как нумеровать строки в Word VBA
    #37012754
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Кстати, вы вообще в курсе, что уровни нумерации задаются стилями?
...
Рейтинг: 0 / 0
14.12.2010, 10:22
| Ответить | Цитировать | Написать  
Как нумеровать строки в Word VBA
    #37012770
studieren
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
studieren
Участник
Shocker.Pro,

Пробовал несколько раз. Указываю 2-уровневую нумерацию. Всё время получается "1.", "2." и т.д.
...
Рейтинг: 0 / 0
14.12.2010, 10:29
| Ответить | Цитировать | Написать  
Как нумеровать строки в Word VBA
    #37012801
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
studierenПробовал несколько раз. Указываю 2-уровневую нумерацию. Всё время получается "1.", "2." и т.д.
вы стили правильные для абзацев задаете?
...
Рейтинг: 0 / 0
14.12.2010, 10:38
| Ответить | Цитировать | Написать  
Как нумеровать строки в Word VBA
    #37012849
studieren
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
studieren
Участник
Shocker.ProstudierenПробовал несколько раз. Указываю 2-уровневую нумерацию. Всё время получается "1.", "2." и т.д.
вы стили правильные для абзацев задаете?

Прошу прощения, а это как? Где надо изменить стиль?
...
Рейтинг: 0 / 0
14.12.2010, 10:50
| Ответить | Цитировать | Написать  
Как нумеровать строки в Word VBA
    #37012939
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
studierenПрошу прощения, а это как? Где надо изменить стиль?
Понятно.
То есть вы для начала не знаете, как создать автонумерацию просто в ворде без VBA - так сначала с этим разберитесь, а потом будете VBA прикручивать.

УРОВЕНЬ абзаца в многоуровневом нумерованном списке определяется стилем абзаца, по умолчанию - это стили, "заголовок 1", "заголовок 2" и т.д., но можно привязаться к любым стилям (см. настройки нумерованного списка). То есть, если вы хотите, чтобы у вас был второй уровень - надо выбрать стиль "Заголовок 2"

Стиль задается через меню "Формат" ну или просто выбирается из выпадающего списка на панели инструментов.
...
Рейтинг: 0 / 0
14.12.2010, 11:24
| Ответить | Цитировать | Написать  
Как нумеровать строки в Word VBA
    #37013056
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь Горбонос
Участник
> Автор: Shocker.Pro
> УРОВЕНЬ абзаца в многоуровневом нумерованном списке определяется стилем абзаца, по умолчанию - это стили,
> "заголовок 1", "заголовок 2" и т.д., но можно привязаться к любым стилям (см. настройки нумерованного списка). То
> есть, если вы хотите, чтобы у вас был второй уровень - надо выбрать стиль "Заголовок 2"


Вау! А я когда-то промучался, ничего не получилось и сделал в Екселе и с тех пор посылаю всех в (_|_) с такими запросами
со словами - я не умею. А это оказывается не просто, а очень просто делается. Пора начинать осваивать ворд. Пойду,
запишусь к ЦЭ в ученики, наверное.


Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
14.12.2010, 11:53
| Ответить | Цитировать | Написать  
Как нумеровать строки в Word VBA
    #37013099
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
Игорь Горбонос, эти навороты "заголовок 1", "заголовок 2" и т.д.
Ересь не пользуюсь, пробовал без ВБА раз 20, со временем слетают стили
У меня заголовки в бесцветной табличке с тремя ячейками, отступами, 1 ячейка 3 см., последняя 2 см. и прога ищет в первой ячейке поля где всё зашито и считывает, ОК!!!!!
...
Рейтинг: 0 / 0
14.12.2010, 12:07
| Ответить | Цитировать | Написать  
Как нумеровать строки в Word VBA
    #37013104
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь Горбонос
Участник
> Автор: Ципихович Эндрю
> Ересь не пользуюсь, пробовал без ВБА раз 20, со временем слетают стили


Вот! поэтому твердая копия рулит :D

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
14.12.2010, 12:09
| Ответить | Цитировать | Написать  
Как нумеровать строки в Word VBA
    #37013114
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Ципихович Эндрюсо временем слетают стили
не городи ерунду.
Я в свое время ВЕРСТАЛ рекламные буклеты, проспекты, ТЗ, диплом, в конце-концов свой. Стили - мощная штука, надо только пользоваться уметь.

К примеру из этих "заголовков" можно легким движением руки собрать оглавление с автоматически обновляемыми номерами страниц.
...
Рейтинг: 0 / 0
14.12.2010, 12:11
| Ответить | Цитировать | Написать  
Как нумеровать строки в Word VBA
    #37013115
studieren
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
studieren
Участник
Shocker.Pro,

Нажал на правую кнопку мышки, затем "Список" и там вкладка "Многоуровневый". Выбрал из списка различные варианты, нажал на кнопку "Изменить" и там нашёл "Связать уровень со стилем". Выбрал различные варианты стилей, но все равно Word начинает с 1-уровня.

Набрал руками "1.1. Текст" и потом нажимаю на Enter. Вроде получается то, что надо.
Пытаюсь пробовать такой код в VBA:
Код: plaintext
1.
2.
3.
4.
    Selection.TypeText Text:="1.1."
    Selection.TypeText vbTab
    Selection.TypeText Text:="Текст"
    Selection.TypeParagraph
или такой
Код: plaintext
1.
2.
    Selection.TypeText Text:="1.1. Текст"
    Selection.TypeParagraph

НЕ ПОЛУЧАЕТСЯ!!! Что делать?
...
Рейтинг: 0 / 0
14.12.2010, 12:11
| Ответить | Цитировать | Написать  
Как нумеровать строки в Word VBA
    #37013120
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Игорь ГорбоносВот! поэтому твердая копия рулит :D
от тебя не ожидал.
Микроскопом тоже можно гвозди заколачивать. А можно уметь пользоваться.
Люди, окончившие курсы(!) по ворду, не знают и 5% его возможностей (и это без учета ВБА)
...
Рейтинг: 0 / 0
14.12.2010, 12:12
| Ответить | Цитировать | Написать  
Как нумеровать строки в Word VBA
    #37013124
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
studierenи там нашёл "Связать уровень со стилем". Выбрал различные варианты стилей, но все равно Word начинает с 1-уровня.
А самим абзацам присвоил нужные стили?????
...
Рейтинг: 0 / 0
14.12.2010, 12:13
| Ответить | Цитировать | Написать  
Как нумеровать строки в Word VBA
    #37013134
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
studierenНабрал руками "1.1. Текст" и потом нажимаю на Enter. Вроде получается то, что надо.
ненавижу последние версии ворда за долбаную автоматизацию. Жмешь, к примеру ТАБ в начале абзаца, а он делает красную строку. Чем выше версия - тем сильнее он тебя пытается запутать.
...
Рейтинг: 0 / 0
14.12.2010, 12:17
| Ответить | Цитировать | Написать  
Как нумеровать строки в Word VBA
    #37013137
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
Shocker.Pro,
>не городи ерунду.
Я в свое время ВЕРСТАЛ рекламные буклеты, проспекты, ТЗ, диплом, в конце-концов свой. Стили - мощная штука, надо только пользоваться уметь.

Никогда не говори никогда
я ж говорю у меня в документе были кнопки, стали рисунки, ересь, всё когда нибудь кончается

В этом
Стили - мощная штука, надо только пользоваться уметь.
Согласен
Я не научился, но просто по по потребностям с полями мне проще и видны лучше и т. д.
...
Рейтинг: 0 / 0
14.12.2010, 12:18
| Ответить | Цитировать | Написать  
Как нумеровать строки в Word VBA
    #37013142
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
Shocker.Proненавижу последние версии ворда за долбаную автоматизацию. Жмешь, к примеру ТАБ в начале абзаца, а он делает красную строку. Чем выше версия - тем сильнее он тебя пытается запутать.

Согласен 2003 сила
2007 херь
2010 не видел
...
Рейтинг: 0 / 0
14.12.2010, 12:19
| Ответить | Цитировать | Написать  
Как нумеровать строки в Word VBA
    #37013145
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
 
Ципихович ЭндрюЯ не научился

тогда изыди из этого топика, не мешай человеку решать проблему
...
Рейтинг: 0 / 0
14.12.2010, 12:21
| Ответить | Цитировать | Написать  
Как нумеровать строки в Word VBA
    #37013170
studieren
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
studieren
Участник
Shocker.Prostudierenи там нашёл "Связать уровень со стилем". Выбрал различные варианты стилей, но все равно Word начинает с 1-уровня.
А самим абзацам присвоил нужные стили?????

К сожалению Word не знаю в совершенстве. Я из тех, кто знает Word меньше чем на 5 %. А word мне пригодился для формирования "красивого" отчёта. Дело в том, что данные по отчёту находятся в MS Access. Я через VBA хочу передать значения в Word и там как на зло мне нужно нумеровать пункты в 2 уровня. И у меня не получается ни как! Please если умеете, не могли бы у себя в Word сделать макрос а сюда скинуть код? Мне очень, очень, очень, очень НАДО! Please!!!
Заранее благодарю за помощь!
...
Рейтинг: 0 / 0
14.12.2010, 12:28
| Ответить | Цитировать | Написать  
Как нумеровать строки в Word VBA
    #37013198
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Код: plaintext
Rng.Style = ActiveDocument.Styles("Заголовок 2")

где Rng - это ваши абзацы, которым вы собираетесь сделать нумерацию
...
Рейтинг: 0 / 0
14.12.2010, 12:45
| Ответить | Цитировать | Написать  
20 сообщений из 20, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как нумеровать строки в Word VBA
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&msg=37013145&tid=2159154]:
 0ms
get settings:
 10ms
get forum list:
 13ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 33ms
get topic data:
 11ms
get forum data:
 2ms
get page messages:
 63ms
get tp. blocked users:
 1ms
others: 339ms
total:  478ms
созд. / загр.: 478ms
x
x
Закрыть


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