Discussion :

[javelot69]

Bonjour,

Pour exporter le résultat d'une requête vers Excel, j'utilise

Code :

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

1
2
3
4
5
6
7
Private Sub TransfertExportExcel_Click()
DoCmd.TransferSpreadsheet acExport, _
                    acSpreadsheetTypeExcel9, _
                    "NomRequete", _
                    (CurrentProject.Path & "\NomFichier.xls"), _
                    True
 End Sub

Cette procédure exporte le résultat dans une nouvelle feuille du classeur Excel spécifié ce qui me convient.

Pour une autre utilisation du classeur Excel, j'ai un utilisateur qui souhaite que l'export se fasse dans la feuille 1 du classeur ; comment désigner le nom de la feuille de destination ? Peut-être avec Sheets mais je n'arrive pas placer cela dans mon code.

Question complémentaire : peut-on désigner de la même manière une feuille par son nom dans le classeur Excel ?

Merci d'avance à ceux qui auraient des idées à me proposer.

Bonne journée.

[helas]

a la suite

Code :

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

1
2
3
4
5
6
7
8
9
 
Private Sub TransfertExportExcel_Click()
DoCmd.TransferSpreadsheet acExport, _
                    acSpreadsheetTypeExcel9, _
                    "NomRequete", _
                    (CurrentProject.Path & "\NomFichier.xls"), _
                    True, _
                    "Feuil1"
 End Sub

[javelot69]

Bonjour,

Merci helas pour ta réponse.

J'ai testé. Le résultat n'est pas celui demandé.

Ajouter "Feuil1" au bout de ma ligne de code crée une nouvelle feuille nommée Feuil1 dans laquelle s'exporte le résultat de ma requête. Je me retrouve donc avec 2 feuilles ayant le même nom dans le classeur Excel.

Une autre idée à me suggérer ?

Bonne journée.

[helas]

testé, je n'ai qu'une feuil1 (Access2002 vers Excel2002) qui est écrasée si je renouvelle la commande
désolé, je n'ai pas la réponse

[mout1234]

Une piste, je viens de faire cet essai, ça marche:

- Dans ton fichier Excel, sur la feuil1, tu définis un nom de (Insertion /Nom / définir) que tu nommes "Feuil1"

- Dans Access, tu créées une requete nommée "Feuil1" (pas pris le temps d'essayer l'argument proposé par Helas, je suppose que cela évitera de nommer la requete ainsi)

- Je fais l'export (je l'ai fait à la main, pas testé en VBA)


ça marche


EN espérant que cette piste soit la bonne, bon courage

[Invité]

Bonjour

Juste une suggestion, je n'ai pas testé

Si avec le nom de ton fichier tu mettais le nom de l'onglet

Code :

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

NomFichier.xls!Feuil1

Je n'ai pas testé, peut-être que le ! est bon

Starec

[javelot69]

Bonjour,

Merci pour vos réponses.

Précision : je travaille avec Access 3003 et Excel 2003.

J'ai testé les solutions proposées :
- celle proposée par mout1234 me crée toujours une nouvelle feuille du nom indiqué en fin de ligne de code
- celle proposée par Starec donne un message "Erreur d'exécution '3027'. Mise à jour impossible. La base de données ou l'objet est en lecture seule." alors que mon fichier Excel n'est pas ouvert.
- la solution proposée par helas

Code :

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

DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "NomRequete", (CurrentProject.Path & "/Exportation.xls"), True, "Feuil1"

crée une feuille nommée "Feuil11" ; en fait, j'avais mal lu le nom de l'onglet avant d'écrire mon post ; c'est cette "Feuil11" qui est écrasée à chaque exécution de la commande.

Faut-il en conclure qu'il est impossible de spécifier la feuille de destination lors de l'export ?

Si quelqu'un a une autre idée je suis preneur.

Bonne journée.

[Invité]

Re

Sinon je te propose deux autres solutions :

1 - Ce tuto de Caféine : http://cafeine.developpez.com/access/tutoriel/excel/
où tu auras plusieurs solution

3 - Ce tuto de Silkyroad pour écrire par VBA dans des classeurs
http://silkyroad.developpez.com/VBA/ClasseursFermes/


Starec

[javelot69]

Bonjour,

Merci Starec pour ta réponse.

Effectivement le tuto de Caféine précise dans les limites de TransfertSpreadSheet qu'il est "impossible de préciser un nom d'onglet, ou une plage de cellules"

En fait l'aide d'Access indique qu'il n'est pas possible de préciser une plage de cellules pour l'export mais ne dit rien pour le nom de l'onglet.

Merci pour l'info sur les tutos (j'aurais du les trouver ) ; je pense qu'il y a ce qu'il me faut dedans.

Bonne journée et merci à tous ceux qui m'ont fait des suggestions.