Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Access Exportation d'Etats

Exportation d'Etats

6 réponses
Avatar
ymer.hyseni
Salut,

j'ai plusieurs etats dans ma base access, et je veux les imprimer
directement dans excel, le tout, en bloc, et par d=E9faut leur donner
les m=EAmes noms qu'ils ont dans access...

comment faire???
Signaler un problème avec ce contenu

6 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Raymond [mvp]
Bonjour.

tu penses vraiment que access n'est pas capable de lancer l'impression ?

--
@+
Raymond Access MVP http://OfficeSystem.Access.free.fr/
Pour débuter sur le forum: http://www.mpfa.info/

Venez découvrir Open XML, le nouveau format de fichier de la suite Office !
http://www.comscamp.com/Tracker/Redirect.ashx?linkidÿ71c7f3-78e8-4371-abaf-b73c259e58db


a écrit dans le message de news:

Salut,

j'ai plusieurs etats dans ma base access, et je veux les imprimer
directement dans excel, le tout, en bloc, et par défaut leur donner
les mêmes noms qu'ils ont dans access...

comment faire???
Avatar
ymer.hyseni
On 16 juin, 13:44, "Raymond [mvp]"
wrote:
Bonjour.

tu penses vraiment que access n'est pas capable de lancer l'impression ?

--
@+
Raymond Access MVP http://OfficeSystem.Access.free.fr/
Pour débuter sur le forum:http://www.mpfa.info/

Venez découvrir Open XML, le nouveau format de fichier de la suite Offi ce !http://www.comscamp.com/Tracker/Redirect.ashx?linkidÿ71c7f3-78e8-43 ...

a écrit dans le message de news:

Salut,

j'ai plusieurs etats dans ma base access, et je veux les imprimer
directement dans excel, le tout, en bloc, et par défaut leur donner
les mêmes noms qu'ils ont dans access...

comment faire???


j'en suis sur que access peut le faire tout seul, je le fais déjà avec
des macros Access, mais j'en ai marre de devoir tout le temps répondre
à des question bêtes, c'est pourquoi je veux faire le même travail
mais en VBA.

si tu as une solution merci à toi.

ciao

Avatar
ymer.hyseni
On 16 juin, 19:57, wrote:
On 16 juin, 13:44, "Raymond [mvp]"
wrote:



Bonjour.

tu penses vraiment que access n'est pas capable de lancer l'impression ?

--
@+
Raymond Access MVP http://OfficeSystem.Access.free.fr/
Pour débuter sur le forum:http://www.mpfa.info/

Venez découvrir Open XML, le nouveau format de fichier de la suite Of fice !http://www.comscamp.com/Tracker/Redirect.ashx?linkidÿ71c7f3-78e8- 43...

a écrit dans le message de news:

Salut,

j'ai plusieurs etats dans ma base access, et je veux les imprimer
directement dans excel, le tout, en bloc, et par défaut leur donner
les mêmes noms qu'ils ont dans access...

comment faire???


j'en suis sur que access peut le faire tout seul, je le fais déjà avec
des macros Access, mais j'en ai marre de devoir tout le temps répondre
à des question bêtes, c'est pourquoi je veux faire le même travail
mais en VBA.

si tu as une solution merci à toi.

ciao


Juste ajouter un petit truc que j'ai déjà, mais il faut le répeter
autant de fois que tu as un Etat... moi j'aimerai faire juste une
commande qui fasse le tout....

DoCmd.OutputTo acOutputReport, "etat1", acFormatXLS, "fichier.xls",
True

ciao


Avatar
Raymond [mvp]
Il ne faut pas rêver, une seule commande ne suffit pas .
pour imprimer un seul état voici ce qu'il lancer comme commandes sous excel:

Sub Macro2()
Dim acApp As New Access.Application
acApp.OpenCurrentDatabase ("bd1.mdb")
With acApp
.Visible = True ' ou false
.DoCmd.OutputTo acOutputReport, "etat1", acFormatXLS, "etat1" & ".xls",
True
End With
acApp.Quit
Set acApp = Nothing
End Sub

pour imprimer tous les états, il faut rajouter une boucle de lecture de tous
les états:

Sub Macro2()
Dim AcObj As AccessObject
Dim acApp As New Access.Application
acApp.OpenCurrentDatabase ("bd1.mdb")
With acApp
.Visible = True ' ou false
For Each AcObj In .CurrentProject.AllReports
.DoCmd.OutputTo acOutputReport, AcObj.Name, acFormatXLS, "c:" &
AcObj.Name & ".xls", True
Next AcObj
End With
acApp.Quit
Set acApp = Nothing
End Sub

procédures non testées à vérifier et à modifier pour tous les noms
spécifiques.


--
@+
Raymond Access MVP http://OfficeSystem.Access.free.fr/
Pour débuter sur le forum: http://www.mpfa.info/

Venez découvrir Open XML, le nouveau format de fichier de la suite Office !
http://www.comscamp.com/Tracker/Redirect.ashx?linkidÿ71c7f3-78e8-4371-abaf-b73c259e58db



j'en suis sur que access peut le faire tout seul, je le fais déjà avec
des macros Access, mais j'en ai marre de devoir tout le temps répondre
à des question bêtes, c'est pourquoi je veux faire le même travail
mais en VBA.

si tu as une solution merci à toi.

ciao


Juste ajouter un petit truc que j'ai déjà, mais il faut le répeter
autant de fois que tu as un Etat... moi j'aimerai faire juste une
commande qui fasse le tout....

