Поиск в word несколько документов

В Windows 10, Linux и macOS текстовые файлы можно с легкостью открыть при помощи Терминала (Командной строки) или стандартного редактора текста. Именно это дает возможность выполнять дальнейший поиск любого содержимого таких текстовых файлов без использования сторонних программных средств.

Поиском может быть охвачено множество файлов, однако для этого необходимо предварительно их открыть, а это может стать утомительным занятием. Но даже с популярными офисными инструментами для Windows 10, например такими, как Word или Microsoft 365, вы сможете найти текст только в текущем открытом документе и все.

Поиск определенного текста сразу в нескольких файлах

Очевидно, что текст вносится в файлы всевозможных форматов. Он не будет ограничен размещением только в документах DOC или DOCX. Электронные таблицы Excel, презентации PowerPoint также могут его содержать. Поэтому пользователям часто требуется найти конкретный файл по определенному содержимому.

Это можно осуществить следующим способом.

1. Посетите сайт sourceforge.net и загрузите бесплатное приложение «Office Search«, которое не требует установки в систему.
   

2. В самом верхнем поле «Что искать» напишите искомое слово или несколько, разделив их точкой с запятой.
3. В поле «Где» выберите каталог.
4. Если в нем есть вложенные папки, поставьте отметку для их активации.
5. При желании найти файлы определенного типа, введите их расширение.
6. Наконец, если вы ввели несколько слов, выберите опцию «Любое слово«, «Все слова«. Также можно установить «Соответствие регистру«.
7. Нажмите на кнопку «Поиск«.Когда сканирование будет завершено, в окне результатов вы увидите все документы каталога, среди которых синим цветом и словом «Найдено» будут обозначены файлы с искомым содержимым. Вы можете дважды нажать на нужный, чтобы открыть его.

Какие типы файлов поддерживаются?

Office Search умеет работать со всеми популярными форматами: DOCX, XLSX, PPTX, RTF, TXT, CSV. Также допускается поддержка файлов, созданных в LibreOffice.

Заключение

Если вы сохранили документ, а потом забыли, как он называется, его содержимое — наилучший способ найти такой файл повторно. Поиск по тексту здесь имеет решающее значение. Что еще важно, такие файлы, в отличие от изображений, не относятся к тому типу, о содержании которых можно судить по миниатюре. Ведь они не имеют эскизов, отображаемых в Проводнике операционной системы. Спасибо за внимание!

For a purpose of executing multiple normal and wildcard-based replacements in multiple MS Word files located in multiple folders under given root folder, I have created following VBA macro. In order to use it, you have change content of following variables (constants):

• rootPath: root folder under which are located folders containing Word documents.
• findTextsWild and replaceTextsWild: array of wildcard-based find and replace expressions.
• findTexts and replaceTexts: array of normal find and replace expressions.

May be you will find it usefull

Sub GlobalTextReplacement()
' Root under which all manuals are stored
Dim rootPath As String
rootPath = "c:DataManuals"

' Find and replace text for wildcard replacement. Performed first.
Dim findTextsWild() As Variant, replaceTextsWild() As Variant
findTextsWild = Array("[ ]{2;}", "[cC]onfiguration[/ ]@[pP]olicy [rR]epository", "[sS]ervlet[- ]@[fF]ilter")
replaceTextsWild = Array(" ", "Configuration/Policy Repository", "Servlet-Filter")

' Find and replace text for normal case insensitive replacement. Performed second.
Dim findTexts() As Variant, replaceTexts() As Variant
findTexts = Array("DirX Access", "Policy Repository", "User Repository", "Servlet", "servletfilter", "SAML assertion", "DirX Access Server", "DirX Access Manager", "Deployment Manager", "Policy Manager", "Client SDK", "^p ", " ^p")
replaceTexts = Array("DirX Access", "Policy Repository", "User Repository", "Servlet", "Servlet-Filter", "SAML assertion", "DirX Access Server", "DirX Access Manager", "Deployment Manager", "Policy Manager", "Client SDK", "^p", "^p")

' Main code
Application.ScreenUpdating = False

Dim dirNames(20) As String
Dim dirNamesCount As Integer
dirNamesCount = 0

