Utilisation de l’application DAO à partir de Microsoft Word

Utilisez les propriétés, objets et méthodes DAO (Data Access Objects) de la même façon que vous référencez et utilisez des propriétés, des objets et des méthodes Word. Une fois que vous avez créé une référence à la bibliothèque d'objets DAO, vous pouvez ouvrir des bases de données, créer et exécuter des requêtes pour extraire un jeu d'enregistrements et renvoyer les résultats dans Word.

Référence à la bibliothèque d'objets DAO

Avant de pouvoir utiliser DAO, vous devez créer une référence à la bibliothèque d'objets DAO. Pour ce faire, effectuez les opérations suivantes :

1. Basculez vers Visual Basic Editor.

2. Dans le menu Outils, cliquez sur Références.

3. Dans la zone Références disponibles, cliquez sur Microsoft DAO 3.6 Object Library.

Cet exemple montre comment ouvrir la base de données Northwind et insérer les éléments de la table Shippers dans le document actif.

Sub UsingDAOWithWord() 
 Dim docNew As Document 
 Dim dbNorthwind As DAO.Database 
 Dim rdShippers As Recordset 
 Dim intRecords As Integer 
 
 Set docNew = Documents.Add 
 Set dbNorthwind = OpenDatabase _ 
 (Name:="C:\Program Files\Microsoft Office\Office11\" _ 
 & "Samples\Northwind.mdb") 
 Set rdShippers = dbNorthwind.OpenRecordset(Name:="Shippers") 
 For intRecords = 0 To rdShippers.RecordCount - 1 
 docNew.Content.InsertAfter Text:=rdShippers.Fields(1).Value 
 rdShippers.MoveNext 
 docNew.Content.InsertParagraphAfter 
 Next intRecords 
 rdShippers.Close 
 dbNorthwind.Close 
End Sub

Utilisez la méthode OpenDatabase pour établir une connexion à une base de données et l'ouvrir. Une fois la base de données ouverte, utilisez la méthode OpenRecordset pour accéder à une table ou exécuter une requête. Pour vous déplacer dans le jeu d'enregistrements, utilisez la méthode Move. Pour rechercher un enregistrement donné, utilisez la méthode Seek. Si vous n'avez besoin que d'un sous-ensemble d'enregistrements et non de la totalité du jeu d'enregistrements, utilisez la méthode CreateQueryDef pour créer une requête personnalisée afin de sélectionner les enregistrements répondant à vos critères. Lorsque vous avez terminé d'utiliser une base de données, il est recommandé de la fermer à l'aide de la méthode Close pour économiser de la mémoire.

Remarques

Pour plus d'informations sur un objet, une méthode ou une propriété DAO donnée, voir les informations relatives à Data Access Objects sur MSDN.

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.