Comment faire pour ouvrir des documents à l'aide de la fonctionnalité Ouvrir et réparer de Word

Traductions disponibles Traductions disponibles
Numéro d'article: 893672 - Voir les produits auxquels s'applique cet article
Agrandir tout | Réduire tout

Sommaire

INTRODUCTION

Cet article explique comment faire pour ouvrir des documents à l'aide de la fonctionnalité Ouvrir et réparer dans Microsoft Office Word 2007, dans Microsoft Office Word 2003, et dans Microsoft Word 2002.

Plus d'informations

Microsoft Word utilise automatiquement la fonctionnalité Ouvrir et réparer lorsqu'il détecte un problème à l'ouverture d'un document. Toutefois, vous pouvez forcer Word à utiliser la fonctionnalité Ouvrir et réparer lorsque vous ouvrez un document. Cette possibilité peut s'avérer particulièrement utile lorsque vous souhaitez enregistrer le document dans un format de fichier différent. Si vous enregistrez un document endommagé dans un format de fichier différent, il est possible que vous ne puissiez pas ouvrir le document enregistré. Pour plus d'informations sur la procédure à suivre pour résoudre les problèmes de documents Word endommagés, cliquez sur le numéro ci-dessous pour afficher l'article correspondant dans la Base de connaissances Microsoft.
826864 Comment faire pour résoudre les problèmes de documents Word endommagés
Pour ouvrir un document à l'aide de la fonctionnalité Ouvrir et réparer dans Word, utilisez l'une des méthodes suivantes.

Méthode 1 : Pour ouvrir un document spécifique

Pour ouvrir un document spécifique à l'aide de la fonctionnalité Ouvrir et réparer dans Word, procédez comme suit :
  1. Démarrez Word.
  2. Dans le menu Fichier, cliquez sur Ouvrir.

    Remarque Dans Word 2007, cliquez sur le bouton Microsoft Office, puis sur Ouvrir.
  3. Dans la boîte de dialogue Ouvrir, sélectionnez le fichier que vous souhaitez ouvrir.
  4. Cliquez sur la flèche vers le bas du bouton Ouvrir, puis sur Ouvrir et réparer.

Méthode 2 : Pour ouvrir tous les documents

Microsoft fournit des exemples de programmation à des fins d'illustration uniquement, sans garantie explicite ou implicite. Ceci inclut, de manière non limitative, les garanties implicites de qualité marchande ou d'adéquation à un usage particulier. Cet article suppose que vous connaissez le langage de programmation présenté et les outils utilisés pour créer et déboguer des procédures. Les techniciens du support technique Microsoft peuvent vous expliquer les fonctionnalités d'une procédure particulière, mais ils ne peuvent pas modifier les exemples en vue de vous fournir des fonctionnalités supplémentaires ou de créer des procédures répondant à vos besoins spécifiques. Pour ouvrir tous les documents à l'aide de la fonctionnalité Ouvrir et réparer de Word, remplacez la macro FichierOuvrir prédéfinie dans Word par une macro Microsoft Visual Basic pour Applications (VBA). Pour cela, procédez comme suit :
  1. Démarrez Word, puis ouvrez un nouveau document vierge.
  2. Dans Word 2007, cliquez sur Macros dans l'onglet Développeur. Dans Word 2003, dans le menu Outils, pointez sur Macro, puis cliquez sur Macros.
  3. Cliquez sur la flèche vers le bas dans la zone Macros disponibles dans, puis cliquez sur Commandes Word.
  4. Dans la liste Nom de la macro, cliquez sur FichierOuvrir.
  5. Cliquez sur la flèche vers la bas dans la zone Macros disponibles dans, puis cliquez sur Normal.dot (modèle global).

    Remarque Dans Word 2007, cliquez sur Normal.dotm (modèle global).
  6. Cliquez sur Créer.
  7. La macro FichierOuvrir prédéfinie apparaît comme dans l'exemple suivant :
    Sub FileOpen()
    '
    ' FileOpen Macro
    ' Opens an existing document or template
    '
        Dialogs(wdDialogFileOpen).Show
    End Sub
    
  8. Remplacez la macro FichierOuvrir prédéfinie par l'exemple de macro suivant :
    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 Macro
    ' 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. Dans le menu Fichier, cliquez sur Fermer et retourner à Microsoft Word.
  10. Dans le menu Fichier, appuyez sur MAJ et cliquez sur Enregistrer tout.
Remarques
  • La nouvelle macro FichierOuvrir s'exécutera uniquement si vous ouvrez un document en suivant l'une des méthodes suivantes :
    • Vous cliquez sur Ouvrir dans le menu Fichier.
    • Vous cliquez sur Ouvrir dans la barre d'outils Standard.
  • La nouvelle macro FichierOuvrir ne s'exécutera pas si vous ouvrez un document en suivant l'une des méthodes suivantes :
    • Vous ouvrez le document dans l'Explorateur Windows.
    • Vous ouvrez le document à partir de la liste des derniers fichiers utilisés.

Propriétés

Numéro d'article: 893672 - Dernière mise à jour: mercredi 18 mai 2011 - Version: 3.0
Les informations contenues dans cet article s'appliquent au(x) produit(s) suivant(s):
  • Microsoft Office Word 2007
  • Microsoft Word 2002 Standard Edition
  • Microsoft Word 2010
Mots-clés : 
kbopenfile kbprogramming kbautomation kbvba kbhowto KB893672
L'INFORMATION CONTENUE DANS CE DOCUMENT EST FOURNIE PAR MICROSOFT SANS GARANTIE D'AUCUNE SORTE, EXPLICITE OU IMPLICITE. L'UTILISATEUR ASSUME LE RISQUE DE L'UTILISATION DU CONTENU DE CE DOCUMENT. CE DOCUMENT NE PEUT ETRE REVENDU OU CEDE EN ECHANGE D'UN QUELCONQUE PROFIT.

Envoyer des commentaires

 

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