Dim dirName As String
dirName = Dir$(rootPath & "*", vbDirectory)
Do Until LenB(dirName) = 0
    Dim dirPath As String
    dirPath = rootPath & dirName
    If ((GetAttr(dirPath) And vbDirectory) = vbDirectory) And (dirName <> ".") And (dirName <> "..") Then
        dirNamesCount = dirNamesCount + 1
        dirNames(dirNamesCount) = dirPath & ""
    End If
    dirName = Dir$
Loop

Do While dirNamesCount > 0
    Dim fileName As String
    dirName = dirNames(dirNamesCount)
    dirNamesCount = dirNamesCount - 1
    fileName = Dir$(dirName & "*.doc", vbDirectory)
    Do Until LenB(fileName) = 0
        Dim filePath As String
        filePath = dirName & fileName
        fileName = Dir$

        Dim document As document
        Set document = Documents.Open(filePath)
        document.TrackRevisions = True

        document.Select

        Dim i As Integer, maxIndex As Integer
        maxIndex = UBound(findTextsWild)
        For i = LBound(findTextsWild) To maxIndex
            With Selection.Find
                .ClearFormatting
                .Replacement.ClearFormatting
                .Text = findTextsWild(i)
                .Replacement.Text = replaceTextsWild(i)
                .Execute Replace:=wdReplaceAll, Forward:=True, _
                    Wrap:=wdFindContinue, MatchWildcards:=True
            End With
        Next

        maxIndex = UBound(findTexts)
        For i = LBound(findTexts) To maxIndex
            With Selection.Find
                .ClearFormatting
                .Replacement.ClearFormatting
                .Text = findTexts(i)
                .Replacement.Text = replaceTexts(i)
                .Execute Replace:=wdReplaceAll, Forward:=True, _
                    Wrap:=wdFindContinue, MatchCase:=False, MatchWildcards:=False
            End With
        Next

        document.Save
        document.Close
    Loop
Loop

Application.ScreenUpdating = True
End Sub

В статье «Поиск по тексту документов в папке» мы рассмотрели способ, как искать по содержимому множества офисных документов, в том числе по точному совпадению фразы. Рассмотренный способ позволяет без установки дополнительных программ найти нужный файл, содержащий искомую строку. Но у предложенного в той заметке метода имеются недостатки:

• поиск медленный, особенно это чувствуется если искать в папке, содержащей очень много (сотни) документов
• для поиска используется Проводник Windows, который не очень удобен сам по себе и требует дополнительной настройки
• возможен поиск по архивам, но набор поддерживаемых форматов очень сильно ограничен
• для поиска по буквальному совпадению строки нужно запомнить сложную конструкцию (я до сих пор открываю эту статью, чтобы найти нужную последовательность символов)

В общем, предложенный метод лучше, чем ничего, но является не очень удобным.

В этой статье я покажу новый способ, который позволяет искать по файлам Word и всем другим офисным файлам, поддерживаемым программами из MS Office (говоря правильным языком, по любым офисным XML файлам).

Нам понадобится Double Commander. Если вы ещё не знакомы с этой программой, почитайте статью «Бесплатный аналог Total Commander», я не сомневаюсь, вы полюбите этот файловый менеджер!

Double Commander из коробки поддерживает множество архивов, но если вы хотите получить поддержку вообще любых архивов, которые только существуют, то ознакомьтесь со статьёй «Как в Double Commander добавить плагин для поддержки всех видов архивов» (это не сложно).

Итак, чтобы выполнить полнотекстовый поиск по офисным файлам, в Double Commander перейдите в папку с документами и нажмите иконку «Поиск», также для открытия окна поиска вы можете использовать сочетание клавиш Alt+F7.

В открывшемся окне поставьте галочку «Искать в файле текст» и введите текст, который вы хотите найти. Обязательно поставьте галочку «Офисные XML». Чтобы ограничить поиск по определённым файлам, вы можете ввести части имени в поле «Искать файлы». Когда всё готово, нажмите кнопку «Старт».

После завершения поиска, вы увидите вкладку с результатами, где будут перечислены все файлы, содержащие искомую фразу. Для перехода к нужному файлу, кликните на его имя два раза.

