ADO: créer une liaison entre access et excel.Résolu

Question

Intitul&#233;: 
J'utilise access comme base de donn&#233;es de d&#233;part et excel pour faire des calculs complexes.


Je veux cr&#233;er une relation entre ma bdd access et mon fichier excel pour ins&#233;rer de nouvelles donn&#233;es comme un nouvel employ&#233; dans mon fichier excel.


Question: 
Comment dois-je proc&#233;der en utilisant ADO?
Je voudrais avoir un exemple concret car je n'arrive pas solutionner ce probl&#232;me de relation entre les deux logiciels.


merci d'avance.

Ninette08 · Accepted Answer

en ADO, je sais pas ,par contre en rajoutant le r&#233;f&#233;rence excel, tu peux faire comme ca : 

Dim AppliExcel As Excel.Application
Dim Class As Workbook
Dim Feuil As Worksheets

Set AppliExcel = CreateObject("Excel.Application")
Set Class = AppliExcel.Workbooks.Open(Chemin)

AppliExcel.Workbooks("etat.xls").Worksheets("feuil1").Activate
......
AppliExcel.Quit
Set AppliExcel = Nothing
Set Class = Nothing

Ninette

Tuning Max · Answer

Tout d'abord, je tiens à préciser que concernant les calculs (et surtout les complexes) Access est à mon avis mieux qu'excel. Pour la présentation est la mise en forme, je reconnais que par contre Excel est plus adapté et accessible pour les utilisateurs.
Ceci étant, pour ton problème il existe un outil fournis avec Excel (Barre de menu/Données/Données externes) qui permet d'effectuer des liaisons entre des bases de données et ton tableur
Voilà j'espère que cela pourra t'aider

daveneo · Answer

Merci &#224; tous les deux, cel&#224; m'a bien servi. 
Je vais revenir j'ai encore d'autres questions &#224; venir.

daveneo · Answer

j'ai d&#233;j&#224; essay&#233; le fonctionnement avec les donn&#233;es externes par excel.
Mais cel&#224; reste une importation. 
Je veux pouvoir avoir un lien entre les deux logiciels sans faire d'importation; a moins que l'on puisse faire une importation via VB.


Par contre ce que j'ai r&#233;ussit &#224; faire c'est de lier une table excel par access. Par ce proc&#233;der je peux ins&#233;rer des donn&#233;es dans excel par access. Mais pour ce faire je dois cr&#233;er un fichier excel et ensuite l'incorporer &#224; access. 
J'esp&#232;re que je suis compr&#233;hensible dans mes argumentaires


A cet instant voici o&#249; j'en suis:


J'ai d&#233;j&#224; cr&#233;&#233; une bonne partie de mon interface access pour ins&#233;rer de nouveaux employ&#233;s. Les donn&#233;es sont enregistr&#233;s dans une table de la base access. Hors je veux utiliser certaines parties de ces donn&#233;es pour les ins&#233;rer dans un fichier excel qui est lier &#224; access.


en fait je cherche en ce moment le moyen pour transf&#233;rer des donn&#233;es d'une table vers une autre.

Tuning Max · Answer

tu fait une requête SQL sur Access ou en code vba selon tes préférences

en code cela peut donner un truc du grenre : (une des nombreuses requêtes d'une de ma dernière application)

**********************************start***************************************
StrChaineSQL = " INSERT INTO tblResumeImport ( Enregistrements, CreerPar, DateCreation, NomTable ) " & _
                                    " SELECT tblTempImport.BATIMENT, '" & Environ("username") & "' AS Expr1, '" & Now() & "' AS Expr2, '" & chName & "' AS Expr3 " & _
                                    " FROM tblTempImport LEFT JOIN tblBatiments ON tblTempImport.BATIMENT = tblBatiments.Sigle " & _
                                    " WHERE (((tblTempImport.BATIMENT) Is Not Null) AND ((tblBatiments.Batiment) Is Null)); "

CurrentDb.Execute StrChaineSQL
*************************************end**************************************

A bientôt

daveneo · Answer

Mais ton CurrentDb.Execute StrChaineSQL tu peux aussi le mettre dans ue requ&#234;te SQL?

Tuning Max · Answer

Bien sûr que non voyons! Je t'ai mis un exemple qui te montre comment tu peux écrire une requête SQL directement en VB.
Le "StrChaineSQL" est une variable de type string qui contient la requête SQL

Le "CurrentDb.Execute StrChaineSQL" est le code Visual Basic qui exécute la requête puisqu'il s'agit là dans l'exemple que je t'ai donné d'une requête action qui ajoute des données dans une table de ma base