OVH Cloud OVH Cloud

Exportation vers excel

8 réponses
Avatar
dur_acuire
Bonjour à tous,

Je suis nouvel utilisateur Access, je viens de créer une base de donnée qui
me permet de gérer un fichier client, des produits et une gestion de stock.
La base fonctionne bien et réponds à mes attentes.
Pour avancer dans l'utilisation d'Access je voudrais pouvoir imprimer la
facture d'un enregistrement. J'ai crée sur Excel un model de facture et je
voudrais, par une macro, pouvoir remplir certaines cellules par les données
d'un enregistrement. En navigant sur internet et avec la lecture de
certaines Edition et avec de nombreuses heures de travail ;), je suis
parvenu à créer ma base de donnée mais là je sèche.

Peut-être pourriez-vous m'aider ou peut-être allez-vous me dire que ce n'est
pas possible.

En tout cas, je vous remercie d'avance.

Cordialement.

8 réponses

Avatar
Gafish
Bonjour,

C'est possible d'aller écrire de façon ciblée dans certains cellules d'une
feuille Excel prédeterminé.
Il faut passer par l'Automation Excel, autrement dit, il s'agit de piloter
Excel au travers d'Access, pour ouvrir une feuille, écrire à l'interieur...
Regarde sur le site de Raymond tu as des pages consacrées à l'automation
Excel :
http://officesystem.access.free.fr/vba/excel.htm
Tu parlais de macro, là il s'agit en revanche de vba.

Arnaud

"dur_acuire" a écrit dans le message news:
ctteeb$dai$
Bonjour à tous,

Je suis nouvel utilisateur Access, je viens de créer une base de donnée
qui

me permet de gérer un fichier client, des produits et une gestion de
stock.

La base fonctionne bien et réponds à mes attentes.
Pour avancer dans l'utilisation d'Access je voudrais pouvoir imprimer la
facture d'un enregistrement. J'ai crée sur Excel un model de facture et je
voudrais, par une macro, pouvoir remplir certaines cellules par les
données

d'un enregistrement. En navigant sur internet et avec la lecture de
certaines Edition et avec de nombreuses heures de travail ;), je suis
parvenu à créer ma base de donnée mais là je sèche.

Peut-être pourriez-vous m'aider ou peut-être allez-vous me dire que ce
n'est

pas possible.

En tout cas, je vous remercie d'avance.

Cordialement.




Avatar
dur_acuire
Merci Arnaud pour cette explication je vais de ce pas fouiller le site ;)

"Gafish" a écrit dans le message de
news:e%
Bonjour,

C'est possible d'aller écrire de façon ciblée dans certains cellules d'une
feuille Excel prédeterminé.
Il faut passer par l'Automation Excel, autrement dit, il s'agit de piloter
Excel au travers d'Access, pour ouvrir une feuille, écrire à
l'interieur...

Regarde sur le site de Raymond tu as des pages consacrées à l'automation
Excel :
http://officesystem.access.free.fr/vba/excel.htm
Tu parlais de macro, là il s'agit en revanche de vba.

Arnaud

"dur_acuire" a écrit dans le message news:
ctteeb$dai$
Bonjour à tous,

Je suis nouvel utilisateur Access, je viens de créer une base de donnée
qui

me permet de gérer un fichier client, des produits et une gestion de
stock.

La base fonctionne bien et réponds à mes attentes.
Pour avancer dans l'utilisation d'Access je voudrais pouvoir imprimer la
facture d'un enregistrement. J'ai crée sur Excel un model de facture et
je


voudrais, par une macro, pouvoir remplir certaines cellules par les
données

d'un enregistrement. En navigant sur internet et avec la lecture de
certaines Edition et avec de nombreuses heures de travail ;), je suis
parvenu à créer ma base de donnée mais là je sèche.

Peut-être pourriez-vous m'aider ou peut-être allez-vous me dire que ce
n'est

pas possible.

En tout cas, je vous remercie d'avance.

Cordialement.








Avatar
dur_acuire
Je vous donne le code crée à partir d'une source.
Je l'ai réécrite pour la coller à ma base.
Le soucis c'est que le code n'ouvre que la fueille excel mais n'importe
aucune donnée.
Pourriez-vous me dire quelle erreur ai-je fait?

merci

