Форум программистов, компьютерный форум, киберфорум
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
 Аватар для Vinemax
149 / 117 / 10
Регистрация: 12.09.2011
Сообщений: 785

Не срабатывает поиск в документе Word

05.12.2014, 11:25. Показов 1021. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Привет всем!

Не могу разобраться... Написал вот такой макрос для поиска определенного слова/фразы:

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
        Dim rng As Range = ActiveDocument.Range(Start:=0, End:=0)
 
        Dim fnd As Find = rng.Find
 
        With fnd
            .ClearFormatting()
            .Wrap = WdFindWrap.wdFindStop
            .MatchWildcards = True
            .Forward = True
            .Text = "слово или фраза для поиска"
            .Execute()
        End With
Нужно, чтобы он нашел первое такое слово или фразу и выделил. А он ничего не делает. Курсор где стоял, там и стоит. Слово такое точно есть. Помогите, пожалуйста, кто чем может...

Спасибо!
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
05.12.2014, 11:25
Ответы с готовыми решениями:

Удаление совпадений текста в документе MS Word
на форме текстовое поле, и кнопка. есть уже созданный файл Word (docx)(путь к файлу word берется из текстового поля) с определенным...

Изменение кода полей EQ в документе MS Word
всем приветы. вот так вставил поле в документ Word: Dim txtF As String = "\f(2 · 0,1 · 10\s\up(3);46,364)" ...

Отображение границ таблицы в документе Word
Здравствуйте!, возникла такая проблема что при создание таблицы, её границы скрыты, то есть таблица ест а границы не видно.

2
6082 / 1327 / 195
Регистрация: 12.12.2012
Сообщений: 1,023
05.12.2014, 12:06
Здравствуйте, Vinemax,
А где команда выделения? Нет ее .

Добавьте ее в конец программы, пожалуйста: rng.Select

С уважением,
Аксима
P.S. Перенес вашу тему, т.к. используемые вами синтаксические конструкции совершенно недопустимы в VBA:
  1. Dim <имя_переменной> As <тип> = <инициализатор>
  2. <имя_процедуры>()
...а это значит, что вы, скорее всего, ошиблись разделом.

С уважением,
Аксима
1
 Аватар для Vinemax
149 / 117 / 10
Регистрация: 12.09.2011
Сообщений: 785
05.12.2014, 21:39  [ТС]
Аксима, меня интересовал именно VBA, прошу прощения, если не поправил код под него! ) В разделе Visual Basic .NET мне вряд ли ответят, т.к. это касается именно MS Word
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
05.12.2014, 21:39
Помогаю со студенческими работами здесь

Как определить пустую страницу в документе Word
Имеется набор документов .txt, после преобразования их в один документ .doc (кодировка MSDOS, исходные &quot;.txt&quot; расположены в...

Отредактировать разнотипную информацию в многостраничном документе MS Word
Дано: Большой документ MS Word страниц, скажем 60. Требуется: Изменить некоторую информацию в этом документе: значения графиков,...

Microsoft Word найти слово в документе и заменить его
Добрый день! Помогите с решением: Microsoft Word найти слово в документе и заменить его. К примеру в документе есть N кол-во страниц с...

Обработать нажатие клавиши клавиатуры и кнопки мыши в документе Word
Доброго времени суток! У меня возник вопрос: как можно обработать нажатие клавиши клавиатуры и кнопки мыши в документе ворд? Добавлено...

Замена текста в существующем документе Word через Область сопоставления XML
Друзья! Никак не могу разобраться с задачкой. Есть документ с XML-сопоставлением. В нем очень много повторяющихся слов, которые можно...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование
8Observer8 05.03.2026
Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D
8Observer8 04.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru