OVH Cloud OVH Cloud

Fusion "1" enregistrement Access vers Word

11 réponses
Avatar
Sandra
Bonjour tout le monde et les plus doués que moi !!! ;)

J'ai une grosse base de données qui contient tout mon fichier client...
Sur mon formulaire Clients je voudrais ajouter un bouton qui me renverrais
sur un devis type Word avec les champs indiqués donc dans Word mais avec les
données de l'enregistrement sur lequel je suis quand je clique sur ce bouton
dans Access. Je ne sais pas si ma question est bien formulée...
Actuellement j'ai un devis-type Word lié à ma base de données et à chaque
fois, à la fusion, je dois rechercher le client auquel est destiné ce devis.
Ma base étant très grosse c'est parfois difficile de trouver le bon
client...

Dispo pour tout "éclaircissement" !!!! Merci d'avance !!!
Sandra
PS : Win XP et Office XP

10 réponses

1 2
Avatar
Raymond
Bonjour Sandra.

Lis les pages sur automation word suivantes et ça devrait t'aider. Reviens
ici quand tu veux si ça ne passe pas bien.
http://access.seneque.free.fr/word.htm
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Sandra" a écrit dans le message de
news:3f65b6ca$0$27021$
Bonjour tout le monde et les plus doués que moi !!! ;)

J'ai une grosse base de données qui contient tout mon fichier client...
Sur mon formulaire Clients je voudrais ajouter un bouton qui me renverrais
sur un devis type Word avec les champs indiqués donc dans Word mais avec
les

données de l'enregistrement sur lequel je suis quand je clique sur ce
bouton

dans Access. Je ne sais pas si ma question est bien formulée...
Actuellement j'ai un devis-type Word lié à ma base de données et à chaque
fois, à la fusion, je dois rechercher le client auquel est destiné ce
devis.

Ma base étant très grosse c'est parfois difficile de trouver le bon
client...

Dispo pour tout "éclaircissement" !!!! Merci d'avance !!!
Sandra
PS : Win XP et Office XP




Avatar
Sandra
Bonjour !!
Merci de ta rapidité en tout cas !
Ben c bien ce que je pensais : je comprends pas....
Alors je vais dupliquer mes fichiers (en cas de drame) et essayer et je te
tiens au courant... OK ?
Merci
Sandra

"Raymond" a écrit dans le message de news:
#
Bonjour Sandra.

Lis les pages sur automation word suivantes et ça devrait t'aider. Reviens
ici quand tu veux si ça ne passe pas bien.
http://access.seneque.free.fr/word.htm
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Sandra" a écrit dans le message de
news:3f65b6ca$0$27021$
Bonjour tout le monde et les plus doués que moi !!! ;)

J'ai une grosse base de données qui contient tout mon fichier client...
Sur mon formulaire Clients je voudrais ajouter un bouton qui me
renverrais


sur un devis type Word avec les champs indiqués donc dans Word mais avec
les

données de l'enregistrement sur lequel je suis quand je clique sur ce
bouton

dans Access. Je ne sais pas si ma question est bien formulée...
Actuellement j'ai un devis-type Word lié à ma base de données et à
chaque


fois, à la fusion, je dois rechercher le client auquel est destiné ce
devis.

Ma base étant très grosse c'est parfois difficile de trouver le bon
client...

Dispo pour tout "éclaircissement" !!!! Merci d'avance !!!
Sandra
PS : Win XP et Office XP







Avatar
Sandra
Au secours !!! Je me suis perdue à la 8ème ligne (y'à du progrès dans l'air
quand même)
Dépannage ?
MErci
Sandra
"Raymond" a écrit dans le message de news:
#
Bonjour Sandra.

Lis les pages sur automation word suivantes et ça devrait t'aider. Reviens
ici quand tu veux si ça ne passe pas bien.
http://access.seneque.free.fr/word.htm
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Sandra" a écrit dans le message de
news:3f65b6ca$0$27021$
Bonjour tout le monde et les plus doués que moi !!! ;)

J'ai une grosse base de données qui contient tout mon fichier client...
Sur mon formulaire Clients je voudrais ajouter un bouton qui me
renverrais


sur un devis type Word avec les champs indiqués donc dans Word mais avec
les

