| |
|
|
| | Проблема: в файле куча таблиц - нужно ТОЛЬКО в таблах удалить Enter.
Вопрос - как обнаружить кодом таблу, выделить ее, грохнуть в выделеном нужный символ.
п.с. офис ХР - ну люблю я его  | |
| |
| |
| |
|
|
| | Вроде обошел проб лему с поиском таблы
Selection.Find.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
Selection.Tables(1).Select
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "^p"
.Replacement.Text = " "
.Forward = True
.Wrap = wdFindAsk
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
|
, но что нужно написать после этого чтоб он понимал по умолчанию "НЕТ" | |
| |
| |
|
|
| |
|
|
| | ты глазки строишь, а мне по 300 раз на неизвестно каком количестве файлов мыша жать   | |
| |
| |
| |
|
|
| | Я просто - не рублю чё ты спроил - это мне совершенно не о чём не гутарит....... | |
| |
| |
| |
|
|
| | написан код (через построитель макросов) замены Enter на пробел - но нужно заменить только в выделенном фрагменте и продолжить прогу дальше, т.е. появляется окно-вопрос - "Продолжить замену в остальной части документа или нет". по логике должны быть параметры которые можно задать для того чтобы окно не выскакивало, а код понимал, что ответили НЕТ и все шло дальше. вот как это сделать я не знаю в VB для Word ничего не делал а справки толковой не найду. | |
| |
| |
| |
|
|
| | уря нашел - нужно было вот так заменить
.Wrap = wdFindStop ' = wdFindAsk
плохо когда не знаешь, да еще и забыл | |
| |
| |
|
|
|
|
| |
|
|
| |   - за тебя!!!
| |
| |
| |