Подсказка: если вы хотите ознакомиться с несколькими файлами в результатах поиска, то после выполнения первого поиска и открытия первого файла, вам не нужно заново запускать поиск — откройте эту панель и сразу перейдите во вкладку «Результаты» — там хранятся результаты, найденные при последнем поиске.

Чтобы искать по архивам, при указании условий поиска дополнительно поставьте галочку «Искать в архивах».

Теперь полнотекстовый поиск по офисным файлам будет выполняться даже для документов, помещённых в архивы. В результатах поиска будут показаны имена архивов и имена файлов в этих архивах, содержащих искомый текст.

Если у вас есть несколько десятков файлов слов, которые содержат одинаковое содержимое (например, верхний колонтитул, нижний колонтитул, некоторые специальные слова или числа), и вам необходимо заменить одно и то же содержимое в этих документах в Word. Как вам было бы проще сделать это быстро? Конечно, вы можете открывать эти файлы один за другим, чтобы заменить одно и то же содержимое, но это займет много времени и проблем. Это руководство покажет вам сложный способ одновременной замены одного и того же содержимого в нескольких документах Word.

Находите и заменяйте тексты в нескольких документах Word одновременно с помощью кода VBA
Легко находите и заменяйте разные тексты в нескольких документах одновременно с помощью Kutools for Word

–>

Находите и заменяйте тексты в нескольких текстовых документах одновременно с кодом VBA

1. Нажмите Alt + F11 , чтобы открыть окно Microsoft Visual Basic для приложений .

2. В окне Microsoft Visual Basic для приложений нажмите Вставить > Module , затем скопируйте следующий код VBA в модуль окно.

Код VBA: поиск и замена одного и того же содержимого в нескольких документах одновременно

3. Нажмите клавишу F5 , чтобы запустить код.

4. В открывшемся окне Обзор найдите и выберите документы, которые вы найдете, и замените текст внутри, а затем нажмите кнопку OK . См. Снимок экрана:

5. В первом диалоговом окне Kutools for Word введите текст, который вы найдете в документах, в поле Найти , а затем нажмите Кнопка ОК .

6. Во втором диалоговом окне Kutools for Word введите текст, которым вы будете заменять, и нажмите кнопку OK .

8. Нажмите кнопку OK в следующем диалоговом окне Microsoft Word , чтобы завершить поиск и замену..

В этом случае все слова “Word” в выбранном документы заменяются на «Excel» одновременно.

Легко находите и заменяйте разные тексты в нескольких документах одновременно с помощью Kutools for Word

Здесь настоятельно рекомендуется использовать функцию Пакетного поиска и замены в Kutools for Word . С помощью этой функции вы можете легко находить и заменять разные тексты в нескольких документах Word одновременно. Давайте посмотрим, как применить эту функцию для поиска и замены текста в документах.

Kutools for Word : с более чем 100 удобными надстройками Word, бесплатно, без ограничений в течение 60 дней .

1. Нажмите Kutools Plus > Пакетный поиск и замена , чтобы включить эту функцию.

2. В диалоговом окне Пакетный поиск и замена настройте следующее.

• 2.1) Нажмите Добавить строку на вкладке Найти и заменить ;
• 2.2) В полях созданной строки:

A . Введите текст, который вы найдете, в текстовое поле в столбце Найти
B. Введите текст, который вы замените, в текстовое поле в столбце Заменить ;
C. Укажите тип поиска, где искать текст и цвет для выделения текста по мере необходимости. В этом случае я выбираю полное соответствие слов , основной документ и определенный цвет из типа поиска, Найти в и Выделить столбцы;

• 2.3) Повторите шаги 2.1 и 2.2, чтобы добавить другие тексты, которые вы будете найти и заменить;
• 2.4) Нажмите кнопку в Тип файла , чтобы добавить документы Word, в которых вы будете искать и заменять тексты;
• 2.5) Нажмите Заменить или Найти кнопка. См. Снимок экрана:

Примечания :

3. Закройте диалоговое окно Пакетный поиск и замена

Для получения дополнительных сведений об этой функции щелкните здесь ….

Если вы хотите получить бесплатную пробную версию этой утилиты, сначала перейдите к бесплатно загрузить программное обеспечение , а затем перейдите к применению операции в соответствии с вышеуказанными шагами.

Рекомендуемые инструменты для повышения производительности Word