données de l'enregistrement sur lequel je suis quand je clique sur ce
bouton

dans Access. Je ne sais pas si ma question est bien formulée...
Actuellement j'ai un devis-type Word lié à ma base de données et à
chaque


fois, à la fusion, je dois rechercher le client auquel est destiné ce
devis.

Ma base étant très grosse c'est parfois difficile de trouver le bon
client...

Dispo pour tout "éclaircissement" !!!! Merci d'avance !!!
Sandra
PS : Win XP et Office XP







Avatar
Raymond
Bonjour Sandra.

Qu'est-ce qu'il t'arrive ? explique calmement, on va y arriver. t'es pas
mourante encore ?

--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Sandra" a écrit dans le message de
news:3f67194c$0$20619$
Au secours !!! Je me suis perdue à la 8ème ligne (y'à du progrès dans
l'air

quand même)
Dépannage ?
MErci
Sandra


Avatar
Sandra
Bonjour !
Bon je voudrais donc comme tu sais envoyer les données d'un seul
enregistrement (celui en cours, donc au moment de la saisie de ce client)
vers mon devis-type dans Word...
Je suis allée à l'adresse http://access.seneque.free.fr/publipostage.htm et
j'ai suivi la seconde procédure...... En insistant bien j'ai recopier le
"code" en l'adaptant à mes noms et emplacements de fichiers.
Quand je clique sur le fameux bouton associé donc à ce code, Access ouvre en
arrière-plan mon devis-type, et me demande ensuite si je veux enregistrer
les modifications, mais je ne vois même pas mon devis-type ni son bouton
dans la barre des tâches.......
JE suis pas mourante encore, non !!!!! lol Tant que ce forum existera, je
pense pas être mourante, g souvent été dépanné ici et c génial
Merci !!!
Sandra
"Raymond" a écrit dans le message de news:
#
Bonjour Sandra.

Qu'est-ce qu'il t'arrive ? explique calmement, on va y arriver. t'es pas
mourante encore ?

--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Sandra" a écrit dans le message de
news:3f67194c$0$20619$
Au secours !!! Je me suis perdue à la 8ème ligne (y'à du progrès dans
l'air

quand même)
Dépannage ?
MErci
Sandra






Avatar
Raymond
Si tu veux voir il faut mettre un
.Visible = True

tu es sûre que c'est cet exemple qu'il te faut. dans ton cas ce n'est pas du
publipostage, mais simplement une ouverture de document avec création d'un
nouveau document, chargement de données et passation de la main à
l'opérateur pour compléter , non ?

--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Sandra" a écrit dans le message de
news:3f6723cc$0$20638$
Bonjour !
Bon je voudrais donc comme tu sais envoyer les données d'un seul
enregistrement (celui en cours, donc au moment de la saisie de ce client)
vers mon devis-type dans Word...
Je suis allée à l'adresse http://access.seneque.free.fr/publipostage.htm
et

j'ai suivi la seconde procédure...... En insistant bien j'ai recopier le
"code" en l'adaptant à mes noms et emplacements de fichiers.
Quand je clique sur le fameux bouton associé donc à ce code, Access ouvre
en

arrière-plan mon devis-type, et me demande ensuite si je veux enregistrer
les modifications, mais je ne vois même pas mon devis-type ni son bouton
dans la barre des tâches.......
JE suis pas mourante encore, non !!!!! lol Tant que ce forum existera, je
pense pas être mourante, g souvent été dépanné ici et c génial
Merci !!!
Sandra


Avatar
Sandra
Bonjour !!!
En effet, je pense pas non plus que ce soit la bonne formule pour ce que je
veux faire....

Oui, ce que je voudrais faire c'est exactement ça :
1 - Je saisis mon nouveau client dans Access
2 - Je clique sur "Créer un devis pour ce client"
. Access envoie les données de ce client dans mon devis Word
3 - et je complète mon devis.......... le reste ça va j'ai assimilé ;)

Merci encore
Sandra


"Raymond" a écrit dans le message de news:

Si tu veux voir il faut mettre un
.Visible = True

tu es sûre que c'est cet exemple qu'il te faut. dans ton cas ce n'est pas
du