Private Sub Commande380_Click()
On Error GoTo Err_Commande380_Click
Dim stDocName As String
Dim appexcel As Excel.Application
Dim wbexcel As Excel.Workbook


stDocName = "etats"

Set appexcel = CreateObject("Excel.Application")
appexcel.Visible = True
Set wbexcel = appexcel.Workbooks.Open("c:liasses.xls")
appexcel.Sheets("Capra").Select

appexcel.Cells(21, 4) = rst![Nom]
appexcel.Cells(23, 4) = rst![Adresse]
appexcel.Cells(24, 7) = rst![CP]
appexcel.Cells(24, 4) = rst![Commune]
appexcel.Cells(26, 4) = rst![Adresse de construction]

DoCmd.OutputTo acReport, stDocName

Exit_Commande380_Click:
Exit Sub

Err_Commande380_Click:
MsgBox Err.Description
Resume Exit_Commande380_Click

Dur_acuire

Le soucis c'est que le code ne fait qu'ouvrir la feuille Excel sans exporter
les donnée de la requete
"Gafish" a écrit dans le message de
news:e%
Bonjour,

C'est possible d'aller écrire de façon ciblée dans certains cellules d'une
feuille Excel prédeterminé.
Il faut passer par l'Automation Excel, autrement dit, il s'agit de piloter
Excel au travers d'Access, pour ouvrir une feuille, écrire à
l'interieur...

Regarde sur le site de Raymond tu as des pages consacrées à l'automation
Excel :
http://officesystem.access.free.fr/vba/excel.htm
Tu parlais de macro, là il s'agit en revanche de vba.

Arnaud

"dur_acuire" a écrit dans le message news:
ctteeb$dai$
Bonjour à tous,

Je suis nouvel utilisateur Access, je viens de créer une base de donnée
qui

me permet de gérer un fichier client, des produits et une gestion de
stock.

La base fonctionne bien et réponds à mes attentes.
Pour avancer dans l'utilisation d'Access je voudrais pouvoir imprimer la
facture d'un enregistrement. J'ai crée sur Excel un model de facture et
je


voudrais, par une macro, pouvoir remplir certaines cellules par les
données

d'un enregistrement. En navigant sur internet et avec la lecture de
certaines Edition et avec de nombreuses heures de travail ;), je suis
parvenu à créer ma base de donnée mais là je sèche.

Peut-être pourriez-vous m'aider ou peut-être allez-vous me dire que ce
n'est

pas possible.

En tout cas, je vous remercie d'avance.

Cordialement.








Avatar
Gafish
Le problème ici c'est que ton rst est inconnu.
Tu as crée une requête déja ? Si tel est le cas, mets ces quelques lignes en
plus :
Dans la partie déclaration :

Dim rst as recordset
Set rst = CurrentDb.OpenRecordset("NomDeTaRequete")

En remplacant NomDeTaRequete par le nom de la requête que tu as créé
Et à la fin tu fermes tout proprement par un

Set rst = nothing

Arnaud


"dur_acuire" a écrit dans le message news:
ctths1$gdb$
Je vous donne le code crée à partir d'une source.
Je l'ai réécrite pour la coller à ma base.
Le soucis c'est que le code n'ouvre que la fueille excel mais n'importe
aucune donnée.
Pourriez-vous me dire quelle erreur ai-je fait?

merci

Private Sub Commande380_Click()
On Error GoTo Err_Commande380_Click
Dim stDocName As String
Dim appexcel As Excel.Application
Dim wbexcel As Excel.Workbook


stDocName = "etats"

Set appexcel = CreateObject("Excel.Application")
appexcel.Visible = True
Set wbexcel = appexcel.Workbooks.Open("c:liasses.xls")
appexcel.Sheets("Capra").Select

appexcel.Cells(21, 4) = rst![Nom]
appexcel.Cells(23, 4) = rst![Adresse]
appexcel.Cells(24, 7) = rst![CP]
appexcel.Cells(24, 4) = rst![Commune]
appexcel.Cells(26, 4) = rst![Adresse de construction]

DoCmd.OutputTo acReport, stDocName

Exit_Commande380_Click:
Exit Sub

Err_Commande380_Click:
MsgBox Err.Description
Resume Exit_Commande380_Click

Dur_acuire

Le soucis c'est que le code ne fait qu'ouvrir la feuille Excel sans
exporter

