|
|
|
Как выделить все вхождения слова в документе Word
|
|||
|---|---|---|---|
|
#18+
Dim oWrdApp As New Word.Application With oWrdApp .Documents.Open d:\temp\test.doc With .Selection.Find .ClearFormatting .MatchWholeWord = True .MatchCase = False .Execute FindText:="application", Wrap:=wdFindContinue, Forward:=True End With .Visible = True End With Подскажите пожалуйста как выделить все вхождения слова "application" - в приведенном коде выделяется только первое вхождение слова. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.11.2006, 12:36 |
|
||
|
Как выделить все вхождения слова в документе Word
|
|||
|---|---|---|---|
|
#18+
Нажимаете Ctrl+F (поиск соотвественно) и там есть во вкладке Найти есть галочка Выделить все элементы найдденные в и пишите слово application, и все будет в ажуре ;), соотвественно записанный макрос: Код: plaintext 1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 11. 12. 13. 14. 15. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.11.2006, 12:50 |
|
||
|
Как выделить все вхождения слова в документе Word
|
|||
|---|---|---|---|
|
#18+
orunbek, сделала все как вы написали - перестало вообще что либо искать..... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.11.2006, 13:10 |
|
||
|
Как выделить все вхождения слова в документе Word
|
|||
|---|---|---|---|
|
#18+
попробуйте в самом Word'е проделать это, затем записать это в макрос через "Запись макроса". Не знаю у меня все нормально пашет, может проблема в самом документе, выложите документ если ничего не получается ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.11.2006, 14:05 |
|
||
|
|

start [/forum/topic.php?fid=60&fpage=259&tid=2165006]: |
0ms |
get settings: |
7ms |
get forum list: |
10ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
48ms |
get topic data: |
7ms |
get forum data: |
2ms |
get page messages: |
37ms |
get tp. blocked users: |
2ms |
| others: | 247ms |
| total: | 364ms |

| 0 / 0 |
