powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Хитрый макрос для Word
4 сообщений из 4, страница 1 из 1
Хитрый макрос для Word
    #32078010
grecha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Нужен макрос, при запуске которого будут изменяться поля документа ворд. Не понимаю, как это сделать, причем подсказку тоже сделать не получается: если, к примеру, я не пишу макрос, а начинаю запись макроса, изменяю нужные мне поля, сохраняюсь, то в листинге макроса присутствует только activdocument.save Может вообще такой макрос не сделать, и нужен принципиально другой подход? Кто что посоветует? документов для обработки несколько тысяч..

С уважением,
Сергей Гречнев
...
Рейтинг: 0 / 0
Хитрый макрос для Word
    #32078188
Tima2010
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
>>начинаю запись макроса, изменяю нужные мне поля, сохраняюсь, то в листинге макроса присутствует только activdocument.save

вот что у меня получилось (два раза поменял левое поле):

Sub Макрос1()
With Selection.ParagraphFormat
.LeftIndent = CentimetersToPoints(-0.32)
.SpaceBeforeAuto = False
.SpaceAfterAuto = False
End With
With Selection.ParagraphFormat
.LeftIndent = CentimetersToPoints(-0.95)
.SpaceBeforeAuto = False
.SpaceAfterAuto = False
End With
End Sub
...
Рейтинг: 0 / 0
Хитрый макрос для Word
    #32078278
Фотография mahoune
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2Tima2010, Я конечно могу ошибаться, но мне кажется grecha имел в виду не поля (Margins) а поля (Fields) это когда в документк есть поля а в них значения! Очень ужобно использовать в шаблонах, что-б пользователь изменял только поля и больше ничего!

2grecha, я так думаю, что наверняка есть массив содержащий объекты полей!

Код: plaintext
1.
2.
3.
4.
5.
6.
Sub aaa()
  r = ""
  For i =  1  To Me.Fields.Count
    r = r & Me.Fields.Item(i).Result & Chr( 13 ) & Chr( 10 )
  Next i
  MsgBox r
End Sub


Вот так у меня он вытаскивает значения полей! Но там еще много хорошего!
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
Хитрый макрос для Word
    #33439367
Вам нужен макрос который запрашивает расстояния полей и устанавливает их в открытом документе?
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Хитрый макрос для Word
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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