comment pourrais-je en VB =E0 partir d'excel programmer=20
l'export d'un tableau de donn=E9es vers une table ACCESS.
Cet export doit pouvoir soit cr=E9er la table, soit y=20
rajouter les enregistrements...
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Pierre CFI [mvp]
bonjour j'ai répondu çà en avril bonjour en 97 il faut donner un nom à ta zone excel, ici CLIENT, j'ajoute client de excel à la table client de ajout_97.mdb Sub export() Dim bd As DAO.Database Set bd = OpenDatabase(ThisWorkbook.FullName, False, False, "excel 8.0") bd.Execute "INSERT INTO CLIENT IN 'd:accessajout_97.mdb' SELECT CLIENT.* FROM CLIENT" bd.Close Set bd = Nothing End Sub Attention il faut charger la réf Microsoft dao 3.xxx dans le module excel
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer http://users.skynet.be/mpfa/ Site perso http://access.cfi.free.fr "Fred" a écrit dans le message de news:16fff01c4486a$c5fc3530$ Bonjour à tous,
comment pourrais-je en VB à partir d'excel programmer l'export d'un tableau de données vers une table ACCESS. Cet export doit pouvoir soit créer la table, soit y rajouter les enregistrements...
Merci d'avance pour l'aide,
Fred
bonjour
j'ai répondu çà en avril
bonjour
en 97
il faut donner un nom à ta zone excel, ici CLIENT, j'ajoute client de excel à la table client de ajout_97.mdb
Sub export()
Dim bd As DAO.Database
Set bd = OpenDatabase(ThisWorkbook.FullName, False, False, "excel 8.0")
bd.Execute "INSERT INTO CLIENT IN 'd:accessajout_97.mdb' SELECT CLIENT.* FROM CLIENT"
bd.Close
Set bd = Nothing
End Sub
Attention il faut charger la réf Microsoft dao 3.xxx dans le module excel
--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Fred" <Fred@discussions.microsoft.com> a écrit dans le message de news:16fff01c4486a$c5fc3530$a101280a@phx.gbl...
Bonjour à tous,
comment pourrais-je en VB à partir d'excel programmer
l'export d'un tableau de données vers une table ACCESS.
Cet export doit pouvoir soit créer la table, soit y
rajouter les enregistrements...
bonjour j'ai répondu çà en avril bonjour en 97 il faut donner un nom à ta zone excel, ici CLIENT, j'ajoute client de excel à la table client de ajout_97.mdb Sub export() Dim bd As DAO.Database Set bd = OpenDatabase(ThisWorkbook.FullName, False, False, "excel 8.0") bd.Execute "INSERT INTO CLIENT IN 'd:accessajout_97.mdb' SELECT CLIENT.* FROM CLIENT" bd.Close Set bd = Nothing End Sub Attention il faut charger la réf Microsoft dao 3.xxx dans le module excel
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer http://users.skynet.be/mpfa/ Site perso http://access.cfi.free.fr "Fred" a écrit dans le message de news:16fff01c4486a$c5fc3530$ Bonjour à tous,
comment pourrais-je en VB à partir d'excel programmer l'export d'un tableau de données vers une table ACCESS. Cet export doit pouvoir soit créer la table, soit y rajouter les enregistrements...
