Bonjour,

Pour rechercher un article dans une table, j'utilise le code suivant:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
    'Ouverture de la Base Nationale
    Set objBaseNationale = OpenBDD(strFichierBase, "LS")
    Set objRecordset = CreateObject("ADODB.recordset")
 
    Const adUseClient = 3
    objBaseNationale.CursorLocation = adUseClient
    objRecordset.Open "SELECT * FROM Articles", objBaseNationale
 
    'Recherche de l'Article
    objRecordset.Find ("[Reference]='RBS 015'")
    If Not objRecordset.EOF Then
        Debug.Print ("Article trouvé dans la base")
    Else
        Debug.Print ("Article non trouvé dans la base")
    End If
 
    Call CloseBDD(objRecordset)
    Call CloseBDD(objBaseNationale)
Etant amené à réaliser de nombreuses opérations de recherche dans cette table, je voudrais savoir si cette manière de faire est la bonne ou optimisable.

Par avance merci.

(La base est créée avec le moteur "Microsoft.ACE.OLEDB.12.0")