Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 05/08/2011, 17h23   #1
Invité régulier
 
Homme
Inscription : juillet 2011
Messages : 27
Détails du profil
Informations personnelles :
Sexe : Homme

Informations forums :
Inscription : juillet 2011
Messages : 27
Points : 7
Points : 7
Par défaut Problème DoCmd.TransferSpreadsheet pour importer données

Bonjour,

J'ai un gros problème pour importer des datas d'excel dans access.

Voila mon code

Code :
1
2
3
4
5
6
7
8
Private Sub Commande2_Click()
 
DoCmd.TransferSpreadsheet transfertype = acImport, _
acSpreadsheetTypeExcel12, _
TableName = "tmp_Données", _
FileName = "C:\Documents and Settings\David\Bureau\Projet\Excel\Format_fichier.xlsx"
 
End Sub
J'ai essayé de changer le numéro du type du fichier excel (pourtant sur d'avoir la version 12 et j'ai soit

erreur 3011: ne trouve pas le chemin d'accès ou le nom du fichier en m'affichant un chemin et un nom ne correspondant pas du tout à ce que j'ai écrit (C:\Documents and Settings\David\Mesdocuments\0.XSLB

erreur 3170 ne trouve pas le pilot ISAM

Que faire ?
pop.paki est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 05/08/2011, 21h20   #2
Rédacteur
 
Avatar de LedZeppII
 
Homme
Maintenance données produits
Inscription : décembre 2005
Messages : 3 939
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : France, Yvelines (Île de France)

Informations professionnelles :
Activité : Maintenance données produits
Secteur : Distribution

Informations forums :
Inscription : décembre 2005
Messages : 3 939
Points : 6 278
Points : 6 278
Bonjour,

Il me semble que c'est := au lieu de = entre le nom de l'argument et sa valeur.

Code :
1
2
3
4
DoCmd.TransferSpreadsheet transfertype := acImport, _
    SpreadSheetType := acSpreadsheetTypeExcel12, _
    TableName := "tmp_Données", _
    FileName := "C:\Documents and Settings\David\Bureau\Projet\Excel\Format_fichier.xlsx"
ou
Code :
1
2
3
DoCmd.TransferSpreadsheet transfertype := acImport, _
    TableName := "tmp_Données", _
    FileName := "C:\Documents and Settings\David\Bureau\Projet\Excel\Format_fichier.xlsx"
A+
LedZeppII est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 08/08/2011, 16h52   #3
Nouveau Membre du Club
 
Homme
Étudiant
Inscription : juillet 2011
Messages : 63
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : France

Informations professionnelles :
Activité : Étudiant
Secteur : Finance

Informations forums :
Inscription : juillet 2011
Messages : 63
Points : 27
Points : 27
Pourquoi ne pas tout simplement mettre:

Code :
1
2
3
4
5
Private Sub Commande2_Click()
 
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12, "tmp_Données", "C:\Documents and Settings\David\Bureau\Projet\Excel\Format_fichier.xlsx"
 
End Sub

?
facedeharicot est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 12h41.


 
 
 
 
Partenaires

Hébergement Web