CodeS-SourceS
Rechercher un code, un tuto, une réponse

Import de feuil excel dans une table access

Octobre 2017

il faut instaler la reference de access avant

Imports Access
Public Sub ImportAccess(ByVal FileName As String, ByVal val As String)
        AppAccess = New Access.Application
        AppAccess.OpenCurrentDatabase("chemin\maBase")
        AppAccess.DoCmd.DeleteObject(AcObjectType.acTable, "maTable")
        AppAccess.DoCmd.TransferSpreadsheet(AcDataTransferType.acImport, , "maTable", "Nomdufichier Excel", True, "NomFeuil!")
        AppAccess.DoCmd.DeleteObject(AcObjectType.acTable, "NomFeuil$_ImportErrors")
         AppAccess.CloseCurrentDatabase()
End Sub


mieux que ça je connais pas.

A voir également

Publié par taikibaybay.
Ce document intitulé «  Import de feuil excel dans une table access  » issu de CodeS-SourceS (codes-sources.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.
Création d'un template pour vs2005
[débutants] découvrir l'environnement de visual basic sous microsoft excel (et ses fenêtres)