Bonsoir,
J'ouvre un formulaire en création ou modification, attitré à un individu
avec nom_prénom adresse, ensuite dans un champs "mémo" je vais taper un
courrier sans formule de politesse ni d'introduction, j''ai 4 lettres types
différentes qui sont liées par une requête à mon formulaire, la condition est
que le champs courrier doit être "vrai", pour le moment je procède par lien
hypertexte, je clic sur le type de lettre désiré, qui va s'ouvrir dans word
et il me reste ensuite à cliquer pour effectuer mon publipostage vers mon
imprimante..Je souhaite ne plus pratiquer avec le lien hypertexte mais un btn
par exemple et faire le publipostage vers mon imprimante sans ouvrir word,
directement est-ce possible ??????
Si oui peut-on me donner la procédure à suivre.
Merci
--
Uriane
Bonsoir, J'ouvre un formulaire en création ou modification, attitré à un individu avec nom_prénom adresse, ensuite dans un champs "mémo" je vais taper un courrier sans formule de politesse ni d'introduction, j''ai 4 lettres types différentes qui sont liées par une requête à mon formulaire, la condition est que le champs courrier doit être "vrai", pour le moment je procède par lien hypertexte, je clic sur le type de lettre désiré, qui va s'ouvrir dans word et il me reste ensuite à cliquer pour effectuer mon publipostage vers mon imprimante..Je souhaite ne plus pratiquer avec le lien hypertexte mais un btn par exemple et faire le publipostage vers mon imprimante sans ouvrir word, directement est-ce possible ?????? Si oui peut-on me donner la procédure à suivre. Merci -- Uriane
Bonjour, Uriane
Tu devrais trouver ton bonheur ici: http://access.developpez.com/faq/?page=Word#ImprimerWord
Bonne continuation
Bonsoir,
J'ouvre un formulaire en création ou modification, attitré à un individu
avec nom_prénom adresse, ensuite dans un champs "mémo" je vais taper un
courrier sans formule de politesse ni d'introduction, j''ai 4 lettres
types
différentes qui sont liées par une requête à mon formulaire, la condition
est
que le champs courrier doit être "vrai", pour le moment je procède par
lien
hypertexte, je clic sur le type de lettre désiré, qui va s'ouvrir dans
word
et il me reste ensuite à cliquer pour effectuer mon publipostage vers mon
imprimante..Je souhaite ne plus pratiquer avec le lien hypertexte mais un
btn
par exemple et faire le publipostage vers mon imprimante sans ouvrir word,
directement est-ce possible ??????
Si oui peut-on me donner la procédure à suivre.
Merci
--
Uriane
Bonjour, Uriane
Tu devrais trouver ton bonheur ici:
http://access.developpez.com/faq/?page=Word#ImprimerWord
Bonsoir, J'ouvre un formulaire en création ou modification, attitré à un individu avec nom_prénom adresse, ensuite dans un champs "mémo" je vais taper un courrier sans formule de politesse ni d'introduction, j''ai 4 lettres types différentes qui sont liées par une requête à mon formulaire, la condition est que le champs courrier doit être "vrai", pour le moment je procède par lien hypertexte, je clic sur le type de lettre désiré, qui va s'ouvrir dans word et il me reste ensuite à cliquer pour effectuer mon publipostage vers mon imprimante..Je souhaite ne plus pratiquer avec le lien hypertexte mais un btn par exemple et faire le publipostage vers mon imprimante sans ouvrir word, directement est-ce possible ?????? Si oui peut-on me donner la procédure à suivre. Merci -- Uriane
Bonjour, Uriane
Tu devrais trouver ton bonheur ici: http://access.developpez.com/faq/?page=Word#ImprimerWord
Bonne continuation
URIANE
Bonsoir Gilles, je te remercie, je vais aller voir et essayer, j'espère que ce n'est pas trop compliqué et que je vais m'en sortir. -- Uriane
Bonsoir, J'ouvre un formulaire en création ou modification, attitré à un individu avec nom_prénom adresse, ensuite dans un champs "mémo" je vais taper un courrier sans formule de politesse ni d'introduction, j''ai 4 lettres types différentes qui sont liées par une requête à mon formulaire, la condition est que le champs courrier doit être "vrai", pour le moment je procède par lien hypertexte, je clic sur le type de lettre désiré, qui va s'ouvrir dans word et il me reste ensuite à cliquer pour effectuer mon publipostage vers mon imprimante..Je souhaite ne plus pratiquer avec le lien hypertexte mais un btn par exemple et faire le publipostage vers mon imprimante sans ouvrir word, directement est-ce possible ?????? Si oui peut-on me donner la procédure à suivre. Merci -- Uriane
Bonjour, Uriane
Tu devrais trouver ton bonheur ici: http://access.developpez.com/faq/?page=Word#ImprimerWord
Bonne continuation
Bonsoir Gilles, je te remercie, je vais aller voir et essayer, j'espère que
ce n'est pas trop compliqué et que je vais m'en sortir.
--
Uriane
Bonsoir,
J'ouvre un formulaire en création ou modification, attitré à un individu
avec nom_prénom adresse, ensuite dans un champs "mémo" je vais taper un
courrier sans formule de politesse ni d'introduction, j''ai 4 lettres
types
différentes qui sont liées par une requête à mon formulaire, la condition
est
que le champs courrier doit être "vrai", pour le moment je procède par
lien
hypertexte, je clic sur le type de lettre désiré, qui va s'ouvrir dans
word
et il me reste ensuite à cliquer pour effectuer mon publipostage vers mon
imprimante..Je souhaite ne plus pratiquer avec le lien hypertexte mais un
btn
par exemple et faire le publipostage vers mon imprimante sans ouvrir word,
directement est-ce possible ??????
Si oui peut-on me donner la procédure à suivre.
Merci
--
Uriane
Bonjour, Uriane
Tu devrais trouver ton bonheur ici:
http://access.developpez.com/faq/?page=Word#ImprimerWord
Bonsoir Gilles, je te remercie, je vais aller voir et essayer, j'espère que ce n'est pas trop compliqué et que je vais m'en sortir. -- Uriane
Bonsoir, J'ouvre un formulaire en création ou modification, attitré à un individu avec nom_prénom adresse, ensuite dans un champs "mémo" je vais taper un courrier sans formule de politesse ni d'introduction, j''ai 4 lettres types différentes qui sont liées par une requête à mon formulaire, la condition est que le champs courrier doit être "vrai", pour le moment je procède par lien hypertexte, je clic sur le type de lettre désiré, qui va s'ouvrir dans word et il me reste ensuite à cliquer pour effectuer mon publipostage vers mon imprimante..Je souhaite ne plus pratiquer avec le lien hypertexte mais un btn par exemple et faire le publipostage vers mon imprimante sans ouvrir word, directement est-ce possible ?????? Si oui peut-on me donner la procédure à suivre. Merci -- Uriane
Bonjour, Uriane
Tu devrais trouver ton bonheur ici: http://access.developpez.com/faq/?page=Word#ImprimerWord
Bonne continuation
URIANE
Bon j'arrive à faire ce que je désire, mais à la fin de mon code que dois-je mettre pour qu'il ferme automatiquement et les docs ouverts et l'appli word ??? Merci .ActiveDocument.close wdDoNotSaveChanges ???? -- Uriane
Bonsoir, J'ouvre un formulaire en création ou modification, attitré à un individu avec nom_prénom adresse, ensuite dans un champs "mémo" je vais taper un courrier sans formule de politesse ni d'introduction, j''ai 4 lettres types différentes qui sont liées par une requête à mon formulaire, la condition est que le champs courrier doit être "vrai", pour le moment je procède par lien hypertexte, je clic sur le type de lettre désiré, qui va s'ouvrir dans word et il me reste ensuite à cliquer pour effectuer mon publipostage vers mon imprimante..Je souhaite ne plus pratiquer avec le lien hypertexte mais un btn par exemple et faire le publipostage vers mon imprimante sans ouvrir word, directement est-ce possible ?????? Si oui peut-on me donner la procédure à suivre. Merci -- Uriane
Bonjour, Uriane
Tu devrais trouver ton bonheur ici: http://access.developpez.com/faq/?page=Word#ImprimerWord
Bonne continuation
Bon j'arrive à faire ce que je désire, mais à la fin de mon code que dois-je
mettre pour qu'il ferme automatiquement et les docs ouverts et l'appli word
???
Merci
.ActiveDocument.close wdDoNotSaveChanges
????
--
Uriane
Bonsoir,
J'ouvre un formulaire en création ou modification, attitré à un individu
avec nom_prénom adresse, ensuite dans un champs "mémo" je vais taper un
courrier sans formule de politesse ni d'introduction, j''ai 4 lettres
types
différentes qui sont liées par une requête à mon formulaire, la condition
est
que le champs courrier doit être "vrai", pour le moment je procède par
lien
hypertexte, je clic sur le type de lettre désiré, qui va s'ouvrir dans
word
et il me reste ensuite à cliquer pour effectuer mon publipostage vers mon
imprimante..Je souhaite ne plus pratiquer avec le lien hypertexte mais un
btn
par exemple et faire le publipostage vers mon imprimante sans ouvrir word,
directement est-ce possible ??????
Si oui peut-on me donner la procédure à suivre.
Merci
--
Uriane
Bonjour, Uriane
Tu devrais trouver ton bonheur ici:
http://access.developpez.com/faq/?page=Word#ImprimerWord
Bon j'arrive à faire ce que je désire, mais à la fin de mon code que dois-je mettre pour qu'il ferme automatiquement et les docs ouverts et l'appli word ??? Merci .ActiveDocument.close wdDoNotSaveChanges ???? -- Uriane
Bonsoir, J'ouvre un formulaire en création ou modification, attitré à un individu avec nom_prénom adresse, ensuite dans un champs "mémo" je vais taper un courrier sans formule de politesse ni d'introduction, j''ai 4 lettres types différentes qui sont liées par une requête à mon formulaire, la condition est que le champs courrier doit être "vrai", pour le moment je procède par lien hypertexte, je clic sur le type de lettre désiré, qui va s'ouvrir dans word et il me reste ensuite à cliquer pour effectuer mon publipostage vers mon imprimante..Je souhaite ne plus pratiquer avec le lien hypertexte mais un btn par exemple et faire le publipostage vers mon imprimante sans ouvrir word, directement est-ce possible ?????? Si oui peut-on me donner la procédure à suivre. Merci -- Uriane
Bonjour, Uriane
Tu devrais trouver ton bonheur ici: http://access.developpez.com/faq/?page=Word#ImprimerWord
Bonne continuation
Gilles MOUGNOZ
Bon j'arrive à faire ce que je désire, mais à la fin de mon code que dois-je mettre pour qu'il ferme automatiquement et les docs ouverts et l'appli word ??? Merci .ActiveDocument.close wdDoNotSaveChanges ???? -- Uriane
Re,
Effectivement, je viens de faire le test. Normalement, l'instruction .Quit ferme Word. Ce qui se passe, c'est qu'on demande la fermeture alors que toutes les données n'ont pas été transmises à l'imprimante. (Si tu regarde attentivement, tu verras un message fugace de Word te disant d'attendre que l'impression soit terminée avant de fermer Word.) La parade, c'est de lancer l'impression en modifiant le paramètre qui détermine si elle doit se faire en arrière-plan ou pas. Il faut donc remplacer ".PrintOut" par ".PrintOut False". Et là, miracle! Plus de message subliminal, plus de Word, en bref, plus de problème !
Bonne continuation
Bon j'arrive à faire ce que je désire, mais à la fin de mon code que
dois-je
mettre pour qu'il ferme automatiquement et les docs ouverts et l'appli
word
???
Merci
.ActiveDocument.close wdDoNotSaveChanges
????
--
Uriane
Re,
Effectivement, je viens de faire le test.
Normalement, l'instruction .Quit ferme Word.
Ce qui se passe, c'est qu'on demande la fermeture alors que toutes les
données n'ont pas été transmises à l'imprimante.
(Si tu regarde attentivement, tu verras un message fugace de Word te disant
d'attendre que l'impression soit terminée avant de fermer Word.)
La parade, c'est de lancer l'impression en modifiant le paramètre qui
détermine si elle doit se faire en arrière-plan ou pas.
Il faut donc remplacer ".PrintOut" par ".PrintOut False".
Et là, miracle! Plus de message subliminal, plus de Word, en bref, plus de
problème !
Bon j'arrive à faire ce que je désire, mais à la fin de mon code que dois-je mettre pour qu'il ferme automatiquement et les docs ouverts et l'appli word ??? Merci .ActiveDocument.close wdDoNotSaveChanges ???? -- Uriane
Re,
Effectivement, je viens de faire le test. Normalement, l'instruction .Quit ferme Word. Ce qui se passe, c'est qu'on demande la fermeture alors que toutes les données n'ont pas été transmises à l'imprimante. (Si tu regarde attentivement, tu verras un message fugace de Word te disant d'attendre que l'impression soit terminée avant de fermer Word.) La parade, c'est de lancer l'impression en modifiant le paramètre qui détermine si elle doit se faire en arrière-plan ou pas. Il faut donc remplacer ".PrintOut" par ".PrintOut False". Et là, miracle! Plus de message subliminal, plus de Word, en bref, plus de problème !
Bonne continuation
URIANE
Bonjour Gilles, voici ce que j'ai écris : 'Diriger le publipostage vers l'imprimante .ActiveDocument.MailMerge.Execute........ 'éxécute le publipostage .ActiveDocument.PrintOut False............... ' imprime le document .ActiveDocument.close wdDoNotSaveChanges.......'ferme le doc publiposté .ActiveDocument.close wdDoNotSaveChanges.......'ferme le doc non publiposté -- Mais l'appli reste ouverte, ce que je souhaite c'est pouvoir me retrouver sur mon formulaire access.... Merci Uriane
Bon j'arrive à faire ce que je désire, mais à la fin de mon code que dois-je mettre pour qu'il ferme automatiquement et les docs ouverts et l'appli word ??? Merci .ActiveDocument.close wdDoNotSaveChanges ???? -- Uriane
Re,
Effectivement, je viens de faire le test. Normalement, l'instruction .Quit ferme Word. Ce qui se passe, c'est qu'on demande la fermeture alors que toutes les données n'ont pas été transmises à l'imprimante. (Si tu regarde attentivement, tu verras un message fugace de Word te disant d'attendre que l'impression soit terminée avant de fermer Word.) La parade, c'est de lancer l'impression en modifiant le paramètre qui détermine si elle doit se faire en arrière-plan ou pas. Il faut donc remplacer ".PrintOut" par ".PrintOut False". Et là, miracle! Plus de message subliminal, plus de Word, en bref, plus de problème !
Bonne continuation
Bonjour Gilles,
voici ce que j'ai écris :
'Diriger le publipostage vers l'imprimante
.ActiveDocument.MailMerge.Execute........ 'éxécute le publipostage
.ActiveDocument.PrintOut False............... ' imprime le document
.ActiveDocument.close wdDoNotSaveChanges.......'ferme le doc publiposté
.ActiveDocument.close wdDoNotSaveChanges.......'ferme le doc non
publiposté
-- Mais l'appli reste ouverte, ce que je souhaite c'est pouvoir me retrouver
sur mon formulaire access....
Merci
Uriane
Bon j'arrive à faire ce que je désire, mais à la fin de mon code que
dois-je
mettre pour qu'il ferme automatiquement et les docs ouverts et l'appli
word
???
Merci
.ActiveDocument.close wdDoNotSaveChanges
????
--
Uriane
Re,
Effectivement, je viens de faire le test.
Normalement, l'instruction .Quit ferme Word.
Ce qui se passe, c'est qu'on demande la fermeture alors que toutes les
données n'ont pas été transmises à l'imprimante.
(Si tu regarde attentivement, tu verras un message fugace de Word te disant
d'attendre que l'impression soit terminée avant de fermer Word.)
La parade, c'est de lancer l'impression en modifiant le paramètre qui
détermine si elle doit se faire en arrière-plan ou pas.
Il faut donc remplacer ".PrintOut" par ".PrintOut False".
Et là, miracle! Plus de message subliminal, plus de Word, en bref, plus de
problème !
Bonjour Gilles, voici ce que j'ai écris : 'Diriger le publipostage vers l'imprimante .ActiveDocument.MailMerge.Execute........ 'éxécute le publipostage .ActiveDocument.PrintOut False............... ' imprime le document .ActiveDocument.close wdDoNotSaveChanges.......'ferme le doc publiposté .ActiveDocument.close wdDoNotSaveChanges.......'ferme le doc non publiposté -- Mais l'appli reste ouverte, ce que je souhaite c'est pouvoir me retrouver sur mon formulaire access.... Merci Uriane
Bon j'arrive à faire ce que je désire, mais à la fin de mon code que dois-je mettre pour qu'il ferme automatiquement et les docs ouverts et l'appli word ??? Merci .ActiveDocument.close wdDoNotSaveChanges ???? -- Uriane
Re,
Effectivement, je viens de faire le test. Normalement, l'instruction .Quit ferme Word. Ce qui se passe, c'est qu'on demande la fermeture alors que toutes les données n'ont pas été transmises à l'imprimante. (Si tu regarde attentivement, tu verras un message fugace de Word te disant d'attendre que l'impression soit terminée avant de fermer Word.) La parade, c'est de lancer l'impression en modifiant le paramètre qui détermine si elle doit se faire en arrière-plan ou pas. Il faut donc remplacer ".PrintOut" par ".PrintOut False". Et là, miracle! Plus de message subliminal, plus de Word, en bref, plus de problème !
Bonne continuation
Gilles MOUGNOZ
Bonjour Gilles, voici ce que j'ai écris : 'Diriger le publipostage vers l'imprimante .ActiveDocument.MailMerge.Execute........ 'éxécute le publipostage .ActiveDocument.PrintOut False............... ' imprime le document .ActiveDocument.close wdDoNotSaveChanges.......'ferme le doc publiposté .ActiveDocument.close wdDoNotSaveChanges.......'ferme le doc non publiposté -- Mais l'appli reste ouverte, ce que je souhaite c'est pouvoir me retrouver sur mon formulaire access.... Merci Uriane
Bonjour, Uriane
Je te préviens tout de suite, tu risques de te sentir bête mais il ne faut pas. Ajoute cette ligne après le dernier .Close: .Quit C'est tout, je t'avais prévenue... Désolé
Bonne continuation
Bonjour Gilles,
voici ce que j'ai écris :
'Diriger le publipostage vers l'imprimante
.ActiveDocument.MailMerge.Execute........ 'éxécute le publipostage
.ActiveDocument.PrintOut False............... ' imprime le document
.ActiveDocument.close wdDoNotSaveChanges.......'ferme le doc publiposté
.ActiveDocument.close wdDoNotSaveChanges.......'ferme le doc non
publiposté
-- Mais l'appli reste ouverte, ce que je souhaite c'est pouvoir me
retrouver
sur mon formulaire access....
Merci
Uriane
Bonjour, Uriane
Je te préviens tout de suite, tu risques de te sentir bête mais il ne faut
pas.
Ajoute cette ligne après le dernier .Close:
.Quit
C'est tout, je t'avais prévenue... Désolé
Bonjour Gilles, voici ce que j'ai écris : 'Diriger le publipostage vers l'imprimante .ActiveDocument.MailMerge.Execute........ 'éxécute le publipostage .ActiveDocument.PrintOut False............... ' imprime le document .ActiveDocument.close wdDoNotSaveChanges.......'ferme le doc publiposté .ActiveDocument.close wdDoNotSaveChanges.......'ferme le doc non publiposté -- Mais l'appli reste ouverte, ce que je souhaite c'est pouvoir me retrouver sur mon formulaire access.... Merci Uriane
Bonjour, Uriane
Je te préviens tout de suite, tu risques de te sentir bête mais il ne faut pas. Ajoute cette ligne après le dernier .Close: .Quit C'est tout, je t'avais prévenue... Désolé
Bonne continuation
URIANE
Désolée, non seulement je me sens nulle, mais en plus ça ne fonctionne pas, il me dis que la référence est manquante, vois tu ou se trouve mon erreur ???? Encore merci -- Uriane
Bonjour Gilles, voici ce que j'ai écris : 'Diriger le publipostage vers l'imprimante .ActiveDocument.MailMerge.Execute........ 'éxécute le publipostage .ActiveDocument.PrintOut False............... ' imprime le document .ActiveDocument.close wdDoNotSaveChanges.......'ferme le doc publiposté .ActiveDocument.close wdDoNotSaveChanges.......'ferme le doc non publiposté -- Mais l'appli reste ouverte, ce que je souhaite c'est pouvoir me retrouver sur mon formulaire access.... Merci Uriane
Bonjour, Uriane
Je te préviens tout de suite, tu risques de te sentir bête mais il ne faut pas. Ajoute cette ligne après le dernier .Close: .Quit C'est tout, je t'avais prévenue... Désolé
Bonne continuation
Désolée, non seulement je me sens nulle, mais en plus ça ne fonctionne pas,
il me dis que la référence est manquante, vois tu ou se trouve mon erreur ????
Encore merci
--
Uriane
Bonjour Gilles,
voici ce que j'ai écris :
'Diriger le publipostage vers l'imprimante
.ActiveDocument.MailMerge.Execute........ 'éxécute le publipostage
.ActiveDocument.PrintOut False............... ' imprime le document
.ActiveDocument.close wdDoNotSaveChanges.......'ferme le doc publiposté
.ActiveDocument.close wdDoNotSaveChanges.......'ferme le doc non
publiposté
-- Mais l'appli reste ouverte, ce que je souhaite c'est pouvoir me
retrouver
sur mon formulaire access....
Merci
Uriane
Bonjour, Uriane
Je te préviens tout de suite, tu risques de te sentir bête mais il ne faut
pas.
Ajoute cette ligne après le dernier .Close:
.Quit
C'est tout, je t'avais prévenue... Désolé
Désolée, non seulement je me sens nulle, mais en plus ça ne fonctionne pas, il me dis que la référence est manquante, vois tu ou se trouve mon erreur ???? Encore merci -- Uriane
Bonjour Gilles, voici ce que j'ai écris : 'Diriger le publipostage vers l'imprimante .ActiveDocument.MailMerge.Execute........ 'éxécute le publipostage .ActiveDocument.PrintOut False............... ' imprime le document .ActiveDocument.close wdDoNotSaveChanges.......'ferme le doc publiposté .ActiveDocument.close wdDoNotSaveChanges.......'ferme le doc non publiposté -- Mais l'appli reste ouverte, ce que je souhaite c'est pouvoir me retrouver sur mon formulaire access.... Merci Uriane
Bonjour, Uriane
Je te préviens tout de suite, tu risques de te sentir bête mais il ne faut pas. Ajoute cette ligne après le dernier .Close: .Quit C'est tout, je t'avais prévenue... Désolé
Bonne continuation
Gilles MOUGNOZ
Désolée, non seulement je me sens nulle, mais en plus ça ne fonctionne pas, il me dis que la référence est manquante, vois tu ou se trouve mon erreur ???? Encore merci -- Uriane
Re, Peux-tu me redonner l'ensemble de ton code ? Je ne vois plus bien où tu en es, à présent... Courage, on va en venir à bout...
PS: Il ne faut pas te sentir nulle, c'est en faisant des erreurs qu'on progresse. Comment tu crois que je suis arrivé à ce niveau ? Avec un BAC+12 en Access ?! ;-)
Désolée, non seulement je me sens nulle, mais en plus ça ne fonctionne
pas,
il me dis que la référence est manquante, vois tu ou se trouve mon erreur
????
Encore merci
--
Uriane
Re,
Peux-tu me redonner l'ensemble de ton code ?
Je ne vois plus bien où tu en es, à présent...
Courage, on va en venir à bout...
PS: Il ne faut pas te sentir nulle, c'est en faisant des erreurs qu'on
progresse.
Comment tu crois que je suis arrivé à ce niveau ? Avec un BAC+12 en Access
?! ;-)
Désolée, non seulement je me sens nulle, mais en plus ça ne fonctionne pas, il me dis que la référence est manquante, vois tu ou se trouve mon erreur ???? Encore merci -- Uriane
Re, Peux-tu me redonner l'ensemble de ton code ? Je ne vois plus bien où tu en es, à présent... Courage, on va en venir à bout...
PS: Il ne faut pas te sentir nulle, c'est en faisant des erreurs qu'on progresse. Comment tu crois que je suis arrivé à ce niveau ? Avec un BAC+12 en Access ?! ;-)
URIANE
Voici le code :
'Déclaration du code Dim wdapp As WORD.Application
'Démarrer Word Set wdapp = CreateObject("Word.application") With wdapp .Visible = True
'ouvrir le document .Documents.Open ("c:lettre_type" & Me.lst_type)
'Diriger le publipostage vers un nouveau document .ActiveDocument.MailMerge.Execute .ActiveDocument.PrintOut False .ActiveDocument.close wdDoNotSaveChanges .ActiveDocument.close wdDoNotSaveChanges End With 'fermer et libérer les objets Set wdapp = Nothing
'DoCmd.close (si je le laisse en action il me ferme access et non word End Sub -- Uriane
Désolée, non seulement je me sens nulle, mais en plus ça ne fonctionne pas, il me dis que la référence est manquante, vois tu ou se trouve mon erreur ???? Encore merci -- Uriane
Re, Peux-tu me redonner l'ensemble de ton code ? Je ne vois plus bien où tu en es, à présent... Courage, on va en venir à bout...
PS: Il ne faut pas te sentir nulle, c'est en faisant des erreurs qu'on progresse. Comment tu crois que je suis arrivé à ce niveau ? Avec un BAC+12 en Access ?! ;-)
Voici le code :
'Déclaration du code
Dim wdapp As WORD.Application
'Démarrer Word
Set wdapp = CreateObject("Word.application")
With wdapp
.Visible = True
'ouvrir le document
.Documents.Open ("c:lettre_type" & Me.lst_type)
'Diriger le publipostage vers un nouveau document
.ActiveDocument.MailMerge.Execute
.ActiveDocument.PrintOut False
.ActiveDocument.close wdDoNotSaveChanges
.ActiveDocument.close wdDoNotSaveChanges
End With
'fermer et libérer les objets
Set wdapp = Nothing
'DoCmd.close (si je le laisse en action il me ferme access
et non word
End Sub
--
Uriane
Désolée, non seulement je me sens nulle, mais en plus ça ne fonctionne
pas,
il me dis que la référence est manquante, vois tu ou se trouve mon erreur
????
Encore merci
--
Uriane
Re,
Peux-tu me redonner l'ensemble de ton code ?
Je ne vois plus bien où tu en es, à présent...
Courage, on va en venir à bout...
PS: Il ne faut pas te sentir nulle, c'est en faisant des erreurs qu'on
progresse.
Comment tu crois que je suis arrivé à ce niveau ? Avec un BAC+12 en Access
?! ;-)
'Déclaration du code Dim wdapp As WORD.Application
'Démarrer Word Set wdapp = CreateObject("Word.application") With wdapp .Visible = True
'ouvrir le document .Documents.Open ("c:lettre_type" & Me.lst_type)
'Diriger le publipostage vers un nouveau document .ActiveDocument.MailMerge.Execute .ActiveDocument.PrintOut False .ActiveDocument.close wdDoNotSaveChanges .ActiveDocument.close wdDoNotSaveChanges End With 'fermer et libérer les objets Set wdapp = Nothing
'DoCmd.close (si je le laisse en action il me ferme access et non word End Sub -- Uriane
Désolée, non seulement je me sens nulle, mais en plus ça ne fonctionne pas, il me dis que la référence est manquante, vois tu ou se trouve mon erreur ???? Encore merci -- Uriane
Re, Peux-tu me redonner l'ensemble de ton code ? Je ne vois plus bien où tu en es, à présent... Courage, on va en venir à bout...
PS: Il ne faut pas te sentir nulle, c'est en faisant des erreurs qu'on progresse. Comment tu crois que je suis arrivé à ce niveau ? Avec un BAC+12 en Access ?! ;-)
Gilles MOUGNOZ
Voici le code : ...
Transforme comme suit:
'Déclaration du code Dim wdapp As WORD.Application
'Démarrer Word Set wdapp = CreateObject("Word.application") With wdapp .Visible = True
'ouvrir le document .Documents.Open ("c:lettre_type" & Me.lst_type)
'Diriger le publipostage vers un nouveau document
' Exécute la fusion (le publipostage) .ActiveDocument.MailMerge.Execute
' Imprime en premier plan (l'exécution est suspendue) .ActiveDocument.PrintOut False
' Ferme le document fusionné .ActiveDocument.close wdDoNotSaveChanges
' Ferme le document de publiposatge .ActiveDocument.close wdDoNotSaveChanges
' Ferme Word .Quit
End With ' Libére l'objet Set wdapp = Nothing
End Sub
J'en ai profité pour ajouter quelques commentaires. C'est mieux ?
Voici le code :
...
Transforme comme suit:
'Déclaration du code
Dim wdapp As WORD.Application
'Démarrer Word
Set wdapp = CreateObject("Word.application")
With wdapp
.Visible = True
'ouvrir le document
.Documents.Open ("c:lettre_type" & Me.lst_type)
'Diriger le publipostage vers un nouveau document
' Exécute la fusion (le publipostage)
.ActiveDocument.MailMerge.Execute
' Imprime en premier plan (l'exécution est suspendue)
.ActiveDocument.PrintOut False
' Ferme le document fusionné
.ActiveDocument.close wdDoNotSaveChanges
' Ferme le document de publiposatge
.ActiveDocument.close wdDoNotSaveChanges
' Ferme Word
.Quit
End With
' Libére l'objet
Set wdapp = Nothing
End Sub
J'en ai profité pour ajouter quelques commentaires. C'est mieux ?
