Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Ссылки в Word / 8 сообщений из 8, страница 1 из 1
05.04.2007, 14:56:43
    #34440747
Chuchi-ptz
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ссылки в Word
Уже задавала вопрос, но никто так и не ответил...
Господа ПОМАГИТЕ ПОЖАЛУЙСТА!
У меня есть договор в Word, в договоре пункты, в тексте договора есть ссылки на пункты (н-р: см.п.6.3). В ситуации когда предшествующий пунт удаляется, нумерация меняется и теоритически моя ссылка должна тоже измениться на см.п.6.2, но фактически она не меняеться... КАК СДЕЛАТЬ ТАК ЧТОБЫ ИЗМЕНЕНИЕ ПРОИСХОДИЛО ОДНОВРЕМЕННО И ТАМ И ТАМ?
...
Рейтинг: 0 / 0
05.04.2007, 14:59:36
    #34440764
Granata005
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ссылки в Word
Делай в экселе формулу....
...
Рейтинг: 0 / 0
05.04.2007, 15:01:13
    #34440767
Chuchi-ptz
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ссылки в Word
У меня договор в Ворде!
...
Рейтинг: 0 / 0
05.04.2007, 15:05:52
    #34440789
Granata005
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ссылки в Word
Ну если уж переход на эксель не возможен, то юристам могу посоветовать организовать цикл поиска значения "см.п.*" который при нахождение значения будет выставлять нужный порядок...

т.е.
х=1
пока найти("см.п.")
выделить правее на пару символов
написать "см.п. " & х
х=х+1
конец
...
Рейтинг: 0 / 0
05.04.2007, 15:14:37
    #34440817
Chuchi-ptz
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ссылки в Word
ОГОГО! извеняюсь за несмышленость! А ЭТО КУДА ПРОПИСЫВАТЬ!?
...
Рейтинг: 0 / 0
05.04.2007, 15:37:01
    #34440903
Granata005
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ссылки в Word
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Sub Макрос1()
Dim x
x =  1   'обнуляем счётчик
Selection.HomeKey (wdStory)  'перейти в начало
  Do While Selection.Find.Execute(FindText:="см.п.", Forward:=True)  'искать см.п.
   Selection.Delete Unit:=wdCharacter, Count:= 1   'выбрать ещё один символ справа
    Selection.TypeText Text:="см.п. " & x      'напечатать см.п.1
    x = x +  1          '+1 к счётчику...
   Loop  
End Sub
...
Рейтинг: 0 / 0
05.04.2007, 15:41:41
    #34440923
Granata005
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ссылки в Word
Понятно?
Создаёшь такой макрос и кнопочку на панель вешаешь для его запуска....
Count:=1 может быть и больше, в зависимости от величины ссылки....
вместо х можешь завести пару переменных
x1=6
x2=1

Selection.TypeText Text:="см.п. " & x1 & "." & x2 & "."
x2=x2+1

тогда будет:
см.п. 6.1.
см.п. 6.2.
...
Рейтинг: 0 / 0
05.04.2007, 16:18:11
    #34441095
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ссылки в Word
Chuchi-ptzУже задавала вопрос, но никто так и не ответил...
Господа ПОМАГИТЕ ПОЖАЛУЙСТА!
У меня есть договор в Word, в договоре пункты, в тексте договора есть ссылки на пункты (н-р: см.п.6.3). В ситуации когда предшествующий пунт удаляется, нумерация меняется и теоритически моя ссылка должна тоже измениться на см.п.6.2, но фактически она не меняеться... КАК СДЕЛАТЬ ТАК ЧТОБЫ ИЗМЕНЕНИЕ ПРОИСХОДИЛО ОДНОВРЕМЕННО И ТАМ И ТАМ?

Если текст пунктов сделать стилями заголовков или другми нумерованными стилями, то ссылаться на пункты нужно через меню вставка - ссылка - перекрёстная ссылка
Тип ссылки: - Абзац
Вставить ссылку на: Номер абзаца
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Ссылки в Word / 8 сообщений из 8, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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