Communication entre excel et access

[Guilo]

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! 😉

 

[SKYMAN]

bonjour

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

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

 

[SKYMAN]

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

 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

 

[Guilo]

Merci pour ton aide!! 🙂