|
Использование DOCVARIABLE в Word'е
|
|||
---|---|---|---|
#18+
Существует задача атоматизации в документе word. Тема повторяется в документе большое число раз и необходимо её корректировать. Вставка->Поле->Автоматизация->DOCVARIABLE Если я правильно понимаю, то это переменные. Их можно вставлять в нужные места документа. Например: {DOCVARIABLE TEMA} - Тема! Потом менять тему вот так вот. Sub Change_Tema() ActiveDocument.Variables.Add("TEMA").Value = "Новая тема" End Sub Может существует возможность изменять значение переменной без макросов? После смены значения переменная не обновляется. Для обновления необходимо на ней кликнуть мышкой и нажать обновить. Почему-то переменные пропадают. Вместо них - обычный текст! Как грамотно реализовать документ шаблон с размещенными в нем переменными. И осуществлять изменения их значений по всему тексту? Можно ли как-нибудь реализовать концепцию единого источника. Т.е. есть фрагмент текста. Этот фрагмент встречается в другом месте этого документа или другом докумените. Если попытаться изменить этот фрагмент, то изменять можно было бы только в первой копии фрагмента или возможно подойдет вариант с изменениями во всех фрагментах. Напишите пример или ссылку на пример. Как решаются такие задачи. Заранее спасибо. ... |
|||
:
Нравится:
Не нравится:
|
|||
07.08.2007, 09:32 |
|
Использование DOCVARIABLE в Word'е
|
|||
---|---|---|---|
#18+
Для обновления значения после присваивания значений переменным пиши ActiveDocument.Fields.UpDate() т.е. по твоему коду получится Sub Change_Tema() ActiveDocument.Variables.Add("TEMA").Value = "Новая тема" ActiveDocument.Fields.UpDate() End Sub ... |
|||
:
Нравится:
Не нравится:
|
|||
30.08.2007, 21:53 |
|
Использование DOCVARIABLE в Word'е
|
|||
---|---|---|---|
#18+
Require, в моей версии Word на Update() со скобками ручается компилятор, про add говорит, что переменная существует, у меня получилось так: Public Sub Month() ActiveDocument.Variables.Item("мес_ч").Value = "09" ActiveDocument.Variables.Item("мес_с").Value = "Сентябрь" ActiveDocument.Fields.Update End Sub ... |
|||
:
Нравится:
Не нравится:
|
|||
20.09.2015, 05:28 |
|
|
start [/forum/topic.php?fid=60&msg=39056394&tid=2155793]: |
0ms |
get settings: |
10ms |
get forum list: |
13ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
33ms |
get topic data: |
8ms |
get forum data: |
2ms |
get page messages: |
36ms |
get tp. blocked users: |
1ms |
others: | 12ms |
total: | 123ms |
0 / 0 |