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
JièL
Bonjour
Bonjour à vous,
Existe-t-il une façon de pouvoir imprimer un message envoyé et de faire apparaître le nom des personnes en cci?
Non, aucune
Merci beaucoup
-- JièL / Jean-Louis GOUBERT Là bas mieux qu'en face ;-) http://forums.offices.free.fr/ La FAQ Outlook est là : http://faq.outlook.free.fr/ Les stats CDO : http://faq.outlook.free.fr/cdo/
Bonjour
Bonjour à vous,
Existe-t-il une façon de pouvoir imprimer un message envoyé et de faire
apparaître le nom des personnes en cci?
Non, aucune
Merci beaucoup
--
JièL / Jean-Louis GOUBERT
Là bas mieux qu'en face ;-) http://forums.offices.free.fr/
La FAQ Outlook est là : http://faq.outlook.free.fr/
Les stats CDO : http://faq.outlook.free.fr/cdo/
Existe-t-il une façon de pouvoir imprimer un message envoyé et de faire apparaître le nom des personnes en cci?
Non, aucune
Merci beaucoup
-- JièL / Jean-Louis GOUBERT Là bas mieux qu'en face ;-) http://forums.offices.free.fr/ La FAQ Outlook est là : http://faq.outlook.free.fr/ Les stats CDO : http://faq.outlook.free.fr/cdo/
Oliv'
*JièL que je salue a écrit *:
Bonjour
Bonjour à vous,
Existe-t-il une façon de pouvoir imprimer un message envoyé et de faire apparaître le nom des personnes en cci?
Non, aucune
Merci beaucoup
c'est presque Noel aujourdhui !!!! encore une macro qui ajoute le champ CCI dans le corps du texte il ne reste qu'à imprimer.
'########################################################## Sub ImprimeCCI() 'by Oliv 09/02/2007 Dim oMessage As MailItem If Application.ActiveInspector Is Nothing Then GoTo Fin End If Set oMessage = ActiveInspector.CurrentItem If oMessage.BodyFormat = olFormatHTML And _ oMessage.Bcc <> "" Then ListeCCI = oMessage.Bcc
ListeCCI = "<BODY><B>CCI:</B>" & ListeCCI & "<br>" oMessage.HTMLBody = Replace(oMessage.HTMLBody, "<BODY>", ListeCCI) 'pour sauvegarder les modifications décommenter la ligne ci-dessous 'oMessage.Save End If If oMessage.BodyFormat = olFormatPlain And _ oMessage.Bcc <> "" Then ListeCCI = oMessage.Bcc ListeCCI = "CCI:" & ListeCCI & Chr(10) oMessage.Body = ListePJ & oMessage.Body 'pour sauvegarder les modifications décommenter la ligne ci-dessous ' oMessage.Save End If
Fin: ListeCCI = "" Set oMessage = Nothing End Sub '##########################################################
-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Have a nice day Oliv' Outlook : http://faq.outlook.free.fr/ les archives : http://groups.google.com/group/microsoft.public.fr.outlook Dernière chance http://www.outlookcode.com/ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
*JièL <NoSpam_Forums.Offices@Free-Fr.NoSpam> que je salue a écrit *:
Bonjour
Bonjour à vous,
Existe-t-il une façon de pouvoir imprimer un message envoyé et de
faire apparaître le nom des personnes en cci?
Non, aucune
Merci beaucoup
c'est presque Noel aujourdhui !!!!
encore une macro qui ajoute le champ CCI dans le corps du texte il ne reste
qu'à imprimer.
'##########################################################
Sub ImprimeCCI()
'by Oliv 09/02/2007
Dim oMessage As MailItem
If Application.ActiveInspector Is Nothing Then
GoTo Fin
End If
Set oMessage = ActiveInspector.CurrentItem
If oMessage.BodyFormat = olFormatHTML And _
oMessage.Bcc <> "" Then
ListeCCI = oMessage.Bcc
ListeCCI = "<BODY><B>CCI:</B>" & ListeCCI & "<br>"
oMessage.HTMLBody = Replace(oMessage.HTMLBody, "<BODY>", ListeCCI)
'pour sauvegarder les modifications décommenter la ligne ci-dessous
'oMessage.Save
End If
If oMessage.BodyFormat = olFormatPlain And _
oMessage.Bcc <> "" Then
ListeCCI = oMessage.Bcc
ListeCCI = "CCI:" & ListeCCI & Chr(10)
oMessage.Body = ListePJ & oMessage.Body
'pour sauvegarder les modifications décommenter la ligne ci-dessous
' oMessage.Save
End If
Fin:
ListeCCI = ""
Set oMessage = Nothing
End Sub
'##########################################################
--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Have a nice day
Oliv'
Outlook : http://faq.outlook.free.fr/
les archives : http://groups.google.com/group/microsoft.public.fr.outlook
Dernière chance http://www.outlookcode.com/
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Existe-t-il une façon de pouvoir imprimer un message envoyé et de faire apparaître le nom des personnes en cci?
Non, aucune
Merci beaucoup
c'est presque Noel aujourdhui !!!! encore une macro qui ajoute le champ CCI dans le corps du texte il ne reste qu'à imprimer.
'########################################################## Sub ImprimeCCI() 'by Oliv 09/02/2007 Dim oMessage As MailItem If Application.ActiveInspector Is Nothing Then GoTo Fin End If Set oMessage = ActiveInspector.CurrentItem If oMessage.BodyFormat = olFormatHTML And _ oMessage.Bcc <> "" Then ListeCCI = oMessage.Bcc
ListeCCI = "<BODY><B>CCI:</B>" & ListeCCI & "<br>" oMessage.HTMLBody = Replace(oMessage.HTMLBody, "<BODY>", ListeCCI) 'pour sauvegarder les modifications décommenter la ligne ci-dessous 'oMessage.Save End If If oMessage.BodyFormat = olFormatPlain And _ oMessage.Bcc <> "" Then ListeCCI = oMessage.Bcc ListeCCI = "CCI:" & ListeCCI & Chr(10) oMessage.Body = ListePJ & oMessage.Body 'pour sauvegarder les modifications décommenter la ligne ci-dessous ' oMessage.Save End If
Fin: ListeCCI = "" Set oMessage = Nothing End Sub '##########################################################
-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Have a nice day Oliv' Outlook : http://faq.outlook.free.fr/ les archives : http://groups.google.com/group/microsoft.public.fr.outlook Dernière chance http://www.outlookcode.com/ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
JièL
Bonjoir(c) Oliv'
Le 09/02/2007 15:15 vous avez écrit ceci :
c'est presque Noel aujourdhui !!!!
Déjà ? 'taing, j'ai pas vu passé l'année ;-)
encore une macro qui ajoute le champ CCI dans le corps du texte il ne reste qu'à imprimer.
Merci Oliv', je met de coté et la prochaine fois que je vois qqchose que je crois impossible, j'attendrai le père Oliv'... euh Noël ;-)))
-- JièL / Jean-Louis GOUBERT Là bas mieux qu'en face ;-) http://forums.offices.free.fr/ La FAQ Outlook est là : http://faq.outlook.free.fr/ Les stats de CDO : http://faq.outlook.free.fr/cdo/
Bonjoir(c) Oliv'
Le 09/02/2007 15:15 vous avez écrit ceci :
c'est presque Noel aujourdhui !!!!
Déjà ? 'taing, j'ai pas vu passé l'année ;-)
encore une macro qui ajoute le champ CCI dans le corps du texte il ne reste
qu'à imprimer.
Merci Oliv', je met de coté et la prochaine fois que je vois qqchose que
je crois impossible, j'attendrai le père Oliv'... euh Noël ;-)))
--
JièL / Jean-Louis GOUBERT
Là bas mieux qu'en face ;-) http://forums.offices.free.fr/
La FAQ Outlook est là : http://faq.outlook.free.fr/
Les stats de CDO : http://faq.outlook.free.fr/cdo/
encore une macro qui ajoute le champ CCI dans le corps du texte il ne reste qu'à imprimer.
Merci Oliv', je met de coté et la prochaine fois que je vois qqchose que je crois impossible, j'attendrai le père Oliv'... euh Noël ;-)))
-- JièL / Jean-Louis GOUBERT Là bas mieux qu'en face ;-) http://forums.offices.free.fr/ La FAQ Outlook est là : http://faq.outlook.free.fr/ Les stats de CDO : http://faq.outlook.free.fr/cdo/
