Открыть все файлы word в папке

This is the last step of my work. I have designed a code to retrieve tables from a Word document.
I have written a code which works for each individual Word document. I have thousands of Word documents and I would love to automate the process.

In other words, I would like to run the code for all the .doc files in the same folder but I can’t seem to get my head around it.

The (beginning) code looks like this:

Sub importTableDataWord()
Dim ws As Worksheet
Set ws = Sheets("Sheet1")
'We declare object variables for Word Application and document
Dim wdApp As Object, wddoc As Object
'Declare a string variable to access our Word document
Dim strDocName As String

'Designate Word
'Error handling
On Error Resume Next
'Create a Word application if Word is not already open
Set wdApp = CreateObject("Word.Application")
wdApp.Visible = True
strDocName = "C:UsersPDXDocumentsCBA01.doc"
'Check relevant directory for relevant document
'If not found then inform the user and close program
If Dir(strDocName) = "" Then
    MsgBox "The file " & strDocName & vbCrLf & _
    "was not found in the folder path" & vbCrLf & _
    "C:our-inventory.", _
    vbExclamation, _
    "Sorry, that document name does not exist."
Exit Sub
End If

'Open/activate the designated Word
wdApp.Activate
Set wddoc = wdApp.Documents(strDocName)
If wddoc Is Nothing Then Set wddoc = wdApp.Documents.Open(strDocName)
wddoc.Activate

'Define variables to access the tables in the word document
Dim Tble As Integer
Dim rowWd As Long
Dim colWd As Integer
Dim x As Long, y As Long
x = 1
y = 1


