Discussion :

[toto159]

bonjour,
je cherche à exporter le résultat d'une requête vers Excel 2013 au format xlsx
mais cela coince, lorsque je l'exporte sous le format xls se la fonctionne pas pas sous le format xlsx
l'export ce fait par ce code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Public Sub test()
Dim monchemin As String, monfichier As String, lechemin As String
 
monchemin = CurrentProject.Path
monfichier = "test.xlsx"                        si je mets xls cela fonctionne
lechemin = monchemin & "\" & monfichier
 
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "requette_essai", lechemin, -1
 
End Sub

j'ai déjà changé acSpreadsheetTypeExcel9 en acSpreadsheetTypeExcel12 ou 14 mais toujours le même problème

voici ce que j'obtiens lorsque j'essaye d'ouvrir le fichier créer




quelqu'un à une idée merci d'avance

[Malick]

Vous pouvez essayer la méthode décrite dans la .

@+

[toto159]

bonjour
le problème que j'ai,
j'arrive à exporte ma requête sous le format XLS mais pas sur le format XLSX fichier excel 2013

[RobiPMS]

Bonjour.
L'estension xlsx est utilisée avec le format xml d'excel. Le code pour produire un fichier excel valide au format xlsx, qui fonctionne chez moi, serait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Public Sub test()
Dim monchemin As String, monfichier As String, lechemin As String
 
monchemin = CurrentProject.Path
monfichier = "test" ' je ne mets pas d'extension, elle sera crée par l'exportation
lechemin = monchemin & "\" & monfichier
 
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12Xml, "requette_essai", lechemin, True
End Sub

Attention à l'orthographe : requette_essai est-il bien orthographié par rapport au nom de cette requête?
Cordialement.

[toto159]

Ok merci à toi cela fonctionne

j'ai pourtant chercher dans l'aide mais je n'avais rien trouvé acSpreadsheetTypeExcel12Xml
dans l'aide Microsoft il s’arrête à 9

donc encore merci
je peux continuer d'avancer

[Pittouti]

Bonjour à tous,

je suis désolé de rebondir sur cette discussion car elle m'intéresse.

j'ai essayé d'exécuter ce code mais j'ai ce message d'erreur :

access erreur 3170 pilote isam introuvable

[Pittouti]

Désolé c'était une faute de frappe de ma part.

Problème résolu

Bonjour à tous,

je suis désolé de rebondir sur cette discussion car elle m'intéresse.

j'ai essayé d'exécuter ce code mais j'ai ce message d'erreur :

access erreur 3170 pilote isam introuvable