Discussion :

[bella1]

Bonjour,

Je voudrais savoir comment fait-on pour interroger une base de données M. Access depuis M. Excel.
Mon problème, j'ai un fichier excel, dans le colonne A2, je souhaiterai saisir un code article, après la validation par la touche Entrée.
Dans la colonne A3, il faut afficher le libellé et dans A4 la quantité.

Ensuite, tous enregitrer ds une autre table de access.

Encore merci de votre aide,

[Invité]

Bonjour

Où se trouvent le libellé et la quantité ? Dans la base Access ou le fichier Excel ?

Pourquoi ne pas faire le tout dans Access au lieu d'Excel ?

As-tu fais une recherche dans la FAQ avec le mot Access ? Comme ceci : http://excel.developpez.com/faq/inde...hercher=access

Philippe

[bella1]

Les données sont ds la table article de Access.
Je le fais ds Excel pour placer une image à coté des codes articles, ainsi la redimentionnée.

Merci,

[Psychopathe]

Ben il te faut juste un créer une connexion avec Access via un Recordset par exemple, puis faire tes manipulations. Difficile d'être plus détaillé vu que je n'ai pas tous les éléments (nom base Access, nom classeur, feuille Excel utilisée, etc...).

[bella1]

la base de données access : Fiche_access.mdb (c:\fiche_access.mdb)
table :article(code_article, libelle, qte, prix)
Le classeur : Fiche.xls
la feuille: methode

Dans le classeur Fiche.xls, feuille methode, Dans la colonne A2, je saisie le code article.

Thanks,

[Invité]

Re

As-tu regardé le lien que j'ai mis ?

Philippe

[bella1]

J'ai regardé dans le lien.
J'ai trouvé comment exporter les données de Access à Excel mais c'est pas ce que je veux.
Je veux juste interroger la base access depuis excel.
Je vais essayer de voir la solution Recordset.

encore merci,

Tout le monde dit c'est facile mais je ne vois pas comment faire.

[Psychopathe]

la base de données access : Fiche_access.mdb (c:\fiche_access.mdb)
table :article(code_article, libelle, qte, prix)
Le classeur : Fiche.xls
la feuille: methode

Dans le classeur Fiche.xls, feuille methode, Dans la colonne A2, je saisie le code article.

Thanks,

Voci un petit exemple pour t'aider...

Avant toute chose, il faut activer les références Microsoft Access XX.X Object Library, et Microsoft DAO X.X Object Library dans l'éditeur Visual Basic.

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
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
 
Sub exemple()
 
Dim enregis As DAO.Recordset, baseAccess As Database, feuille As Excel.Worksheet
Dim i As Integer
 
'On considère que le code est écrit dans le classeur Fiche.xls
Set feuille = ThisWorkbook.Worksheets("methode")
'On établi la connection avec la fameuse base Access
Set baseAccess = DBEngine.OpenDatabase("c:\fiche_access.mdb")
'On "récupère" une représentation exploitable de la table article via un objet Recordset
Set enregis = baseAccess.OpenRecordset("Select * FROM article")
 
'On renseigne tous les enregistrements de la table article à partir de la deuxième
'ligne de la feuille méthode
i = 2
Do
    feuille.Range("A" & i) = enregis("code_article")
    feuille.Range("B" & i) = enregis("libelle")
    feuille.Range("C" & i) = enregis("qte")
    feuille.Range("D" & i) = enregis("prix")
    i = i + 1
    enregis.MoveNext
Loop Until enregis.EOF
'On ferme la connection du recordset
enregis.Close
 
'On ferme la connection avec la base Access...
baseAccess.Close
 
'On fait un peu de ménage...
Set feuille = Nothing
Set enregis = Nothing
Set baseAccess = Nothing
 
End Sub

Un code imparfait, mais qui peut t'aider à y voir plus clair.........

[bella1]

Merci,
C'est cool