publipostage, mais simplement une ouverture de document avec création d'un
nouveau document, chargement de données et passation de la main à
l'opérateur pour compléter , non ?

--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Sandra" a écrit dans le message de
news:3f6723cc$0$20638$
Bonjour !
Bon je voudrais donc comme tu sais envoyer les données d'un seul
enregistrement (celui en cours, donc au moment de la saisie de ce
client)


vers mon devis-type dans Word...
Je suis allée à l'adresse http://access.seneque.free.fr/publipostage.htm
et

j'ai suivi la seconde procédure...... En insistant bien j'ai recopier le
"code" en l'adaptant à mes noms et emplacements de fichiers.
Quand je clique sur le fameux bouton associé donc à ce code, Access
ouvre


en
arrière-plan mon devis-type, et me demande ensuite si je veux
enregistrer


les modifications, mais je ne vois même pas mon devis-type ni son bouton
dans la barre des tâches.......
JE suis pas mourante encore, non !!!!! lol Tant que ce forum existera,
je


pense pas être mourante, g souvent été dépanné ici et c génial
Merci !!!
Sandra






Avatar
Raymond
Bonjour.

C'est bien ce que je pensais.
ce qu'il faut que tu fasses:

tu as un devis modèle nommé Doc1.doc situé sur c: par exemple: sur ce
modèle tu insères des signets aux emplacements où tu veux mettre tes données
en provenance d'access, exemple nom, rue, date par exemple.
sur l'événement click de ton bouton tu places la procédure suivante:

Private Sub Commande0_Click()
Dim W_App As Object
Set W_App = CreateObject("Word.Application")
With W_App
.Visible = True
.Documents.Open ("c:Doc1.Doc")
.ActiveDocument.SaveAs ("c:" & Me.Numero & ".doc")
W_App.ActiveDocument.Bookmarks("NOM").Select
W_App.Selection.InsertAfter Me.Nom
W_App.ActiveDocument.Bookmarks("RUE").Select
W_App.Selection.InsertAfter Me.madate
W_App.ActiveDocument.Bookmarks("DATEJOUR").Select
W_App.Selection.InsertAfter Date
Set W_App = Nothing
End With
End Sub

ce qui fait:
tu ouvres le modèle doc1
tu le sauvegarde sous le nom de ton client(son numero), le nom du fichier
sera par exemple c:12345.doc
tu sélectionnes le signet NOM
tu insères le nom de ton client après ce signet
tu sélectionnes le signet RUE
tu insères la rue de l'adresse de ton client après ce signet
et tu continues ainsi pour toutes tes données.

le nothing permet de libérer ton objet application.
tu n'as pas besoin de .quit car word se terminera toujours par une fermeture
de l'opérateur.
lorsque le devis est terminé, fermer word car access lancera toujours une
nouvelle copie de word (createobject)

(dernière note: je pars ce matin à 11h30 en déplacement jusqu'à ce soir 20h,
si problème repasse un message qui sera traité par un excellent camarade de
ce forum ou je te répondrais ce soir. bonne journée)
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Sandra" a écrit dans le message de
news:3f6809e6$0$27577$
Bonjour !!!
En effet, je pense pas non plus que ce soit la bonne formule pour ce que
je

veux faire....

Oui, ce que je voudrais faire c'est exactement ça :
1 - Je saisis mon nouveau client dans Access
2 - Je clique sur "Créer un devis pour ce client"
. Access envoie les données de ce client dans mon devis Word
3 - et je complète mon devis.......... le reste ça va j'ai assimilé ;)


Avatar
Sandra
Salut !
Ben voilà, j'ai suivi ta procédure pas à pas et tout marche à la perfection
!!! C'est exactement ce que je souhaitais.
Un petit souci néanmoins : j'enregistrais manuellement les devis de mes
clients sous la forme suivante : N° Dossier + Nom du client (pas sous son n°
de client parce qu'un client a parfois plusieurs devis)
Je suis sûre que tu connais cett eligne de commande ..... ;))
D'autre part, je suis très curieuse et toujours à la recherche de "nouvelles
connaissances"; où est-ce que je peux apprendre ce "langage" que tu parles
couramment !!!??? lol
En tout cas merci de ton aide, tu m'as pas sauvé la vie mais tu me l'as
beaucoup simplifiée !!!!!
Sandra


