Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Word Publipostage et pieces jointes

Publipostage et pieces jointes

21 réponses
Avatar
HAL
J'aimerais savoir s'il est possible =E0 partir d'une fusion en
publipostage sous word, d'adjoindre =E0 chacun de mes correspondants un
document pdf (le m=EAme pour tous) en pi=E8ce jointe.
Merci d'avance =E0 toute personne qui prendra la peine de penser au
probl=E8me.
Signaler un problème avec ce contenu

10 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
1 2 3
Avatar
roy.patrice
Bonjour Hal,

Peut être serait-il plus facile de joindre un lien hypertexte qui
pointe vers le document PDF sur le Web. As-tu un site Web où tu
pourrais déposer le document ? Penses-y bien.

Patrice

HAL wrote:
J'aimerais savoir s'il est possible à partir d'une fusion en
publipostage sous word, d'adjoindre à chacun de mes correspondants un
document pdf (le même pour tous) en pièce jointe.
Merci d'avance à toute personne qui prendra la peine de penser au
problème.


Avatar
Circé
Bonsoir à toi aussi.

La réponse est non.

Une macro devait être en cours d'écriture, mais a priori, ce n'est pas
si simple.

Circé
http://faqword.free.fr

Il se trouve que HAL a formulé :
J'aimerais savoir s'il est possible à partir d'une fusion en
publipostage sous word, d'adjoindre à chacun de mes correspondants un
document pdf (le même pour tous) en pièce jointe.
Merci d'avance à toute personne qui prendra la peine de penser au
problème.


Avatar
HAL

Bonjour,
C'est une bonne idée, seulement impraticable car trop "ponctuelle".
Il me faudrait une solution simple car l'opération sera pratiquée
assez souvent.
En tout cas merci de ta réponse...
Avatar
HAL

Merci de ta réponse Circé (c'est avec plaisir que je bois à ta coupe
même sans moly)
J'ai moi même d'écrire une macro, seulement le problème m'a paru
insurmontable (sûrement cependant n'ai pas les compétences
adéquates).
Avatar
Slow
Bonjour à tous,

une idée comme une autre,
placer le *.pdf en tant qu'objet dans le document word .

@+

"Circé" a écrit dans le message news:

Bonsoir à toi aussi.

La réponse est non.

Une macro devait être en cours d'écriture, mais a priori, ce n'est pas
si simple.

Circé
http://faqword.free.fr

Il se trouve que HAL a formulé :
J'aimerais savoir s'il est possible à partir d'une fusion en
publipostage sous word, d'adjoindre à chacun de mes correspondants un
document pdf (le même pour tous) en pièce jointe.
Merci d'avance à toute personne qui prendra la peine de penser au
problème.






Avatar
HAL
Bonsoir Slow,
Merci d'abord d'avoir pris le temps de proposer une solution.
Malheureusement pour des raisons diverses, dans le cadre de mes
besoins, elle ne peut absolument pas convenir.
Amicalement..
Avatar
Oliv'
*Circé que je salut a écrit *:
Bonsoir à toi aussi.

La réponse est non.

Une macro devait être en cours d'écriture, mais a priori, ce n'est pas
si simple.


J'avais posté une solution qui marche la voici

Il faut utiliser l'evenement application_itemSend de OUTLOOK
en mettant une condition sur le sujet du mail
et en ajoutant la pièce jointe automatiquement si la condition est
remplie avec la commande mailitem.attachment.add

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
'by oliv' 01/02/2006
Dim objCurrentMessage As MailItem

Set objCurrentMessage = Item
If UCase(objCurrentMessage.Subject) = "PUBLIPOSTAGE" Then
objCurrentMessage.Attachments.Add Source:="c:tempcollines.jpg"
End If
objCurrentMessage = ""
End Sub

ici le sujet doit etre "publipostage" mais on peut mettre autre chose.

on peut ajouter une pièce jointe différente si on a un élément pour la
trouver.
Créer dans un premier temps les documents word ou autres destinés à être en
pieces
jointes et de les enregistrer dans un répertoire . c:tempmonmailing
avec un nom qui permettra d'être retrouvé facilement à parti des données se
trouvant dans le mail
l'adresse email par exemple
Modifier les lignes

docperso = "c:tempmonmailing" & cobjCurrentMessage.to & ".doc"
If UCase(objCurrentMessage.Subject) = "PUBLIPOSTAGE" Then
objCurrentMessage.Attachments.Add Source:=docperso

bien sur c'est pas du clef en main dans cet exemple il faut modifier la
macro OUTLOOK à chaque publipostage, mais on doit pouvoir améliorer cela.

Circé
http://faqword.free.fr

Il se trouve que HAL a formulé :
J'aimerais savoir s'il est possible à partir d'une fusion en
publipostage sous word, d'adjoindre à chacun de mes correspondants un
document pdf (le même pour tous) en pièce jointe.
Merci d'avance à toute personne qui prendra la peine de penser au
problème.




