VBA lier une table Excel dans Access

Bonjour,
je voudrais savoir si quelqu'un peut m'aider je voudrais savoir quel méthode on utilise en VBA pour créer un table liés dans Access. et aussi créer une requete ajout en VBA.

Bonjour,

Les deux réponses que tu cherches semblent être dans la FAQ, pense à y jeter un coup d'oeil ;)

Par exemple pour les tables liées :
http://access.developpez.com/faq/?pa...kTablePassword

Merci pour le liens des tables liés mais j'arrive pas a trouver dans la FAQ la réponse a mon deuxieme probleme.Enfait il me faut le code de la requete ajout de access ke l'on utilise sauf ke je veux mettre une variable au lieu de selectionner une table fixe.
Voila
Merci beaucoup pour le premier probleme

Citation:

---

Envoyé par darkspoilt

Merci pour le liens des tables liés mais j'arrive pas a trouver dans la FAQ la réponse a mon deuxieme probleme.Enfait il me faut le code de la requete ajout de access ke l'on utilise sauf ke je veux mettre une variable au lieu de selectionner une table fixe.

---

Tu as une fonction rechercher dans la FAQ, et si tu y tapes tout simplement "créer requête" je pense que tu obtiens la réponse :
http://access.developpez.com/faq/?re...E9er+requ%EAte

En espérant t'aider.

En fait la création de la requete je l'ai trouvé ce qui me manque c les méthode a utiliser pour faire en sorte que ca soit une requete ajout et le tout en VBA et ca je le trouve pas.

Citation:

---

ce qui me manque c les méthode a utiliser pour faire en sorte que ca soit une requete ajout et le tout en VBA et ca je le trouve pas

---

Tu écris la requête en VBA donc tu la construis comme une simple chaîne de caractères.
Une requête d'ajout est de type <b>INSERT INTO</b>. Tu trouveras également dans la FAQ comment exécuter en VBA une requête d'insertion/d'exécution.

Pour controuner le probleme je passe par une commande SQL

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Sub MacroEssai()   Dim Var As String Var = "Table2"   DoCmd.TransferSpreadsheet acImport, , "Table2", "D:\Test\Essai.xls", 0   Sql = "INSERT INTO Test ( année, OPPO, MPE, MPF, MRE, MRF, M_ )SELECT , [année], [OPPO], [MPE], [MPF], [MRE], [MRF], [M_] FROM = & Var;)"   DoCmd.RunSQL Sql   End Sub

---

et il me met une erreur a DoCmd.RunSQL sql et je vois pas pourquoi si quelqu'un peut m'aider je le remercie d'avance

Lorsque tu construis une requête par le code, vérifie toujours si la chaîne de caractères générée est bien le résultat souhaite :

Code:

---

1 2 3 4 5

Sql = "INSERT INTO Test ( année, OPPO, MPE, MPF, MRE, MRF, M_ )SELECT , [année], [OPPO], [MPE], [MPF], [MRE], [MRF], [M_] FROM = & Var;)"   Debug.Print Sql 'affiche le contenu de sql dans la fenêtre d'exécution.   'DoCmd.RunSQL Sql

---

Mais à première vue tu sembles avoir des problèmes de parenthèses, virgule et de variable (on insère pas la valeur d'une variable de cette manière là dans une chaîne de caractères, tu oublies les guillemets).

Ma commende SQL a l'air bonne après je ne connais pas très bien le SQL donc je peux me tromper

Code:

---

1 2	INSERT INTO Test ( année, OPPO, MPE, MPF, MRE, MRF, M_ )SELECT , [année], [OPPO], [MPE], [MPF], [MRE], [MRF], [M_] FROM = Table2;)

---

Il te suffit de créer une requête vide dans Access, y coller ce code SQL et l'exécuter. Access te dira alors plus précisément où se trouvent les problèmes.

Merci c'est bon j'avais une parenthese en trop
Mais maintenant j'ai un problmee avec mes tables il me redemande des valeur aux champs alors que je veux récupéré celle de ma table a ajouter