Открытие документов в Microsoft Word с использованием команды "Открыть и восстановить"

Переводы статьи Переводы статьи
Код статьи: 893672 - Vizualiza?i produsele pentru care se aplic? acest articol.
Развернуть все | Свернуть все

В этой статье

ВВЕДЕНИЕ

В статье рассматриваются способы открытия документов с использованием команды Открыть и восстановить в Microsoft Office Word 2007, в Microsoft Office Word 2003 и в Microsoft Word 2002.

Дополнительная информация

Microsoft Word автоматически использует команду Открыть и восстановить, если обнаруживает проблемы при открытии документа. Однако можно настроить Word на использование команды Открыть и восстановить при открытии любого документа. Это может быть особенно удобно, если планируется сохранить документ в файле другого формата. При сохранении поврежденного документа в файле другого формата сохраненный документ может не открыться. Дополнительные сведения о восстановлении поврежденных документов Word см. в следующей статье базы знаний Майкрософт:
826864 Восстановление поврежденных документов Word
Чтобы открыть документ в Microsoft Word с использованием команды Открыть и восстановить, можно воспользоваться одним из описанных ниже способов.

Способ 1. Открытие определенного документа

Чтобы открыть определенный документ в Word с использованием команды Открыть и восстановить, выполните указанные ниже действия.
  1. Запустите Microsoft Word.
  2. В меню Файл выберите команду Открыть.

    Примечание. В Word 2007 нажмите кнопку Microsoft Office, затем кнопку Открыть.
  3. В диалоговом окне Открыть выберите файл, который необходимо открыть.
  4. Щелкните стрелку на кнопке Открыть и выберите команду Открыть и восстановить.

Способ 2. Открытие всех документов

Корпорация Майкрософт предлагает примеры программного кода только для иллюстрации и не предоставляет явных или подразумеваемых гарантий относительно их пригодности для применения в пользовательских приложениях. Примеры в данной статье рассчитаны на пользователя, имеющего достаточный уровень знаний соответствующего языка программирования и необходимых средств разработки и отладки. Специалисты служб технической поддержки Майкрософт могут пояснить назначение тех или иных конструкций кода в конкретном примере, но модификация примеров и их адаптация к задачам разработчика не предусмотрена. Чтобы открывать в Word все документы с использованием команды Открыть и восстановить, необходимо заменить макрос FileOpen, встроенный в Word, макросом Microsoft Visual Basic для приложений (VBA). Для этого выполните описанные ниже действия.
  1. Запустите Word и откройте новый документ.
  2. В Word 2007 на вкладке Разработчик выберите пункт Макросы. В Word 2003 в меню Сервис последовательно выберите пункты Макрос и Макросы.
  3. Щелкните значок стрелки с раскрывающимся списком в окне Макросы из: и выберите пункт Команд Word.
  4. В списке Имя выберите макрос FileOpen.
  5. В списке Макросы из выберите пункт Normal.dot (общего шаблона).

    Примечание. В Word 2007 выберите пункт Normal.dotm (общего шаблона).
  6. Нажмите кнопку Создать.
  7. Появится встроенный макрос FileOpen, как в следующем примере:
    Sub FileOpen()
    '
    ' FileOpen Макрос
    ' Opens an existing document or template
    '
        Dialogs(wdDialogFileOpen).Show
    
    End Sub
    
  8. Замените встроенный макрос FileOpen макросом из следующего примера:
    Option Explicit
    
    ' WARNING: ANY USE BY YOU OF THE CODE PROVIDED IN THIS EXAMPLE IS
    ' AT YOUR OWN RISK. Microsoft provides this macro code "as is" without warranty of
    ' any kind, either expressed or implied, including but not limited to the implied 
    ' warranties of merchantability and/or fitness for a particular purpose.
    
    Sub FileOpen()
    '
    ' FileOpen Макрос
    ' Opens an existing document or template
    '
    Dim sFileName As String
    
    ' Display the File Open dialog and capture the filename selected and pass it to a
    ' variable
    With Application.Dialogs(wdDialogFileOpen)
        .Display
        sFileName = .Name
    End With
    
    ' Test to verify the filename has a value
    ' If no file is chosen or if the Open dialog is dismissed, 
    ' the following code is skipped
    If sFileName <> "" Then
        ' Use the filename as a variable to be opened using Open and Repair feature
        Documents.Open FileName:=sFileName, OpenAndRepair:=True
    End If
    
    End Sub
    
  9. В меню Файл выберите команду Закрыть и вернуться в Microsoft Word.
  10. Нажмите клавишу SHIFT и выберите в меню Файл команду Сохранить все.
Примечания
  • Новый макрос FileOpen будет запускаться только при открытии документа одним из указанных ниже способов.
    • При выборе в меню Файл пункта Открыть.
    • При выборе в панели инструментов Стандартная значка Открыть.
  • Новый макрос FileOpen не будет запускаться при открытии документа одним из указанных ниже способов.
    • При открытии документа из проводника.
    • При открытии документа с помощью списка последних использованных файлов.

Свойства

Код статьи: 893672 - Последний отзыв: 17 мая 2011 г. - Revision: 3.0
Информация в данной статье относится к следующим продуктам.
  • Microsoft Office Word 2007
  • Microsoft Word 2002 Standard Edition
  • Microsoft Word 2010
Ключевые слова: 
kbopenfile kbprogramming kbautomation kbvba kbhowto KB893672

Отправить отзыв

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com