''''' FIRST LINE, FIRST TABLE

'Count nb of tables in my Word
With wddoc
Tble = wddoc.Tables.Count
    If Tble = 0 Then
    MsgBox "No Tables found in the Word document", vbExclamation, "No Tables to Import"
Exit Sub
End If

'Start the looping process to access tables and their rows, columns
For i = 1 To 1
    With .Tables(i)
    For colWd = 1 To .Columns.Count
    Cells(x, y) = WorksheetFunction.Clean(.cell(1, colWd).Range.Text)
    'Access next column until the end
    y = y + 1
    Next colWd
    'go to next row and start from column 1
    y = 1
    x = x + 1
End With
Next
End With

wdApp.Quit
End Sub

I was thinking to use something similar as below but can’t find a way to create a loop to apply the code!

'set folder where all the .doc are located
myFolder = "C:UsersPDXDocuments"
strFile = Dir(myFolder & "*.doc", vbNormal)
While strFrile <> ""
Set wddoc = wdApp.Documents.Open(Filename:=myFolder & "" & strFile, AddToRecentFiles:=False, Visible:=True)

'Open/activate the designated Word
wdApp.Activate
Set wddoc = wdApp.Documents(strDocName)
If wddoc Is Nothing Then Set wddoc = wdApp.Documents.Open(strDocName)
wddoc.Activate

But I also thought of creating a sub calling my main sub:

Sub testhello()
Dim file
Dim path As String


path = "C:UsersPDXDocuments"

file = Dir(path & "*.doc")
Do While file <> ""
Documents.Open Filename:=path & file

Call importTableDataWord

ActiveDocument.Save
ActiveDocument.Close

file = Dir()
Loop

End Sub
Ideally, 1 w

Ideally, the loop would be such that 1 word table retrieved = 1 spreadsheet, OR, the next table retrieved would appear after the last row.

Any feedback appreciated. If you know about some of it, or have any hint, feel free to propose!

0 / 0 / 0

Регистрация: 11.08.2016

Сообщений: 55

1

11.08.2016, 22:07. Показов 14849. Ответов 16


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

Всем привет!Окажите содействие плиз: имеется папка с файлами .тхт необходим макрос который открывает все файлы из этой папки в Ворде(если возможно была признательна если можно было реализовать вывод диалогового окна выбора папки в котором сразу открывалась папка из которой нужно открыть файлы), затем нужно изменить на альбомную ориентацию , сделать 8 шрифт распечатать файл и сохранить в формате .doc .docx или .RTF тут не важно главное чтоб читался вордом и форматирование не слетало.Пробовала рекордером но получилось только изменение форматирования записать и печать. При сохранении он сохраняет одним и тем же именем т.е. в макрос записывается имя первого сохраняемого файла и все последующие пытается сохранить под тем же именем.такое реально реализовать ? Хелп ми))), около ста отчетов приходится лопатить вручную((((
З.Ы, если это упростит задачу все файлы имеют идентичные названия , например, report1, report2,report3 и т.д.



0



pashulka

4131 / 2235 / 940

Регистрация: 01.12.2010

Сообщений: 4,624

12.08.2016, 10:18

2

Попробуйте так (только тестировать, разумеется, нужно на нескольких файлах)

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
Private Sub Test()
    Dim iPath$, iFileName$
    iPath = "C:Мои отчёты"
    
    With Application.FileDialog(msoFileDialogFolderPicker)
         .Title = "Выберите папку с .txt файлами"
         .InitialFileName = iPath
         If .Show = -1 Then
            iPath = .SelectedItems(1) & ""
         Else
            MsgBox "Отказ от выбора папки", vbCritical: Exit Sub
         End If
    End With
    
    iFileName = Dir(iPath & "Report*.txt")
    If Len(iFileName) > 0 Then
       Application.ScreenUpdating = False
       Do
            With Documents.Open(iPath & iFileName, Encoding:=1251)
                 .Content.Font.Size = 8
                 .PrintOut
                 .SaveAs iPath & Replace(iFileName, _
                 ".txt", ".doc", , , vbTextCompare), wdFormatDocument
                 .Close
            End With
            'Kill iPath & iFileName
            iFileName = Dir
       Loop Until Len(iFileName) = 0
       Application.ScreenUpdating = True
    Else
       MsgBox "В выбранной папке нет наших файлов", vbCritical
    End If
End Sub

~ Тоже самое, но без сообщений

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Private Sub Test2()
    Dim iPath$, iFileName$
    iPath = "C:Мои отчёты"
    
    With Application.FileDialog(msoFileDialogFolderPicker)
         .Title = "Выберите папку с .txt файлами"
         .InitialFileName = iPath
         If .Show = 0 Then Exit Sub
         iPath = .SelectedItems(1) & ""
    End With
    
    iFileName = Dir(iPath & "Report*.txt")
    Do Until Len(iFileName) = 0
       With Documents.Open(iPath & iFileName, , , , , , , , , wdOpenFormatText, 1251, False)
            .Content.Font.Size = 8
            .PrintOut
            .SaveAs iPath & Replace(iFileName, ".txt", ".doc", , , vbTextCompare), wdFormatDocument
            .Close
       End With
       'Kill iPath & iFileName
       iFileName = Dir
    Loop
End Sub



0



roneta90

0 / 0 / 0

Регистрация: 11.08.2016

Сообщений: 55

14.08.2016, 16:44

 [ТС]

3

Добавлено через 31 минуту
не получается! не находит файлы. пишет что в папке не найдены файлы.прилагаю скрины. и почему то не появился сам макрос в списке макросов. Наткнулась на такой макрос(см. ниже) Он работает но открывает Вордовские документы и меняет их(в данном случает стирается все содержимое) может его как то адаптировать под мою задачу:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Option Explicit
Dim WordObj As Object
Dim WordDoc As Object
Dim MyPath As String
Dim iFileName As String
Sub Макрос1 ()
Set WordObj = CreateObject("Word.Application")
MyPath = "C:Report" 'указать пут к папке'
iFileName = Dir(MyPath) 'имя первого файла в папке Не менять!'
Do While iFileName <> ""
Set WordDoc = WordObj.Documents.Open(MyPath + iFileName) 'открываем первый файл в папке'
WordObj.Visible = True 'можно отображать можно не отображать'
iFileName = Dir 'получение следующего имени в папке Не менять!!!'
Loop
MsgBox "файлы обработаны", vbOKOnly + vbInformation, "оработка файлов"
End Sub

Миниатюры

Открыть файлы в Word VBA с помощью макроса
 

Открыть файлы в Word VBA с помощью макроса
 

Открыть файлы в Word VBA с помощью макроса



0



pashulka

4131 / 2235 / 940

Регистрация: 01.12.2010

Сообщений: 4,624

14.08.2016, 16:55

4

и правильно пишет, что не находит

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

Visual Basic
1
2
3
iPath = "C:Мои отчёты"
 
iPath = .SelectedItems(1) & ""



0



0 / 0 / 0

Регистрация: 11.08.2016

Сообщений: 55

16.08.2016, 21:17

 [ТС]

5

Не получается(( . Тоже самое. Может тогда оставим только чтобы менялся шрифт ориентация страницы и сохранение с именем исходного файла

Миниатюры

Открыть файлы в Word VBA с помощью макроса
 

Открыть файлы в Word VBA с помощью макроса
 



0



4131 / 2235 / 940

Регистрация: 01.12.2010

Сообщений: 4,624

16.08.2016, 21:47

6

Смотрите пример, где для чистоты эксперимента, необходимо выбрать папку «Test_for_Roneta90»



0



0 / 0 / 0

Регистрация: 11.08.2016

Сообщений: 55

28.08.2016, 17:20

 [ТС]

7

тоже самое)))Ладно , впринципе открою файлы с помощью cntrl+0 . тогда макрос прописать чтобы менял ориентацию шрифт и сохранял с текущим именем файла и в формате док или докх или ртф вообщем чтоб форматиование сохранялось



0



1 / 1 / 0

Регистрация: 12.06.2015

Сообщений: 93

07.09.2016, 21:10

8

а этот код подойдет для екселя, а не для ворда?
чтобы именно через ексель отркывался пусть к тхт файлам?



0



4131 / 2235 / 940

Регистрация: 01.12.2010

Сообщений: 4,624

07.09.2016, 21:41

9

Выбор папки и перебор .txt файлов можно использовать и в Excel



0



1 / 1 / 0

Регистрация: 12.06.2015

Сообщений: 93

07.09.2016, 21:45

10

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



0



4131 / 2235 / 940

Регистрация: 01.12.2010

Сообщений: 4,624

07.09.2016, 21:50

11

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



0



1 / 1 / 0

Регистрация: 12.06.2015

Сообщений: 93

07.09.2016, 21:57

12

какие варианты есть?



0



pashulka

4131 / 2235 / 940

Регистрация: 01.12.2010

Сообщений: 4,624

07.09.2016, 22:07

13

Visual Basic
1
Application.GetOpenFileName

Причём в справке есть готовый пример — для выбора .txt файла

или

Visual Basic
1
Application.FileDialog(msoFileDialogFilePicker)



0



1 / 1 / 0

Регистрация: 12.06.2015

Сообщений: 93

07.09.2016, 22:13

14

спасибо, а можно чтобы автоматически при этом открывалась определенная папка?



0



pashulka

4131 / 2235 / 940

Регистрация: 01.12.2010

Сообщений: 4,624

07.09.2016, 22:30

15

Для первого варианта ChDrive + ChDir, но если не прокатит, то во втором варианте есть свойство InitialFileName

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
With Application.FileDialog(msoFileDialogFilePicker)
     .AllowMultiSelect = False
     .Title = "Выберите .txt файл"
     .Filters.Add "Text Files", "*.txt", 1
     .InitialFileName = Application.Path 'Укажите свою папку
     If .Show = -1 Then
         MsgBox .SelectedItems(1)
     Else
         MsgBox "Отказ от выбора файла", vbCritical
     End If
End With



0



Heroes

1 / 1 / 0

Регистрация: 12.06.2015

Сообщений: 93

07.09.2016, 22:47

16

у меня получилось так:

PureBasic
1
2
3
4
5
6
7
8
9
Sub Test()
 
 ChDir "C:Documents and SettingsuserМои документыTest"  ' путь какой-нужно
   Dim iFileName As Variant
   iFileName = Application.GetOpenFilename(" (*.txt),*.txt")
   
Workbooks.OpenText Filename:=iFileName  
  
 End Sub



0



pashulka

4131 / 2235 / 940

Регистрация: 01.12.2010

Сообщений: 4,624

07.09.2016, 23:09

17

Это прокатит только если в момент выполнения макроса текущим будет диск «C» и Вы не откажетесь от выбора файла. Т.е. более универсальным является следующий вариант (хотя и здесь, не помешало бы, проверить указанную папку на наличие)

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Test()
     Dim iPath$, iFileName As Variant
     iPath = "C:Documents and SettingsUserМои документыTest"
     ChDrive Left(iPath, 2): ChDir iPath 'Можно просто ChDrive iPath
     
     iFileName = Application.GetOpenFilename("Text Files (*.txt),*.txt")
     If iFileName <> False Then
        Workbooks.OpenText FileName:=iFileName
     Else
        MsgBox "Зачем всё это нужно было ...", vbCritical
     End If
 End Sub



0



На чтение 2 мин Опубликовано 01.10.2015

Открыть несколько документов Word

Если необходимо работать сразу с несколькими документами Word, то Вы без труда сможете открыть эти документы одновременно, каждый в отдельном окне. Для этого нужно просто выбрать несколько файлов, как Вы это всегда делаете в Проводнике Windows.

При запуске Word, открывается начальный экран со списком последних документов. Нажмите ссылку Открыть другие документы (Open Other Documents).

Замечание: Если у Вас уже открыт новый или существующий документ, и необходимо открыть ещё дополнительные документы, то перейдите на вкладку Файл (File) и нажмите Открыть (Open). Быстро перейти к окну Открыть (Open) можно также нажатием сочетания клавиш Ctrl+O.

Открыть несколько документов Word

В окне Открыть (Open) нажмите Компьютер (Computer), чтобы выбрать файлы на Вашем персональном компьютере.

Замечание: Точно так же Вы можете открыть несколько файлов из облачного хранилища OneDrive. Для этого в меню Открыть (Open) нажмите OneDrive.

Открыть несколько документов Word

В правой части окна найдите и нажмите кнопку Обзор (Browse), которая находится под списком последних папок.

Открыть несколько документов Word

Откроется диалоговое окно Открытие документа (Open). Вместо того, чтобы открывать файл двойным кликом, используйте множественный выбор. Процесс выбора файлов точно такой же, как в Проводнике Windows. Удерживая клавишу Shift, можно выбрать несколько смежных файлов. С помощью клавиши Ctrl можно выбрать несколько несмежных фалов (см. рисунок ниже). Чтобы включить или исключить выбранный файл из списка, щелкните по нему, удерживая клавишу Ctrl.

Когда Вы выбрали все нужные файлы, нажмите Открыть (Open).

Открыть несколько документов Word

Каждый выбранный Вами файл откроется в отдельном окне. Просто переключайтесь между этими окнами, чтобы работать с тем или иным файлом.

Точно так же Вы сможете открыть одновременно несколько документов в Excel или PowerPoint.

Оцените качество статьи. Нам важно ваше мнение:

Открытие определенных файлов word

Leprotto

Дата: Вторник, 08.08.2017, 15:38 |
Сообщение № 1

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 139


Репутация:

1

±

Замечаний:
0% ±


Excel 2016

Всем привет!
Есть код, который поочередно открывает файлы word в выбранной папке и ищет значение закладках:

Проблема 1: если в поисковой папке затесался файл эксель и т.д., то выдает ошибку.
Проблема 2: если в папке много файлов word, то они долго перебираются. А по логике моей задачи 90%,
что в искомой папке есть нужный файл и я знаю его вероятное наименование.
Обращаться к файлу с конкретным именем не вариант, т.к. в названии может быть любой лишний знак.
Можно ли сначала перебирать файлы, содержащие «корень» в названии, а при неудаче перебирать все файлы,
но только word, игнорируя другие?
Пример приложил.

Сообщение отредактировал LeprottoВторник, 08.08.2017, 15:39

 

Ответить

_Boroda_

Дата: Вторник, 08.08.2017, 16:04 |
Сообщение № 2

Группа: Модераторы

Ранг: Местный житель

Сообщений: 16618


Репутация:

6465

±

Замечаний:
0% ±


2003; 2007; 2010; 2013 RUS


Скажи мне, кудесник, любимец ба’гов…
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995

 

Ответить

Leprotto

Дата: Вторник, 08.08.2017, 17:04 |
Сообщение № 3

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 139


Репутация:

1

±

Замечаний:
0% ±


Excel 2016

_Boroda_, посмотрел, но ума не хватает прикрутить к коду ((

 

Ответить

_Boroda_

Дата: Вторник, 08.08.2017, 17:32 |
Сообщение № 4

Группа: Модераторы

Ранг: Местный житель

Сообщений: 16618


Репутация:

6465

±

Замечаний:
0% ±


2003; 2007; 2010; 2013 RUS

Хе, так у Вас же там уже почти все написано уже. Как-то так примерно. Что куда вставлять нужно — не разбирался, просто кусок для Дира переписал
[vba]

Код

Sub OpenOnlyWord()
    Dim FSO As Object
    Dim SourceFolder As Object
    Dim FileItem ‘============
    Dim objWord As Object
    Dim wrdDoc As Object
    Dim myRange As Object
    Dim flag As Boolean
    Dim sFolder As String, sFile As String
    Set FSO = CreateObject(«Scripting.FileSystemObject»)
    With Application.FileDialog(msoFileDialogFolderPicker)
        If .Show = False Then Exit Sub
        sFolder = .SelectedItems(1)
    End With
    sFolder = sFolder & IIf(Right(sFolder, 1) = Application.PathSeparator, «», Application.PathSeparator)
    Set SourceFolder = FSO.getfolder(sFolder)
    Set objWord = CreateObject(«Word.Application»)
    flag = False
    sFile = ThisWorkbook.Sheets(1).Range(«E2»).Value ‘например «У-222»
    FileItem = Dir(sFolder & «*» & sFile & «*.doc*»)
    Do While FileItem <> «»
        Set wrdDoc = objWord.Documents.Open(sFolder & FileItem, , True)
        ThisWorkbook.Sheets(1).Range(«B2») = wrdDoc.Bookmarks(«код»).Range.Text
        wrdDoc.Close
        FileItem = Dir()
    Loop
      MsgBox «код НЕ найден»

      letQuit:
    objWord.Quit
    Set wrdDoc = Nothing: Set objWord = Nothing: Set SourceFolder = Nothing: Set FSO = Nothing
End Sub

[/vba]


Скажи мне, кудесник, любимец ба’гов…
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995

 

Ответить

Leprotto

Дата: Вторник, 08.08.2017, 17:57 |
Сообщение № 5

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 139


Репутация:

1

±

Замечаний:
0% ±


Excel 2016

_Boroda_,

Цитата

Хе, так у Вас же там уже почти все написано уже.

почти… ))
Спасибо, заработало как нужно!

 

Ответить

Содержание

  1. Как найти на компьютере найти в поиске все файлы Майкрософт ворд?
  2. Способы восстановления несохраненных документов в Word 2010-2016
  3. Функция автосохранения в Word
  4. Поиск исходного документа
  5. Где хранятся резервные копии документа?
  6. Как восстановить поврежденный документ
  7. Как найти все текстовые документы на компьютере
  8. Эволюция функции «Поиск»
  9. Начинаем искать
  10. Все текстовые документы
  11. По имени
  12. По дате
  13. По типу
  14. По размеру
  15. По содержанию
  16. Как найти файлы на компьютере с Windows XP/7?
  17. Как найти файлы на компьютере с Windows 8/10?

Как найти на компьютере найти в поиске все файлы Майкрософт ворд?

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

Сначала, выполните одно из указанных ниже действий, чтобы увидеть, включен ли параметр Всегда создавать резервную копию.
Microsoft Office Word 2007: Нажмите кнопку Microsoft Office, в правом нижнем углу щелкните пункт Параметры Word, затем щелкните пункт Расширенные. Прокрутите заголовки, пока не найдете раздел Сохранение, который находится ближе к концу списка. Если выбран параметр Всегда создавать резервную копию, который расположен в разделе Сохранение, Word создает резервную копию документа.
Microsoft Office Word 2003: В меню Сервис выберите пункт Параметры. Параметр Всегда создавать резервные копии находится на вкладке Сохранение. Если выбран параметр Всегда создавать резервную копию, то резервная копия документа создается.
Если параметр Всегда создавать резервную копию не выбран, перейдите к способу 3. Попытка принудительного восстановления файла в Word.

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

Если в исходной папке файлы с расширением WBK отсутствуют, выполните указанные ниже действия, чтобы найти на компьютере все файлы, которые имеют расширение WBK.
Нажмите кнопку Пуск и выберите пункт Поиск.
В нижнем левом углу панели поиска Windows выберите пункт Щелкните здесь, чтобы использовать помощника по поиску.
В открывшейся панели Помощник по поиску выберите пункт Все папки и файлы.
В поле Часть имени файла или имя файла целиком: скопируйте и вставьте (или введите) следующий текст:
*.wbk
В списке Где искать выберите Мой компьютер и нажмите кнопку Найти.

Источник

Способы восстановления несохраненных документов в Word 2010-2016

При работе с документами часто возникают
проблемы. С восстановлением несохраненных файлов Ворда, в частности, также
бывают “заморочки”. Среди них – потеря
данных. Она происходит вследствие:

При работе с документами часто возникают
проблемы. С восстановлением несохраненных файлов Ворда, в частности, также
бывают “заморочки”. Среди них – потеря
данных. Она происходит вследствие:

Назаметку: К сожалению, далеко не всегда можно вернутьпотерянный текст. Отсутствие ранних сохранений или сбой в работе MS Office
могут привести к полной утрате документа. В таких случаях поможет только
программа для восстановления, советуем обзор лучших инструментов. Если и это непомогло, обратитесь в службу поддержки Microsoft.

Функция автосохранения в Word

Этот способ работает, если в настройках
текстового редактора функция активна.

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

Функция автосохранения в Word версии 2010 и
выше включается следующим образом:

Слишком маленький интервал выставлять не рекомендуется, т.к. это повлияет на производительность программного продукта.

Подобный метод восстановления информации
крайне редко оказывается эффективным, однако забывать про него не нужно. Вдруг
это именно ваш случай?

Поиск исходного документа

Если пользователь не позаботился о сохранении
введенной информации, система самостоятельно могла сохранить ее в формате *.doc
или *.docx. Остается только найти такой файл на компьютере. Для этого:

Где хранятся резервные копии
документа?

Т.к. по умолчанию функция автоматического
пересохранения активна, существует возможность найти резервную копию
утраченного исходника. Такие копии лежат в скрытых папках операционной системы,
изучить содержимое которых можно только если точно знать, где искать такую
папку. Где же найти автосохраненные файлы Word 2010?

Путь определен, теперь введите его в адресную
строку проводника, и вот: все временные файлы перед вами.

К резервным копиям можно добраться еще одним
способом:

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

Назаметку: Word 2010-2016 может сохранить резервный файлв формате *.asd, который не будет виден в предыдущих версиях офисного пакета.

Как восстановить поврежденный
документ

Повреждение документа может быть вызвано
сбоями в работе текстового редактора. При попытке открытия «битого»
файла будет появляться окно о невозможности его чтения. Как же восстановить
документ Word?

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

Источник

Как найти все текстовые документы на компьютере

Poisk

Эволюция функции «Поиск»

Первоначально поговорим об эволюции поисковой функции с появлением новых версий Windows. Помните XP? Окно поиска было отдельным. Ещё там сидел симпатичный помощник – собачка или кто-то другой. Попасть в него можно было через «Пуск».

Poisk1

В левую часть окна были вынесены настройки поиска:

Результаты отображались в правой части окна. На мой взгляд, очень удобно всё было устроено.

В новых версиях Windows – 7, 8 и 10 функция претерпела косметические изменения. Почему косметические? Да потому что её действие осталось прежним, но только параметры поиска задаются автоматически, когда в строку, расположенную и сразу в меню Пуск, и в каждой папке, вы вписываете значение для поиска. Либо их можно также настроить, но совершенно в другом месте. Исключение – только поиск по содержанию документа, но и это легко решаемо. Пока непонятно? Рассмотрим подробнее по каждому параметру чуть ниже. Зачем разработчики всё усложнили, точнее, упростили? Видимо, они заботились о нас вечно занятых пользователях.

Вот как выглядит поисковая строка в Windows 10.

Poisk2

А вот так в восьмой точка один версия ОС.

Poisk3

Поскольку с XP всё понятно, я буду рассказывать о различных возможностях поиска на примере «восьмёрки», тем более «семёрка» и «десятка» от неё в этом вопросе практически не отличаются.

Начинаем искать

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

Все текстовые документы

Сначала давайте попробуем найти на компьютере абсолютно все текстовые документы, не оглядываясь на такие параметры, как их название, содержимое и дата создания. Для этого откройте «Мой…», «Этот…» или просто «Компьютер». В правом верхнем его углу, рядом со строкой пути, найдётся и поисковая строка. А по соседству с основными разделами меню («Файл», «Вид» и другими) найдётся раздел «Поиск». Забегая вперёд, скажу, что именно там находятся настройки основных параметров.

Poisk4

Друзья, если вы хотя бы знаете, в какой папке находятся ваши текстовые документы, то перейдите в неё – это значительно облегчит работу вашей машине. Для поиска всех текстовых документов в строке необходимо вписать значение *.doc, *.docx или *.txt (зависит от того, что вы планируете найти).

По имени

Если вы знаете имя документа, то отыскать его не составит труда. Просто введите имя в строку поиска, и «вкушайте плоды». Но что делать, если название нужного файла в голове не сохранилось? В таком случае у вас остаётся ещё несколько вариантов – найти нужный документ, отсортировав имеющиеся по дате его рождения на свет (или изменения), по размеру (от пустых и крошечных до огромных и гигантских), по типу (выбрав «документ») или по внутреннему тексту.

По дате

Зайдите в любую папку, поставьте курсор в поисковую строку. В этот же момент отобразится новый раздел меню «Поиск». Раскройте его содержимое. Среди прочих настроек вы увидите параметр «по дате создания» (или последнего изменения). Среди возможных вариантов диапазоны времени от «сегодня» до «в прошлом году». Или просто попробуйте в строку ввести значение в виде точной даты. В результатах должны отобразиться все документы, созданные или изменённые указанного числа.

Poisk5

По типу

Среди тех же настроек имеется параметр «по типу». Перечень возможных вариантов включает файлы всех возможных типов – от календаря и контакта до музыки и фильма. В нашем случае требуется выбрать значение «документ».

Poisk6

По размеру

Тут же можно выбрать и размер. Машина будет искать даже пустые документы. Максимальный размер для поиска – 128 мегабайт.

Poisk7

По содержанию

Друзья, вот и подошли к тому, с чего начали – поиск текстового файла по его содержимому. Есть два варианта. Первый – это отметить галочкой нужный параметр всё в тех же настройках. Там есть раздел «Дополнительные параметры», в котором следует пометить галочкой пунктик «Содержимое файлов». Затем вводите нужную фразу в строке и запускайте поисковый процесс.

Poisk8

Poisk9

Poisk10

В то же окно настроек можно попасть и по-другому (актуально для «семёрки»):

Poisk11

Друзья, настроив поисковую функцию, вам останется только написать фразу из текста содержимого в строке и подождать результатов. Стоит заметить, что в этом случае поиск займёт более длительное время, за которое я успел налить себе чай и выпить его. На сегодня всё. До новых тем.

poisk

Также окно поиска файлов можно запустить из любого окна каталога, к примеру мой компьютер, нажав на кнопку «Поиск»:

poisk start

откроется такое окно:

poisk okno

Здесь мы можем выбрать тип файла, будь то текстовые документы или мультимедиа файлы. При нажатии на нужном, появится окно выбора дополнительных параметров. К примеру выберем поиск мультимедиа файлов (изображения, музыка, видео):

poisk multi

Поставив флажок возле необходимого типа и нажав кнопку «Найти». Возьмем к примеру видео, будут найдены все видеофайлы на вашем компьютере. Очень удобно, когда вы, наконец то, решили навести порядок на своем жестком диске и хотите все фильмы, клипы и т.д. разместить в одном месте, чтобы не тратить время на их постоянный поиск или когда вы точно помните, что где то у вас есть этот файл, но где же его найти?! Здесь как раз вам и поможет данная функция. Также осуществить поиск всех видео файлов на компьютере можно открыв дополнительные параметры поиска, в строке «Часть имени или имя файла целиком»:

poisk videoнаписать через запятую типы видео файлов в таком виде: *.avi, *.mp4, *.3gp, *.flv, *.swf, *.mpeg, *.mov. Это самые распространенные расширения видео файлов. В этом случае будут найдены все файлы с таким расширением. Но в таком случае вы можете упустить некоторые файлы, не указав соответствующего расширения.

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

Также можно искать по тексту в файле. Например, вам нужно найти все документы Word содержащее слово «реферат». Для этого выбираем пункт файлы и папки:

poisk tekst

и в дополнительных полях пишем:

poisk tekst2в поле №1 указываем расширение файла — *.doc

в поле №2 пишем слово/словосочетание, которое вы хотите найти

в поле №3 место поиска

и нажимаете «найти». Таким образом будут найдены все документы в формате Microsoft Word с текстом «реферат», если конечно такие имеются.

poisk 1Здравствуйте, дорогие друзья!
В предыдущей статье мы говорили с вами о том, куда сохраняются файлы, скачанные из Интернета. А сегодня мы поговорим о том, как найти файлы на компьютере? Кто из нас не попадал в такую ситуацию. Например, сели вы одним прекрасным вечерком за компьютер или ноутбук и обратили внимание на то, что Рабочий стол сильно захламлён ярлыками, папками, текстовыми документами, видео и аудио файлами, соответственно вы решили навести здесь порядок. И правильно, это же ваш рабочий стол в конце концов!

Начали с ярлыков программ, посмотрели какие ненужные и удалили их вместе со старыми программами. Различные файлы находящиеся на рабочем столе рассортировывали по папкам, ну а далее полезли в интернет в поисках какой-либо информации, и через какое-то время естественно нашли эту информацию в виде определённых файлов, скачанных вам на компьютер. Затем все файлы опять рассортировали по нужным папкам, а кое-какие забыли на рабочем столе и со спокойной совестью легли спать, вечер не прошёл зря.

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

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

Где только вы его не искали, и на диске C:, D:, в папке «Загрузки» и «Мои документы», но найти важный рабочий файл на компьютере вы не можете. Вот тогда наступает момент, когда вы задаётесь извечным вопросом Что делать? Как найти файлы на компьютере?

Во-первых, нужно успокоится и найти необходимые файлы на компьютере можно очень просто. Скорее всего ваш файл никуда не делся и никакие хакеры его с вашего компьютера не украли (зачем он им нужен 🙂 ). Всё что вам нужно сделать — это просто правильно воспользоваться Поиском файлов на вашем компьютере.

В первую очередь откройте Корзину и внимательно посмотрите её содержимое. Если нужного файла там нет, значит продолжаем поиски в других местах.

Итак, как найти файлы на компьютере? Читайте статью далее.

Как найти файлы на компьютере
с Windows XP/7?

poisk 1

Также окно поиска файлов можно запустить из любого окна каталога, к примеру, Мой компьютер, нажав на кнопку «Поиск»:

poisk 2

откроется такое окно:

poisk 3

Здесь мы можем выбрать тип файла: текстовые документы или мультимедиа файлы. При нажатии на нужном, появится окно выбора дополнительных параметров. К примеру, выберем поиск мультимедиа файлов (изображения, музыка, видео):

poisk 4

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

Или когда вы точно помните, что где-то у вас есть этот файл, но где же его найти?! Здесь как раз вам и поможет данная функция. Также осуществить поиск всех видеофайлов на компьютере можно открыв дополнительные параметры поиска, в строке «Часть имени или имя файла целиком»:

poisk 5

Здесь можно написать через запятую типы видео файлов в таком виде: *.avi, *.mp4, *.3gp, *.flv, *.swf, *.mpeg, *.mov. Это самые распространенные расширения видеофайлов. Будут найдены все файлы с таким расширением. Но в таком случае вы можете упустить некоторые файлы, не указав соответствующего расширения.

Кроме этого можно указывать дополнительные параметры, такие как размер файла, дата последнего изменения файла, осуществлять или нет поиск в скрытых/системных папках и файлах, путь поиска. Можно осуществлять поиск как по всему компьютеру, так и выбрав какой-либо диск или каталог.

Также можно искать по тексту в файле. Например, вам нужно найти все документы Word содержащее слово «реферат». Для этого выбираем пункт «Файлы и папки»:

poisk 6

и в дополнительных полях пишем:

poisk 7

И нажимаете «Найти». Таким образом будут найдены все документы в формате Microsoft Word с текстом «реферат», если конечно такие имеются.

Теперь давайте разберемся, как найти файлы на компьютере с Windows 8/10.

Как найти файлы на компьютере
с Windows 8/10?

Как найти файлы на компьютере по имени?

Если вы помните название файла, то можете просто ввести его в поле «Поиск» окна «Этот компьютер» и нажать кнопку «Enter». Будет произведён поиск файла на всём пространстве жёсткого диска и файл наверняка будет найден.

Если ваш файл состоит из нескольких слов, но вы помните только одно слово, введите это слово в поле Поиска, наверняка ваш пропавший файл всё равно найдётся.

poisk 8

poisk 9

Как найти файлы на компьютере по расширению?

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

Что это такое расширение?

Расширения файлов придуманы программистами для определения типа файлов. То есть каждый файл принадлежит к определенной программе, и благодаря расширению файла Windows понимает какая программа может работать с этим файлом.

Расширение всегда отделяется от имени файла точкой, например, возьмём файл VirtualDub.zip, как видите название файла VirtualDub, а его расширение .zip говорит о том, что это архивный файл и работать с ним могут программы архиваторы WinRAR, Hamster Free ZIP Archiver или 7-Zip.

poisk 10

Другими словами, если у вас пропал текстовый файл, который вы печатали в программе Microsoft Office Word, значит расширение у вашего пропавшего файла .docx. Если у вас пропала фотография или картинка, значит расширение наверняка будет .jpg. Если пропал фильм, расширение вполне может быть .avi, flv, mp4 или mkv.

Что делать, если вы не помните расширение пропавшего файла?

poisk 11

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

poisk 12

poisk 13

poisk 14

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

poisk 15

poisk 16

Как найти файлы на компьютере по объёму?

Многие опытные пользователи могут заметить, что у видеофайлов существует множество расширений и как тогда искать нужный файл?

В этом случае можно попробовать найти файл по его объёму. Например, ввести в Поиске нехитрую такую команду: System.Size:>1000МБ. Она означает, что необходимо искать все файлы на компьютере объёмом более 1ГБ.

poisk 17

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

poisk 18

Как найти скрытый файл на компьютере?

Иногда, в следствии, системного сбоя или вирусной активности некоторым файлам операционная система может присвоить атрибут «Скрытый». Если в настройках системы не отмечен пункт «Показывать скрытые файлы и папки», то эти файлы вы не увидите и не найдёте их даже через «Поиск», хотя с ними в это время ничего не случится.

poisk 19

-> на вкладке «Вид», затем отмечаем пункт «Показывать скрытые файлы и папки», нажимаем кнопки «Применить» и «ОК».

poisk 20

Вполне возможно ваш пропавший файл появится на рабочем столе. Или вы можете найти его через функцию поиска по названию или расширению. Как это делать вы уже знаете.

Как найти файлы на компьютере по содержанию?

Если вы потеряли текстовый файл, напечатанный в любой текстовой программе для работы с текстом (Microsoft Office Word, OpenOffice или блокноте), то вы найти его по его содержанию. Для этого вы должны помнить хотя бы часть его содержания.

Например, у меня на компьютере есть файл с таким содержимым «Как найти файл на компьютере». Вводим этот текст в поле Поиска и жмём кнопку «Enter», после сразу находится файл содержащий этот текст.

poisk 21

poisk 22

Как найти файлы на компьютере с помощью программы Total Commander?

Этот классный файловый менеджер сможет найти пропавший на вашем компьютере файл сразу по нескольким приметам: по названию, расширению, по содержащемуся тексту.

Запускаем программу Total Commander и выбираем место поиска, например весь диск C:, далее заходим в меню «Команды» и «Поиск файлов». Если хотите искать файлы по названию или расширению, то вводим их в поле «Искать файлы». Затем жмём кнопку «Начать поиск».

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

poisk 23

poisk 24

На этом пока все! Надеюсь, что вы нашли в этой заметке что-то полезное и интересное для себя. Если у вас имеются какие-то мысли или соображения по этому поводу, то, пожалуйста, высказывайте их в своих комментариях. До встречи в следующих заметках! Удачи! 😎

Источник

Понравилась статья? Поделить с друзьями:
  • Открыть все скрытые страницы excel
  • Открыть все символы в excel
  • Открыть восстановленные документы word
  • Открыть вложенный файл excel
  • Открыть вкладку разработчик в word