les donnée de la requete
"Gafish" a écrit dans le message de
news:e%
Bonjour,

C'est possible d'aller écrire de façon ciblée dans certains cellules
d'une


feuille Excel prédeterminé.
Il faut passer par l'Automation Excel, autrement dit, il s'agit de
piloter


Excel au travers d'Access, pour ouvrir une feuille, écrire à
l'interieur...

Regarde sur le site de Raymond tu as des pages consacrées à l'automation
Excel :
http://officesystem.access.free.fr/vba/excel.htm
Tu parlais de macro, là il s'agit en revanche de vba.

Arnaud

"dur_acuire" a écrit dans le message news:
ctteeb$dai$
Bonjour à tous,

Je suis nouvel utilisateur Access, je viens de créer une base de
donnée



qui
me permet de gérer un fichier client, des produits et une gestion de
stock.

La base fonctionne bien et réponds à mes attentes.
Pour avancer dans l'utilisation d'Access je voudrais pouvoir imprimer
la



facture d'un enregistrement. J'ai crée sur Excel un model de facture
et



je
voudrais, par une macro, pouvoir remplir certaines cellules par les
données

d'un enregistrement. En navigant sur internet et avec la lecture de
certaines Edition et avec de nombreuses heures de travail ;), je suis
parvenu à créer ma base de donnée mais là je sèche.

Peut-être pourriez-vous m'aider ou peut-être allez-vous me dire que ce
n'est

pas possible.

En tout cas, je vous remercie d'avance.

Cordialement.












Avatar
3stone
Salut,

"Gafish"
| Le problème ici c'est que ton rst est inconnu.
| Tu as crée une requête déja ? Si tel est le cas, mets ces quelques lignes en
| plus :
| Dans la partie déclaration :
<snip>

Faire de l'automation Excel pour imprimer une facture... :-(

je pense qu'il aurait avantange à se familiariser avec les états d'Access...
et il oubliera cette idée aussi "sote que grenue" (dixit Daniel C. ;)
Les états d'Access créent des factures farpaitement bien et mieux que Excel!
Surtout bien plus simplement...


AMHA


--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/
Email : http://www.cerbermail.com/?Xfg61Z3IQw
Avatar
dur_acuire
Je suis conscient que Access peut générer des factures mieux qu'Excel, mais
là j'ai un besoin spécifique que les etats ne gèrent pas.
"3stone" a écrit dans le message de
news:%
Salut,

"Gafish"
| Le problème ici c'est que ton rst est inconnu.
| Tu as crée une requête déja ? Si tel est le cas, mets ces quelques
lignes en

| plus :
| Dans la partie déclaration :
<snip>

Faire de l'automation Excel pour imprimer une facture... :-(

je pense qu'il aurait avantange à se familiariser avec les états
d'Access...

et il oubliera cette idée aussi "sote que grenue" (dixit Daniel C. ;)
Les états d'Access créent des factures farpaitement bien et mieux que
Excel!

Surtout bien plus simplement...


AMHA


--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/
Email : http://www.cerbermail.com/?Xfg61Z3IQw



Avatar
3stone
Salut,

"dur_acuire"
| Je suis conscient que Access peut générer des factures mieux qu'Excel, mais
| là j'ai un besoin spécifique que les etats ne gèrent pas.


Comment savoir ?

...que les états ne gèrent pas ? en tant que "nouvel utilisateur Access" ?

Peut-être que tu utilise mal Access, ce qui t'empêche de faire ce qu'il
faut dans/avec ton état... comment savoir...

;-))


--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/
Email : http://www.cerbermail.com/?Xfg61Z3IQw
Avatar
dur_acuire
Tu as tout à fait raison, je vais approfondir ma recherche sur les etats.

"3stone" a écrit dans le message de
news:
Salut,

"dur_acuire"
| Je suis conscient que Access peut générer des factures mieux qu'Excel,
mais

| là j'ai un besoin spécifique que les etats ne gèrent pas.


Comment savoir ?

...que les états ne gèrent pas ? en tant que "nouvel utilisateur Access" ?

Peut-être que tu utilise mal Access, ce qui t'empêche de faire ce qu'il
faut dans/avec ton état... comment savoir...

;-))


--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/
Email : http://www.cerbermail.com/?Xfg61Z3IQw