Ouvrir Access depuis Excel

Bonjour,

Je souhaiterais ouvrir une BDD access depuis excel et effectuer quelques requetes, puis faire une mise à jour des données access (qui sont reprisent par excel) pour en donner des TCD.
Quelqu'un aurait-il une idée de comment procéder avec des macro?

Merci de votre aide

Bonjour

As-tu fait une recherche dans la FAQ Excel (le lien est en haut de cette page) avec le mot Access comme critère ?

http://excel.developpez.com/faq/inde...hercher=access

Philippe

J'ai rien trouvé qui pourrais m'aider...
Une autre aide?

Salut, tu as tout ce que tu cherches dans la FAQ

bonjour à tous

regarde Ce fil
j'y ai déposé un fichier

J'ai trouvé mon bonheur, enfin à peu de chose près.
J'exécute ma macro, mais access (ou excel) ne semble pas d'accord avec mon extension.

Code:

---

1 2 3 4 5 6 7 8

Sub Button1_Click()   Dim Db As DAO.Database Dim strSQL As String   Set Db = DAO.OpenDatabase("C:\Users\Chrys\Documents\BDD\BDDImportExportNEW.accdb", False, False)   End Sub

---

:'( un petit coup de main?

Bonjour,
As-tu essayé de passer d'abord par la création d'un objet ? il faut également ajouter la référence Microsoft Access Object Library dans VBA.

Code:

---

1 2 3 4 5

Dim oAcApp As Object   Set oAcApp = CreateObject("Access.Application") 'Ouvrir la base de données oAcApp.OpenCurrentDatabase "C:\Users\Chrys\Documents\BDD\BDDImportExportNEW.accdb"

---

Bonjour

Quelle référence as-tu coché ?

Pour un fichier au format accdb utilise la référence : Microsoft Office 12.0 (14.0) Access Database Engine Object

Le tuto à lire : http://warin.developpez.com/access/dao/

Philippe

Visiblement il me manquait une reference.
J'ai tout bien coché, je n'ai plus d'erreur, mais je n'ai rien qui se passe...

Voilà mon code :

Code:

---

1 2 3 4 5 6 7 8

Sub Button1_Click()   Dim Db As Object Dim strSQL As String Set Db = CreateObject("Access.Application") Db.OpenCurrentDatabase ("C:\Users\Chrys\Documents\NewImportExport\BDDImportExportNEW.accdb")   End Sub

---

Si je coche trop de reference, ça pourrais empécher le bon déroulement de ma macro?

Salut, là tu es en Late Binding et donc tu n'as pas de références supplémentaires à cocher, celles qui le sont par défaut dans un fichier vierge doivent elles le rester.
voir ici

Il est conseillé de développer en Early Binding pour profiter de l'intellisense et si déploiement le faire en Late Binding pour ne pas voir de messages liés aux différences de version des références

Hum... et donc supposons que je repasse à

Code:

---

Dim Db as DAO.Database

---

Dans tous les cas ça ne fonctionne pas...
Help!! :cry:

Salut, là tu es en Early Binding et tu dois cocher la référence Microsoft DAO x.x Object Library

Citation:

---

Dans Visual Basic, vous disposez de trois interfaces d'accès aux données : ADO, RDO et DAO. Une interface d'accès aux données est un modèle d'objet qui représente différentes facettes de l'accès aux données. Avec Visual Basic, vous pouvez contrôler par programmation, la connexion, les générateurs d'instructions et les données renvoyées pour être utilisées dans n'importe quelle application.

Pourquoi prévoir trois interfaces d'accès aux données dans Visual Basic ? Les techniques d'accès aux données évoluent constamment, et chacune des trois interfaces représente un stade diffèrent de cette évolution. La plus récente est ADO, qui met en œuvre un modèle d'objet plus simple (et cependant plus souple) que les modèles RDO ou DAO. Pour vos nouveaux projets, utilisez de préférence ADO comme interface d'accès aux données.

---

Je l'avais coché, mais ça n'a rien fait de particulier.
Donc je passe à ADO au lieu de DAO, mais y a toujours rien qui marche... (Evidement j'ai cocher Access Database Engine Object au lieu de DAO, c'est bien ça?)

A priori, c'est normal que ça ne fasse rien. Tu ouvres la base dans le code et tu n'en fais rien. Tu ne dois pas t'attendre à voir Access s'ouvrir.

Désolé si ça te paraissait évident et qu'il y a bien du code après ce que tu as mis dans ton message, mais on ne sait jamais.

Haaa... ok...
Je pensais que cette ligne allait ouvrir access.
que dois-je donc rajouter pour voir ma base s'ouvrir?

Merci ZebreLoup

Il ne faut pas confondre Access, qui est le logiciel et ta base, qui contient les données.
Tu n'as pas besoin d'ouvrir Access pour accéder aux données. D'ailleurs tu peux très bien accéder à des données d'une base Access sans que Access soit installé sur le poste.

Si tu regardes bien les tutos proposés plus haut, tu verras comment récupérer les données (via un recordset par exemple) pour les exploiter ensuite dans Excel.

Salut, pour cela il te faudra lire et assimiler ceci

Je veux ouvrir un formulaire en fait, et donc je pensais que l'ouverture d'access etait indispensable.

Bonjour

Citation:

---

Envoyé par Tytelle

Je veux ouvrir un formulaire en fait, et donc je pensais que l'ouverture d'access etait indispensable.

---

Pourquoi ouvrir un formulaire ? Ce n'est pas que les données que tu veux récuperer ?

A mon avis il faut que tu détailles entièrement ce que tu veux faire (l'explication du premier message n'est pas suffisante).

Philippe

Je reformule ce que je voudrais faire.
Je voudrais ouvrir un formulaire access via un bouton qui se trouve sur un classeur excel.
Avec ce formulaire ouvert, j'ajoute des info sur mes données de ma BDD, et un dernier clique sur mon formulaire exporte mes données (et résultats de requetes) vers une fichier excel et ferme le formulaire.
Il y aurais ensuite un refresh des TCD en fonction des données exportées dans mon excel.
Voilà