--
--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Have a nice day
Oliv'
Pour me joindre : http://cerbermail.com/?V8r2o1YHl4
les sites références:
Excel :http://www.excelabo.net http://xcell05.free.fr/
http://dj.joss.free.fr/
http://frederic.sigonneau.free.fr/ http://www.excel-vba-francais.com/
Word : http://faqword.free.fr/
Outlook : http://faq.outlook.free.fr/
les archives : http://groups.google.com/group/microsoft.public.fr.outlook
OE6 : http://www.faqoe.com/
Sql : http://sqlpro.developpez.com/
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~


Avatar
Circé
Merci Oliv' !

Je vais tester ça, voir comment on peut l'améliorer, et transférer le
tout dans la faq !

Ça va faire des heureux !! ;))

Circé
http://faqword.free.fr


Il se trouve que Oliv' a formulé :
*Circé que je salut a écrit *:
Bonsoir à toi aussi.

La réponse est non.

Une macro devait être en cours d'écriture, mais a priori, ce n'est pas
si simple.


J'avais posté une solution qui marche la voici

Il faut utiliser l'evenement application_itemSend de OUTLOOK
en mettant une condition sur le sujet du mail
et en ajoutant la pièce jointe automatiquement si la condition est
remplie avec la commande mailitem.attachment.add

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
'by oliv' 01/02/2006
Dim objCurrentMessage As MailItem

Set objCurrentMessage = Item
If UCase(objCurrentMessage.Subject) = "PUBLIPOSTAGE" Then
objCurrentMessage.Attachments.Add Source:="c:tempcollines.jpg"
End If
objCurrentMessage = ""
End Sub

ici le sujet doit etre "publipostage" mais on peut mettre autre chose.

on peut ajouter une pièce jointe différente si on a un élément pour la
trouver.
Créer dans un premier temps les documents word ou autres destinés à être en
pieces
jointes et de les enregistrer dans un répertoire . c:tempmonmailing
avec un nom qui permettra d'être retrouvé facilement à parti des données se
trouvant dans le mail
l'adresse email par exemple
Modifier les lignes

docperso = "c:tempmonmailing" & cobjCurrentMessage.to & ".doc"
If UCase(objCurrentMessage.Subject) = "PUBLIPOSTAGE" Then
objCurrentMessage.Attachments.Add Source:=docperso

bien sur c'est pas du clef en main dans cet exemple il faut modifier la macro
OUTLOOK à chaque publipostage, mais on doit pouvoir améliorer cela.

Circé
http://faqword.free.fr

Il se trouve que HAL a formulé :
J'aimerais savoir s'il est possible à partir d'une fusion en
publipostage sous word, d'adjoindre à chacun de mes correspondants un
document pdf (le même pour tous) en pièce jointe.
Merci d'avance à toute personne qui prendra la peine de penser au
problème.




--




Avatar
Anacoluthe
Bonjour !

'Oliv'' nous a écrit ...
Une macro devait être en cours d'écriture, mais a priori, ce n'est pas
si simple.


J'avais posté une solution qui marche la voici
Il faut utiliser l'evenement application_itemSend de OUTLOOK


L'idée est simple et excellente : elle consiste à 'greffer'
au passage une pièce jointe lors de l'envoi d'un message.

On peut même imaginer qu'elle cherche dans le message
l'indication d'une pièce jointe : si le Sujet contient une
chaîne de type 'PJ=c:unFichier.xyz' alors joindre au message
le fichier unFichier.xyz et supprimer dans Sujet la chaîne
en question avant d'envoyer le message.

Néanmoins elle n'est valable que si Outlook est le client de
messagerie par défaut. C'est justement là qu'on a rencontré
des difficultés pour faire un e-postage avec PJ valable pour
tous. Une version marche bien mais avec OL seulement aussi :-p

on doit pouvoir améliorer cela.


Absolument ;-)

Anacoluthe
« Si l'on pouvait croiser l'homme et le chat,
ça améliorerait l'homme, mais ça dégraderait le chat. »
- Mark TWAIN


Avatar
Circé
Bonjour anacoluthe,

Anacoluthe avait énoncé :

Néanmoins elle n'est valable que si Outlook est le client de
messagerie par défaut. C'est justement là qu'on a rencontré
des difficultés pour faire un e-postage avec PJ valable pour
tous. Une version marche bien mais avec OL seulement aussi :-p


UNE version ?... c'est-à-dire ?...

on doit pouvoir améliorer cela.


Absolument ;-)


Je compte sur toi !!!
C'est vrai que je compte sur toi sur plein d'autres choses (je te ferai
la liste...) mais ça te fait du bien !! :D))

Circé


1 2 3