Bonsoir, 

J'ai une petite question, j'ai mon recordSet : (ouais c'est repris d'un exemple le vrai est dans le pc d'entreprise) 

Sub DAOOpenRecordset () Dim db As DAO.Database, rst As DAO.Recordset, fld As DAO.Field Dim sSQL As String ' Ouverture de la base de données  Set db = DBEngine.OpenDatabase (".\Test-VBA") sSQL = "Select * From CLIENTS Where Région= \'WA\'" ' Ouverture du Recordset  Set rst = db.OpenRecordset (sSQL, dbOpenForwardOnly, dbReadOnly) ' Fermeture du Recordset rst.Close End Sub

Or petit problème, je ne comprens pas comment fonctionne l'argument entre la fonction DBEngine.OpenDatabase ou encore comment récupérer le resultat de la requete afin de le comparer à d'autres données

Merci D'avance de votre aide 

Sunshio  

A mon avis, Test-VBA est un fichier qui contient la chaine de connexion à la bas de données (en général, c'est un fichier .dsn) ou c'est le nom de la base https://docs.microsoft.com/fr-fr/office/client-developer/access/desktop-database-reference/dbengine-opendatabase-method-dao

Pour accéder aux résultats, il faut parcourir les objets Fields (nom du champ) et pour chacun des Field, récupérer sa propriété Value

If rst.RecordCount >0 ' on vérifie si il y a des résultats
    While Not rst.OEF 'tant qu'il y a des résultats
        for each Field in rst.Fields 'on parcours les champs
            debug.print Field.Name & "=" Field.Value  'on affiche dans la fenêtre de debug, le champ et sa valeur pour le résultat en cours
        Next
        rst.MoveNext()  'on passe au résultat suivant
    wend
End If