Этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
Политика конфиденциальности
|
|
|
MSWord & Find/Replace
|
|||
|---|---|---|---|
|
#18+
Ситуация критическая, срочно заканчивать проект надо, а тут подводный камень очередной Ситуация: Есть MS Word, на нем объекты автофигуры "Надпись", там соответственно текст. записываю макрос, тычу Ctrl+F заполняю форму подстановки, все ништяк находит и заменяет а то, что мне нужно. Залезаю в VB зырю код, все ништяк, по идее так и должно быть. Пробую повторить те же действия, но уже с помощью записанного макроса. Итог, текст, что на листе меняется, текст который в объекте автофигуры не хочет... Что Word или я не так делаем? вот код макроса, который генерирует ворд: Application.Keyboard (1049) Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = "<<Полное ФИО страхователя>>" .Replacement.Text = "Иванов Ван Ваныч" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False End With Selection.Find.Execute Replace:=wdReplaceAll ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.07.2003, 10:05 |
|
||
|
|

start [/forum/topic.php?fid=16&fpage=231&tid=1348794]: |
0ms |
get settings: |
10ms |
get forum list: |
13ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
52ms |
get topic data: |
10ms |
get forum data: |
3ms |
get page messages: |
29ms |
get tp. blocked users: |
2ms |
| others: | 12ms |
| total: | 139ms |

| 0 / 0 |
