Discussion :

[lesguignols]

Bonjour,

Etant donné une connexion "rs" avec sql, une connexion rsAcc avec access; pour compléter ma table ACCES je voudrais éviter la commande :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
For i = 0 To rs.Fields.Count - 1
       rsAcc.Fields(i) = rs.Fields(i)
Next i

qui prend un temps considérable puisqu'il y a beaucoup de lignes.

Existe t-il un moyen dans VBA ACCESS pour copier une table dans SQL et la coller dans une table existane dans ACCESS ?

Merci d'avance

[Jean-Philippe André]

salut,

Code sql :

Sélectionner tout - Visualiser dans une fenêtre à part

SELECT * INTO TableFinale FROM TableInitiale;

par exemple

[lesguignols]

DEJA essayé; MAIS
Ca ne peut pas marcher puisqu'il faut passer par une connexion pour selectionner from une base SQL.

[EddiGordo]

DEJA essayé; MAIS
Ca ne peut pas marcher puisqu'il faut passer par une connexion pour selectionner from une base SQL.

Bonjour,

Mais si ça peux marcher si tu utilises les liaisons.
Avec une table liée tu peux faire fonctionner ce que t'as indiqué jpcheck :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
     Select * INTO TableAccess From TableLiéeSQL;

[Jean-Philippe André]

en utilisant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

CurrentDb.Execute

avec l'option dbSQLPassThrough
ca devrait faire l'affaire.

En tous les cas, de mon côté, les tables en lien ODBC sont avec mdp enregistré et fonctionnent comme des tables en local

[lesguignols]

Merci jpcheck;

Peux tu tout de même me fournir un exemple tout simple qui fera utilser la currentdb.execute et le dbSQLPassThrough ?

Merci

[Jean-Philippe André]

l'exemple (certes quelque peu différent de mon idée) de la devrait faire l'affaire
http://access.developpez.com/faq/?page=SQL#qryActions