EFFECTUER DES IMPORTATIONS D'UNE BASE DE DONNÉE ACCESS VERS EXCEL EN VBA
cs_hdidan
Messages postés
2
Date d'inscription
dimanche 30 janvier 2005
Statut
Membre
Dernière intervention
26 juin 2005
-
26 juin 2005 à 13:13
turb0 Messages postés 10 Date d'inscription mercredi 30 mai 2007 Statut Membre Dernière intervention 11 juin 2007 - 6 juin 2007 à 14:23
turb0 Messages postés 10 Date d'inscription mercredi 30 mai 2007 Statut Membre Dernière intervention 11 juin 2007 - 6 juin 2007 à 14:23
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/32315-effectuer-des-importations-d-une-base-de-donnee-access-vers-excel-en-vba
https://codes-sources.commentcamarche.net/source/32315-effectuer-des-importations-d-une-base-de-donnee-access-vers-excel-en-vba
6 juin 2007 à 14:23
Mais si tu trouves une autre solution hesites pas a faire signe, ton code avait l'air interessant ;)
6 juin 2007 à 13:33
Pour régler votre problème, il vaut mieux essayer de le réinstaller en le téléchargeant ici :
http://www.download.com/Microsoft-Jet-Database-Engine-3-5/3000-2114_4-4238277.html
Sinon, j'ai trouvé un article pour vérifier l'installation du pilote JET 3.5 chez Microsoft ici :
http://support.microsoft.com/kb/240377
Je pense que ça devrais suffire à résoudre votre problème.
6 juin 2007 à 11:15
J'ai essaye avec la version 3.5 et 3.6 ainsi qu'avec Microsoft DAO 2.5/3.5 Compatibility Library.
Toujours le meme message d'erreur...
22 déc. 2006 à 19:15
19 déc. 2006 à 16:36
19 déc. 2006 à 15:34
12 janv. 2006 à 18:38
Si c'est pas ça, je ne vois pas d'où sa peut venir...
28 déc. 2005 à 16:46
J'ai essayé de tester ce code, je rouve l'erreur suivante au niveau de la ligne contenat cette instruction:
Set Db = DBEngine.OpenDatabase(FichierBaseDeDonneeMDB, False, False, "MS Access")
l'erreur signalée est la suivante:
"Un composant ActivX ne peut pas créer l'objet"
26 nov. 2005 à 10:31
Bravo
Horatio
1 août 2005 à 11:22
Mais si tu veux la modifier et la compléter toi même, n'hésite pas. Je ne pense pas que l'ajout de la gestion des mot de passe doit être très difficile. Tu devrais surement trouver de l'aide sur ce site à ce sujet !
Tien moi au courrant si tu arrives à compléter le code !
28 juil. 2005 à 18:06
Cela fait des mois que je cherche une telle source.
Je voulais te demander si tu pouvais compléter cette source en gérant lors de l'ouverture de la base de données le mot de passe du fichier car ma base auquel se souhaiterais me connecter possède un mot de passe et le code source ne le gère pas. MERCI INFINIMENT!
28 juin 2005 à 23:19
la fonction query d'excel est plus rapide:
connec = "ODBC;DSN=piloteodbc;UID=;PWD=1234;DBQ=\\SERVEUR\Mesdocs\sage;DefaultDir=;CODEPAGE=1252;" pour la liaison avec sage ligne 100
piloteodbc est crée dans la liste des bases personnelles dans outils d'administration , pilotes odbc
sel contient la requête SQL
A1 est la position de la première cellule de destination
With ActiveSheet.QueryTables.Add(Connection:=Connec, Destination:=Range("A1"))
.CommandText = Sel
.Name = ta
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = False
.RefreshOnFileOpen = False
.BackgroundQuery = False
.RefreshStyle = xlInsertDeleteCells
.SavePassword = True
.SaveData = True
.AdjustColumnWidth = False
.RefreshPeriod = 0
.PreserveColumnInfo = False
.Refresh BackgroundQuery:=False
End With
j'ai trouvé cette fonction en enregistrant une macro sur données, données externe, créer une requette.
Cela ne fonctionne pas pour écrire sur les base, les fonction ADO sont nécéssaire.
merci pour ce source trés bien commenté.
27 juin 2005 à 18:15
Il faut aussi que la bibliothèque d'office soit déclarée...
Au bureau j'ai des codes simples quoi fonctionnenet en permanence pour les échanges excel access dans les deux sens en version 97...
Un petit mail je vous les envoie...
(jean-marc.lucien@acoss.fr)
Avant jeudi après je pars en congés.
Sinon ado n'est pas top avec office 97 mais après avec 2000 ou xp c'est bien plus simple
JM
27 juin 2005 à 15:40
26 juin 2005 à 13:13
J'ai trouvé sur le site des codes mais que j'arrive pas à faire tourner : il reconnait pas Dim "MonAccess As New Access.Application" même si j'ai ajouté le microsoft DAO.