OVH Cloud OVH Cloud

Email ? Grace VBA dans Excel.

5 réponses
Avatar
TALL Yaya
Bonjour,

Est qu'il est possible de faire un code VBA dans Excel qui me permettrai
d'envoyer un message Email a un correspondant particulier pour lui prévenir
par exemple qu'un fichier et disponible pour lui (ou a était modifier pour
lui) sans pour autant lui envoyer le fichier...

Merci de votre aide.

5 réponses

Avatar
Philippe.R
Bonjour Tall Yaya,
Voici une procédure de Frédéric :

http://perso.wanadoo.fr/frederic.sigonneau/code/Excel/MailAvecOutlookExpress.txt

(il y en a d'autres sur son site)
--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"TALL Yaya" a écrit dans le message de
news:%
Bonjour,

Est qu'il est possible de faire un code VBA dans Excel qui me permettrai
d'envoyer un message Email a un correspondant particulier pour lui prévenir
par exemple qu'un fichier et disponible pour lui (ou a était modifier pour
lui) sans pour autant lui envoyer le fichier...

Merci de votre aide.




Avatar
TALL Yaya
Bonjour,

Comment je peux faire pour qu'il s'envoie automatiquement sans appuyer sur
"envoyer"

Merci de votre aide.

"Philippe.R" a écrit dans le message de news:

Bonjour Tall Yaya,
Voici une procédure de Frédéric :


http://perso.wanadoo.fr/frederic.sigonneau/code/Excel/MailAvecOutlookExpress

.txt

(il y en a d'autres sur son site)
--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"TALL Yaya" a écrit dans le message de
news:%
Bonjour,

Est qu'il est possible de faire un code VBA dans Excel qui me permettrai
d'envoyer un message Email a un correspondant particulier pour lui
prévenir


par exemple qu'un fichier et disponible pour lui (ou a était modifier
pour


lui) sans pour autant lui envoyer le fichier...

Merci de votre aide.








Avatar
Philippe.R
Re,
Comment je peux faire pour qu'il s'envoie automatiquement sans appuyer sur
"envoyer"


Chez moi le raccourci clavier pour "Envoyer" est Alt+S ; je serai donc tenté d'utiliser un sendkeys
regarde ce qu'il en est chez toi pour le raccourci et ajoute cette ligne (non testée) :

SendKeys "{ALT}{S}"
--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"TALL Yaya" a écrit dans le message de
news:
Bonjour,

Comment je peux faire pour qu'il s'envoie automatiquement sans appuyer sur
"envoyer"

Merci de votre aide.

"Philippe.R" a écrit dans le message de news:

Bonjour Tall Yaya,
Voici une procédure de Frédéric :


http://perso.wanadoo.fr/frederic.sigonneau/code/Excel/MailAvecOutlookExpress

.txt

(il y en a d'autres sur son site)
--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"TALL Yaya" a écrit dans le message de
news:%
Bonjour,

Est qu'il est possible de faire un code VBA dans Excel qui me permettrai
d'envoyer un message Email a un correspondant particulier pour lui
prévenir


par exemple qu'un fichier et disponible pour lui (ou a était modifier
pour


lui) sans pour autant lui envoyer le fichier...

Merci de votre aide.












Avatar
TALL Yaya
Bonjour,

J'ai un message d'erreur de type :
"Erreur de compilation, Argument non facultatif"
Voici mon code :

Sub EnvoyeMessage()
Dim dest$, sujet$, texte$

dest = ""
sujet = "Test"
texte = "Bonjour, Merci de prendre note que je vais vous faire parvenir
ma note de frais a ce jour, Bonne reception"
Shell "C:Program FilesOutlook Expressmsimn.exe " & _
"/mailurl:mailto:" & dest & _
"?subject=" & sujet & _
"&Body=" & texte & ", "

SendKeys
End Sub

Bonne reception,

"Philippe.R" a écrit dans le message de news:
#K#
Re,
Comment je peux faire pour qu'il s'envoie automatiquement sans appuyer
sur


"envoyer"


Chez moi le raccourci clavier pour "Envoyer" est Alt+S ; je serai donc
tenté d'utiliser un sendkeys

regarde ce qu'il en est chez toi pour le raccourci et ajoute cette ligne
(non testée) :


SendKeys "{ALT}{S}"
--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"TALL Yaya" a écrit dans le message de
news:
Bonjour,

Comment je peux faire pour qu'il s'envoie automatiquement sans appuyer
sur


"envoyer"

Merci de votre aide.

"Philippe.R" a écrit dans le message de news:

Bonjour Tall Yaya,
Voici une procédure de Frédéric :




http://perso.wanadoo.fr/frederic.sigonneau/code/Excel/MailAvecOutlookExpress


.txt

(il y en a d'autres sur son site)
--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"TALL Yaya" a écrit dans le message de
news:%
Bonjour,

Est qu'il est possible de faire un code VBA dans Excel qui me
permettrai




d'envoyer un message Email a un correspondant particulier pour lui
prévenir


par exemple qu'un fichier et disponible pour lui (ou a était
modifier




pour
lui) sans pour autant lui envoyer le fichier...

Merci de votre aide.
















Avatar
Philippe.R
Re,
"Erreur de compilation, Argument non facultatif"
SendKeys
End Sub


Il te faut encore, derrière l'instruction SendKeys, indiquer le code des touches appropriées , comme
"{ALT}{S}" chez moi

--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"TALL Yaya" a écrit dans le message de
news:%
Bonjour,

J'ai un message d'erreur de type :
"Erreur de compilation, Argument non facultatif"
Voici mon code :

Sub EnvoyeMessage()
Dim dest$, sujet$, texte$

dest = ""
sujet = "Test"
texte = "Bonjour, Merci de prendre note que je vais vous faire parvenir
ma note de frais a ce jour, Bonne reception"
Shell "C:Program FilesOutlook Expressmsimn.exe " & _
"/mailurl:mailto:" & dest & _
"?subject=" & sujet & _
"&Body=" & texte & ", "

SendKeys
End Sub

Bonne reception,

"Philippe.R" a écrit dans le message de news:
#K#
Re,
Comment je peux faire pour qu'il s'envoie automatiquement sans appuyer
sur


"envoyer"


Chez moi le raccourci clavier pour "Envoyer" est Alt+S ; je serai donc
tenté d'utiliser un sendkeys

regarde ce qu'il en est chez toi pour le raccourci et ajoute cette ligne
(non testée) :


SendKeys "{ALT}{S}"
--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"TALL Yaya" a écrit dans le message de
news:
Bonjour,

Comment je peux faire pour qu'il s'envoie automatiquement sans appuyer
sur


"envoyer"

Merci de votre aide.

"Philippe.R" a écrit dans le message de news:

Bonjour Tall Yaya,
Voici une procédure de Frédéric :




http://perso.wanadoo.fr/frederic.sigonneau/code/Excel/MailAvecOutlookExpress


.txt

(il y en a d'autres sur son site)
--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"TALL Yaya" a écrit dans le message de
news:%
Bonjour,

Est qu'il est possible de faire un code VBA dans Excel qui me
permettrai




d'envoyer un message Email a un correspondant particulier pour lui
prévenir


par exemple qu'un fichier et disponible pour lui (ou a était
modifier




pour
lui) sans pour autant lui envoyer le fichier...

Merci de votre aide.