"Raymond" a écrit dans le message de news:
OfgGN#
Bonjour.

C'est bien ce que je pensais.
ce qu'il faut que tu fasses:

tu as un devis modèle nommé Doc1.doc situé sur c: par exemple: sur ce
modèle tu insères des signets aux emplacements où tu veux mettre tes
données

en provenance d'access, exemple nom, rue, date par exemple.
sur l'événement click de ton bouton tu places la procédure suivante:

Private Sub Commande0_Click()
Dim W_App As Object
Set W_App = CreateObject("Word.Application")
With W_App
.Visible = True
.Documents.Open ("c:Doc1.Doc")
.ActiveDocument.SaveAs ("c:" & Me.Numero & ".doc")
W_App.ActiveDocument.Bookmarks("NOM").Select
W_App.Selection.InsertAfter Me.Nom
W_App.ActiveDocument.Bookmarks("RUE").Select
W_App.Selection.InsertAfter Me.madate
W_App.ActiveDocument.Bookmarks("DATEJOUR").Select
W_App.Selection.InsertAfter Date
Set W_App = Nothing
End With
End Sub

ce qui fait:
tu ouvres le modèle doc1
tu le sauvegarde sous le nom de ton client(son numero), le nom du fichier
sera par exemple c:12345.doc
tu sélectionnes le signet NOM
tu insères le nom de ton client après ce signet
tu sélectionnes le signet RUE
tu insères la rue de l'adresse de ton client après ce signet
et tu continues ainsi pour toutes tes données.

le nothing permet de libérer ton objet application.
tu n'as pas besoin de .quit car word se terminera toujours par une
fermeture

de l'opérateur.
lorsque le devis est terminé, fermer word car access lancera toujours une
nouvelle copie de word (createobject)

(dernière note: je pars ce matin à 11h30 en déplacement jusqu'à ce soir
20h,

si problème repasse un message qui sera traité par un excellent camarade
de

ce forum ou je te répondrais ce soir. bonne journée)
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Sandra" a écrit dans le message de
news:3f6809e6$0$27577$
Bonjour !!!
En effet, je pense pas non plus que ce soit la bonne formule pour ce que
je

veux faire....

Oui, ce que je voudrais faire c'est exactement ça :
1 - Je saisis mon nouveau client dans Access
2 - Je clique sur "Créer un devis pour ce client"
. Access envoie les données de ce client dans mon devis Word
3 - et je complète mon devis.......... le reste ça va j'ai assimilé ;)






Avatar
Raymond
Bonsoir Sandra.

D'autre part, je suis très curieuse et toujours à la recherche de
"nouvelles

connaissances"; où est-ce que je peux apprendre ce "langage" que tu parles
couramment !!!??? lol


j'ai commencé le basic tout court en 1983 ou 4 je ne sais plus !
pour ta formation regarde sur les conseils d'utilisation du forum et
particulièrement la page: http://users.skynet.be/mpfa/sites.htm

pour tes devis tu changes les données.

.ActiveDocument.SaveAs ("c:" & Me.Dossier & "_" & Left(Me.Nomclient, 8)
& ".doc")

ce qui te donnera un fichier tel que c:12345_dupont

tu peux mettre ce que tu veux.
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Sandra" a écrit dans le message de
news:3f6864e2$0$20653$
Salut !
Ben voilà, j'ai suivi ta procédure pas à pas et tout marche à la
perfection

!!! C'est exactement ce que je souhaitais.
Un petit souci néanmoins : j'enregistrais manuellement les devis de mes
clients sous la forme suivante : N° Dossier + Nom du client (pas sous son


de client parce qu'un client a parfois plusieurs devis)
Je suis sûre que tu connais cett eligne de commande ..... ;))
D'autre part, je suis très curieuse et toujours à la recherche de
"nouvelles

connaissances"; où est-ce que je peux apprendre ce "langage" que tu parles
couramment !!!??? lol
En tout cas merci de ton aide, tu m'as pas sauvé la vie mais tu me l'as
beaucoup simplifiée !!!!!
Sandra


1 2