DoCmd.OutputTo acOutputReport, "etat1", acFormatXLS, "fichier.xls",
True

ciao

Avatar
ymer.hyseni
On 16 juin, 20:59, "Raymond [mvp]"
wrote:
Il ne faut pas rêver, une seule commande ne suffit pas .
pour imprimer un seul état voici ce qu'il lancer comme commandes sous e xcel:

Sub Macro2()
Dim acApp As New Access.Application
acApp.OpenCurrentDatabase ("bd1.mdb")
With acApp
.Visible = True ' ou false
.DoCmd.OutputTo acOutputReport, "etat1", acFormatXLS, "etat1" & ".xls ",
True
End With
acApp.Quit
Set acApp = Nothing
End Sub

pour imprimer tous les états, il faut rajouter une boucle de lecture de tous
les états:

Sub Macro2()
Dim AcObj As AccessObject
Dim acApp As New Access.Application
acApp.OpenCurrentDatabase ("bd1.mdb")
With acApp
.Visible = True ' ou false
For Each AcObj In .CurrentProject.AllReports
.DoCmd.OutputTo acOutputReport, AcObj.Name, acFormatXLS, "c:" &
AcObj.Name & ".xls", True
Next AcObj
End With
acApp.Quit
Set acApp = Nothing
End Sub

procédures non testées à vérifier et à modifier pour tous les n oms
spécifiques.

--
@+
Raymond Access MVP http://OfficeSystem.Access.free.fr/
Pour débuter sur le forum:http://www.mpfa.info/

Venez découvrir Open XML, le nouveau format de fichier de la suite Offi ce !http://www.comscamp.com/Tracker/Redirect.ashx?linkidÿ71c7f3-78e8-43 ...



j'en suis sur que access peut le faire tout seul, je le fais déjà a vec
des macros Access, mais j'en ai marre de devoir tout le temps répondre
à des question bêtes, c'est pourquoi je veux faire le même travail
mais en VBA.

si tu as une solution merci à toi.

ciao


Juste ajouter un petit truc que j'ai déjà, mais il faut le répeter
autant de fois que tu as un Etat... moi j'aimerai faire juste une
commande qui fasse le tout....

DoCmd.OutputTo acOutputReport, "etat1", acFormatXLS, "fichier.xls",
True

ciao


merci Raymont, c super, je vais tester tout ca... mais dis moi une
chose, tout ca il faut mettre donc dans mon fichier Excel, n'est pas?

comment faire alors depuis Access? car moi je veux exporter depuis
access les etats, et dans Excel... je veux que Access gère Excel...

ciao


Avatar
Raymond [mvp]
merci Raymont, c super, je vais tester tout ca... mais dis moi une
chose, tout ca il faut mettre donc dans mon fichier Excel, n'est pas?


ben oui, si tu veux tout faire à partir d'excel.

comment faire alors depuis Access? car moi je veux exporter depuis
access les etats, et dans Excel... je veux que Access gère Excel...


tu ne penses pas que tu tournes en rond ? tu demandes le contraire
maintenant, tu veux gérer excel par access mais tu veux que l'impression se
fasse à partir d'excel.

je pense qu'il faudrait reposer le problème calmement:
- Faut-il exporter ou imprimer les états?
- à partir d'excel ou d'access ?
- A quoi sert excel, que faut-il faire dans excel ?
-

--
@+
Raymond Access MVP http://OfficeSystem.Access.free.fr/
Pour débuter sur le forum: http://www.mpfa.info/

Venez découvrir Open XML, le nouveau format de fichier de la suite Office !
http://www.comscamp.com/Tracker/Redirect.ashx?linkidÿ71c7f3-78e8-4371-abaf-b73c259e58db


a écrit dans le message de news:

On 16 juin, 20:59, "Raymond [mvp]"
wrote:
Il ne faut pas rêver, une seule commande ne suffit pas .
pour imprimer un seul état voici ce qu'il lancer comme commandes sous
excel:

Sub Macro2()
Dim acApp As New Access.Application
acApp.OpenCurrentDatabase ("bd1.mdb")
With acApp
.Visible = True ' ou false
.DoCmd.OutputTo acOutputReport, "etat1", acFormatXLS, "etat1" &
".xls",
True
End With
acApp.Quit
Set acApp = Nothing
End Sub

pour imprimer tous les états, il faut rajouter une boucle de lecture de
tous
les états:

Sub Macro2()
Dim AcObj As AccessObject
Dim acApp As New Access.Application
acApp.OpenCurrentDatabase ("bd1.mdb")
With acApp
.Visible = True ' ou false
For Each AcObj In .CurrentProject.AllReports
.DoCmd.OutputTo acOutputReport, AcObj.Name, acFormatXLS, "c:" &
AcObj.Name & ".xls", True
Next AcObj
End With
acApp.Quit
Set acApp = Nothing
End Sub

procédures non testées à vérifier et à modifier pour tous les noms
spécifiques.

--
@+
Raymond Access MVP http://OfficeSystem.Access.free.fr/
Pour débuter sur le forum:http://www.mpfa.info/

Venez découvrir Open XML, le nouveau format de fichier de la suite Office
!http://www.comscamp.com/Tracker/Redirect.ashx?linkidÿ71c7f3-78e8-43...




merci Raymont, c super, je vais tester tout ca... mais dis moi une
chose, tout ca il faut mettre donc dans mon fichier Excel, n'est pas?

comment faire alors depuis Access? car moi je veux exporter depuis
access les etats, et dans Excel... je veux que Access gère Excel...

ciao