Communication entre excel et access

G

Guilo

Guest
Bonjour à tous,

Est-il possible d'exporter des données d'un fichier excel dans une table access? Et automatiquement?
C'est à dire quand on note des informations sur le fichier excel, il faudrait qu'elles réapparaîssent automatiquement sous la table access.

Merci pour vos réponses! ;)
 
S

SKYMAN

Guest
bonjour

je te donne ci dessous un bout de code qui peut t'aider dans tes recherche

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
    Set Connection = CreateObject('ADODB.connection')
    Connection.Open 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\\base.mdb;Persist Security Info=False'
    On Error Resume Next
    Ajout = 'INSERT INTO Feuil1 Target.AddressLocal VALUES ('' & Target & '')'
    Connection.Execute (Ajout)
    Connection.Close
End Sub

cela devrais fonctionner, mais il doit y avoir plus simple
 
S

SKYMAN

Guest
re,

un petit erreurs dans le code
le voici corriger

bonjour

je te donne ci dessous un bout de code qui peut t'aider dans tes recherche

Code:
 Private Sub Worksheet_Change(ByVal Target As Range)
    Set Connection = CreateObject('ADODB.connection')
    Connection.Open 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\\base.mdb;Persist Security Info= False'
    On Error Resume Next
    Ajout = 'INSERT INTO Feuil1 ' & Target.AddressLocal & ' VALUES ('' & Target & '')'
    Connection.Execute (Ajout)
    Connection.Close
End Sub
 

Discussions similaires

Réponses
0
Affichages
220

Statistiques des forums

Discussions
312 104
Messages
2 085 349
Membres
102 868
dernier inscrit
JJV