Export vers Excel 2007 qui ne fonctionne pas

Version imprimable

1 pièce(s) jointe(s)

Bonjour,

Je suis sous Office 2007... il me semble avoir les bibliothèques nécessaires :koi:

J'ai le code suivant qui fonctionne les fichier "Orders" s'ouvre :

Code:

1
2
3
4
Dim NChemin As String, NFichier As String
NChemin = CurrentProject.Path
NFichier = "Orders.xls"
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel97,  "AR_CONSULT_CDE", NChemin & "\" & NFichier, True,  "SYNTHESE"

Par contre si je fais :

Code:

1
2
3
4
Dim NChemin As String, NFichier As String
NChemin = CurrentProject.Path
NFichier = "Orders.xlsx"
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12, "AR_CONSULT_CDE", NChemin & "\" & NFichier, True, "SYNTHESE"

Code:

1
2
3
4
Dim NChemin As String, NFichier As String
NChemin = CurrentProject.Path
NFichier = "Orders.xlsx"
DoCmd.TransferSpreadsheet  acExport, acSpreadsheetTypeExcel12Xml, "AR_CONSULT_CDE", NChemin & "\"  & NFichier, True, "SYNTHESE"

Quand je veux ouvrir le fichier "Orders", j'ai un message :
Pièce jointe 155651

:fleche: Avez-vous une idée ?

10/09/2014, 11h18
Jean-Philippe André

Salut,

apparemment on arriverait sur un cas de figure avec une histoire de nombre de lignes limités dans les interactions Access/Excel

Première piste :

Code:

DoCmd.TransferSpreadsheet acExport, 10, "AR_CONSULT_CDE", NChemin & "\" & NFichier, True, "SYNTHESE"

Seconde piste, passer par un CopyFromRecordset
10/09/2014, 11h44
zoom61

Citation:

Envoyé par jpcheck

apparemment on arriverait sur un cas de figure avec une histoire de nombre de lignes limités dans les interactions Access/Excel

Il n'y a que 377 lignes et 14 colonnes donc 5278 c'est pas élevé comme données :weird:

Citation:

Envoyé par jpcheck

Première piste :

Code:

DoCmd.TransferSpreadsheet acExport, 10, "AR_CONSULT_CDE", NChemin & "\" & NFichier, True, "SYNTHESE"

J'ai toujours le message d'erreur :weird: