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 Outlook copie cci automatique

copie cci automatique

10 réponses
Avatar
David
Bonjour a toutes et tous,

je souhaite definir une regle me permettant d'envoyer automatiquement tous
mes mails en CCI a mon collègue, j'ai bien trouvé la possibilité d'envoyer
en CC mais cela ne m'arrange pas.

J'utilise Office 2003 -> outlook 2003.

Merci a tous,
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
Avatar
Fabrice
Bonjour,

Je ne crois pas que ce soit possible ça...
En tout cas, pas avec les règles...

Peut-être en faisant une macro, mais là je laisse les expert parler...
D'ailleurs ça m'intéresse...


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

Bonjour a toutes et tous,

je souhaite definir une regle me permettant d'envoyer automatiquement tous
mes mails en CCI a mon collègue, j'ai bien trouvé la possibilité d'envoyer
en CC mais cela ne m'arrange pas.

J'utilise Office 2003 -> outlook 2003.

Merci a tous,



Avatar
Parkiro

Bonjour a toutes et tous,

je souhaite definir une regle me permettant d'envoyer automatiquement tous
mes mails en CCI a mon collègue, j'ai bien trouvé la possibilité d' envoyer
en CC mais cela ne m'arrange pas.

J'utilise Office 2003 -> outlook 2003.

Merci a tous,


Bonjour David,

Je ne sais pas si tu as la possibilité de créer une régle
automatique mais tu peux envoyer tes mails en CCI sous Outlook. Si
c'est seulement cette option qu'il te manque il suffit dans le nouveau
message de cliquer sur la fleche à côté de Option et de selectionner
CCI.


En esperant que ceci réponde à ta question.

Parkiro.

Avatar
Oliv'
*Fabrice" <"f.nebbia" dans le domaine "technicn.com <"f.nebbia" dans le
domaine "technicn.com"> que je salut a écrit *:
Bonjour,

Je ne crois pas que ce soit possible ça...
En tout cas, pas avec les règles...

Peut-être en faisant une macro, mais là je laisse les expert parler...
D'ailleurs ça m'intéresse...


Bon si ca t'intéresse

Il faut utiliser l'événement itemSend dans ThisOutlookSession.

Public WithEvents myOlApp As Outlook.Application

Public Sub Initialize_handler()
Set myOlApp = CreateObject("Outlook.Application")
End Sub

Private Sub myOlApp_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim prompt As String
prompt = "Ajouter le cci monCCi à " & Item.Subject & "?"
If MsgBox(prompt, vbYesNo + vbQuestion, "Sample") = vbYes Then
Item.BCC = ""
End If
End Sub


IL Y AURA BIEN SUR LE MESSAGE DE SECURITE !!!

--
--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
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/
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~



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

Bonjour a toutes et tous,

je souhaite definir une regle me permettant d'envoyer
automatiquement tous mes mails en CCI a mon collègue, j'ai bien
trouvé la possibilité d'envoyer en CC mais cela ne m'arrange pas.

J'utilise Office 2003 -> outlook 2003.

Merci a tous,




Avatar
Fabrice
Re-bonjour.

Trop classe
J'adore toutes ces macro, ça m'éclate... ;o)

Merci Oliv'

"Oliv'" <(supprimerceci) a écrit dans le
message de news: %

*Fabrice" <"f.nebbia" dans le domaine "technicn.com <"f.nebbia" dans le
domaine "technicn.com"> que je salut a écrit *:
Bonjour,

Je ne crois pas que ce soit possible ça...
En tout cas, pas avec les règles...

Peut-être en faisant une macro, mais là je laisse les expert parler...
D'ailleurs ça m'intéresse...


Bon si ca t'intéresse

Il faut utiliser l'événement itemSend dans ThisOutlookSession.

Public WithEvents myOlApp As Outlook.Application

Public Sub Initialize_handler()
Set myOlApp = CreateObject("Outlook.Application")
End Sub

Private Sub myOlApp_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim prompt As String
prompt = "Ajouter le cci monCCi à " & Item.Subject & "?"
If MsgBox(prompt, vbYesNo + vbQuestion, "Sample") = vbYes Then
Item.BCC = ""
End If
End Sub


IL Y AURA BIEN SUR LE MESSAGE DE SECURITE !!!

--
--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
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/
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~



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

Bonjour a toutes et tous,

je souhaite definir une regle me permettant d'envoyer
automatiquement tous mes mails en CCI a mon collègue, j'ai bien
trouvé la possibilité d'envoyer en CC mais cela ne m'arrange pas.

J'utilise Office 2003 -> outlook 2003.

Merci a tous,








Avatar
JièL
Bonjoir(c) Oliv'

Le 08/09/2006 17:16 vous avez écrit ceci :
Il faut utiliser l'événement itemSend dans ThisOutlookSession.

Public WithEvents myOlApp As Outlook.Application

Public Sub Initialize_handler()
Set myOlApp = CreateObject("Outlook.Application")
End Sub

Private Sub myOlApp_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim prompt As String
prompt = "Ajouter le cci monCCi à " & Item.Subject & "?"
If MsgBox(prompt, vbYesNo + vbQuestion, "Sample") = vbYes Then
Item.BCC = ""
End If
End Sub


IL Y AURA BIEN SUR LE MESSAGE DE SECURITE !!!


joli, mais dommage pour le message de sécu :-((((((((
C'est vraiment pénible ce truc qui n'est pas désactivable alors que c'est
une simple case à cocher sur OE :-(

--
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/

Avatar
David
Bonjour et merci a tous pour ces reponses,

je confirme bien que je ne souhaite pas devoir remplir le champs cci a
chaque envoi.
merci donc pour la macro, mais comment dois je l'utiliser ?

Je sauve le contenu de la macro et puis que dois je en faire ?
n'y a t il pas moyen de faire sauter le message de securité ?

Merci
Avatar
Oliv'
*David que je salut a écrit *:
Bonjour et merci a tous pour ces reponses,

je confirme bien que je ne souhaite pas devoir remplir le champs cci a
chaque envoi.
merci donc pour la macro, mais comment dois je l'utiliser ?

Je sauve le contenu de la macro et puis que dois je en faire ?
n'y a t il pas moyen de faire sauter le message de securité ?

Merci


Ah oui il faut un peu connaitre les macros.
Soit tu lis ceci
http://www.microsoft.com/france/msdn/office/odc_olArticleUsingVBAInOutlook.mspx

ou alors en suivant cette méthode tu devrais y arriver

Dans outlook tu tapes sur Alt+F11

Tu dois avoir une fenêtre "Microsoft Visual Basic -Projet1" qui s'ouvre
à Gauche Clic développe "Projet1" jusqu'à voir "ThisOutlookSession"

Clic s'y 2X
A droite dans le cadre en dessous de général colle le texte de la macro
ci-dessous en remplacant l'adresse Email.

-----------------------------------------
Public WithEvents myOlApp As Outlook.Application

Public Sub Initialize_handler()
Set myOlApp = CreateObject("Outlook.Application")
End Sub

Private Sub Application_Startup()
Initialize_handler
End Sub

Private Sub myOlApp_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim prompt As String
prompt = "Ajouter le cci monCCi à " & Item.Subject & "?"
If MsgBox(prompt, vbYesNo + vbQuestion, "Sample") = vbYes Then
Item.BCC = ""
End If
End Sub
-----------------------------------------
Ferme la fenetre.
Tapes Alt+F8
tu dois avoir de selectionné "ThisOutlookSession.Initialize_handler"
cliques sur executer.

Dans Outils /Macro /Sécurité Selectionne "Moyen"

Ferme OUTLOOK et enregistre le projet.

Voilà c'est opérationnel.

à l'ouverture "activer les macros" on peut éviter cela en mettant une
signature électronique (menu outils).



Ce qui est bizarre c'est qu'en partant d'un projet de macro vide je n'ai pas
le message de sécurité.
Sinon utiliser CLIKYES http://faq.outlook.free.fr/telechargement.htm


--
--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Have a nice day
Oliv'
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Avatar
Oliv'
Si le précedent code ne fonctionne pas essayer celui-ci

Private Sub Application_Startup()

End Sub

Private Sub application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim prompt As String
prompt = "Ajouter le Destinataire CCI : monCCi à " & Item.Subject & "?"
If MsgBox(prompt, vbYesNo + vbQuestion, "Sample") = vbYes Then
Item.BCC =
End If
End Sub


--
--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
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
David
Merci,
je teste cela.
Avatar
sylvain25
Le vendredi 08 Septembre 2006 à 12:25 par David :
Bonjour a toutes et tous,
je souhaite definir une regle me permettant d'envoyer automatiquement tous
mes mails en CCI a mon collègue, j'ai bien trouvé la
possibilité d'envoyer
en CC mais cela ne m'arrange pas.
J'utilise Office 2003 -> outlook 2003.
Merci a tous,
Bonjour,
n'étant pas spécialiste des macros, je me permets de déterrer ce post
J'ai plusieurs compte mails sur Outlook, et je souhaiterais que ce code ne soit actif que pour un des comptes, cela est-il possible et quel serait la modification à apporter ?
Merci par avance de votre retour !!