Bonsoir,
J'ai cette procédure qui fonctionne très bien, mais je souhaite faire partir
une feuille de mon classeur qui se nomme "Stats" et non pas tout le
classeur.
Pouvez-vous m'aider ?
Je vous remercie d'avance
Alain
Sub Envoie_FichierJoint_OE()
Application.ScreenUpdating = False
Fichier = ActiveWorkbook.FullName
Dest = "totoettata@free.fr"
Sujet = "Test d'envoi avec excel"
Msg = "Bonjour, Excel vous envoie un message"
Shell "C:\Program Files\Outlook Express\msimn.exe " _
& "/mailurl:mailto:" & Dest & "?subject=" & Sujet & "&Body=" & Msg & ""
SendKeys "%I" & "p" & Fichier & "~" & "%S"
Application.ScreenUpdating = True
End Sub
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
Philippe.R
Bonsoir, Comme ceci ? http://www.excelabo.net/excel/sortirmail.php#feuillemail -- Avec plaisir http://dj.joss.free.fr/trombine.htm http://jacxl.free.fr/mpfe/trombino.html Philippe.R Pour se connecter au forum : http://www.excelabo.net/mpfe/connexion.php News://news.microsoft.com/microsoft.public.fr.excel "alain Lebayle" a écrit dans le message de news:48ff6541$0$23650$
Bonsoir, J'ai cette procédure qui fonctionne très bien, mais je souhaite faire partir une feuille de mon classeur qui se nomme "Stats" et non pas tout le classeur. Pouvez-vous m'aider ? Je vous remercie d'avance Alain
Sub Envoie_FichierJoint_OE() Application.ScreenUpdating = False Fichier = ActiveWorkbook.FullName Dest = "" Sujet = "Test d'envoi avec excel" Msg = "Bonjour, Excel vous envoie un message" Shell "C:Program FilesOutlook Expressmsimn.exe " _ & "/mailurl:mailto:" & Dest & "?subject=" & Sujet & "&Body=" & Msg & "" SendKeys "%I" & "p" & Fichier & "~" & "%S" Application.ScreenUpdating = True End Sub
--
Bonsoir,
Comme ceci ?
http://www.excelabo.net/excel/sortirmail.php#feuillemail
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/mpfe/connexion.php
News://news.microsoft.com/microsoft.public.fr.excel
"alain Lebayle" <alain.lebayle@club-internet.fr> a écrit dans le message de
news:48ff6541$0$23650$7a628cd7@news.club-internet.fr...
Bonsoir,
J'ai cette procédure qui fonctionne très bien, mais je souhaite faire
partir une feuille de mon classeur qui se nomme "Stats" et non pas tout le
classeur.
Pouvez-vous m'aider ?
Je vous remercie d'avance
Alain
Sub Envoie_FichierJoint_OE()
Application.ScreenUpdating = False
Fichier = ActiveWorkbook.FullName
Dest = "totoettata@free.fr"
Sujet = "Test d'envoi avec excel"
Msg = "Bonjour, Excel vous envoie un message"
Shell "C:Program FilesOutlook Expressmsimn.exe " _
& "/mailurl:mailto:" & Dest & "?subject=" & Sujet & "&Body=" & Msg & ""
SendKeys "%I" & "p" & Fichier & "~" & "%S"
Application.ScreenUpdating = True
End Sub
Bonsoir, Comme ceci ? http://www.excelabo.net/excel/sortirmail.php#feuillemail -- Avec plaisir http://dj.joss.free.fr/trombine.htm http://jacxl.free.fr/mpfe/trombino.html Philippe.R Pour se connecter au forum : http://www.excelabo.net/mpfe/connexion.php News://news.microsoft.com/microsoft.public.fr.excel "alain Lebayle" a écrit dans le message de news:48ff6541$0$23650$
Bonsoir, J'ai cette procédure qui fonctionne très bien, mais je souhaite faire partir une feuille de mon classeur qui se nomme "Stats" et non pas tout le classeur. Pouvez-vous m'aider ? Je vous remercie d'avance Alain
Sub Envoie_FichierJoint_OE() Application.ScreenUpdating = False Fichier = ActiveWorkbook.FullName Dest = "" Sujet = "Test d'envoi avec excel" Msg = "Bonjour, Excel vous envoie un message" Shell "C:Program FilesOutlook Expressmsimn.exe " _ & "/mailurl:mailto:" & Dest & "?subject=" & Sujet & "&Body=" & Msg & "" SendKeys "%I" & "p" & Fichier & "~" & "%S" Application.ScreenUpdating = True End Sub
--
alain Lebayle
Bonsoir Philippe et merci Le pb est que sendmail ne me propose pas OE mais un truc vraiment bizarre à la place, comment faire en fait afin de ne lancer que la feuille avec OE, afin de ne pas pertuber les utilisateurs ? Merci Alain
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de news:
Bonsoir, Comme ceci ? http://www.excelabo.net/excel/sortirmail.php#feuillemail -- Avec plaisir http://dj.joss.free.fr/trombine.htm http://jacxl.free.fr/mpfe/trombino.html Philippe.R Pour se connecter au forum : http://www.excelabo.net/mpfe/connexion.php News://news.microsoft.com/microsoft.public.fr.excel "alain Lebayle" a écrit dans le message de news:48ff6541$0$23650$
Bonsoir, J'ai cette procédure qui fonctionne très bien, mais je souhaite faire partir une feuille de mon classeur qui se nomme "Stats" et non pas tout le classeur. Pouvez-vous m'aider ? Je vous remercie d'avance Alain
Sub Envoie_FichierJoint_OE() Application.ScreenUpdating = False Fichier = ActiveWorkbook.FullName Dest = "" Sujet = "Test d'envoi avec excel" Msg = "Bonjour, Excel vous envoie un message" Shell "C:Program FilesOutlook Expressmsimn.exe " _ & "/mailurl:mailto:" & Dest & "?subject=" & Sujet & "&Body=" & Msg & "" SendKeys "%I" & "p" & Fichier & "~" & "%S" Application.ScreenUpdating = True End Sub
--
Bonsoir Philippe et merci
Le pb est que sendmail ne me propose pas OE mais un truc vraiment bizarre à
la place, comment faire en fait afin de ne lancer que la feuille avec OE,
afin de ne pas pertuber les utilisateurs ?
Merci
Alain
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de news:
OLBCO6HNJHA.5772@TK2MSFTNGP02.phx.gbl...
Bonsoir,
Comme ceci ?
http://www.excelabo.net/excel/sortirmail.php#feuillemail
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/mpfe/connexion.php
News://news.microsoft.com/microsoft.public.fr.excel
"alain Lebayle" <alain.lebayle@club-internet.fr> a écrit dans le message
de news:48ff6541$0$23650$7a628cd7@news.club-internet.fr...
Bonsoir,
J'ai cette procédure qui fonctionne très bien, mais je souhaite faire
partir une feuille de mon classeur qui se nomme "Stats" et non pas tout
le classeur.
Pouvez-vous m'aider ?
Je vous remercie d'avance
Alain
Sub Envoie_FichierJoint_OE()
Application.ScreenUpdating = False
Fichier = ActiveWorkbook.FullName
Dest = "totoettata@free.fr"
Sujet = "Test d'envoi avec excel"
Msg = "Bonjour, Excel vous envoie un message"
Shell "C:Program FilesOutlook Expressmsimn.exe " _
& "/mailurl:mailto:" & Dest & "?subject=" & Sujet & "&Body=" & Msg & ""
SendKeys "%I" & "p" & Fichier & "~" & "%S"
Application.ScreenUpdating = True
End Sub
Bonsoir Philippe et merci Le pb est que sendmail ne me propose pas OE mais un truc vraiment bizarre à la place, comment faire en fait afin de ne lancer que la feuille avec OE, afin de ne pas pertuber les utilisateurs ? Merci Alain
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de news:
Bonsoir, Comme ceci ? http://www.excelabo.net/excel/sortirmail.php#feuillemail -- Avec plaisir http://dj.joss.free.fr/trombine.htm http://jacxl.free.fr/mpfe/trombino.html Philippe.R Pour se connecter au forum : http://www.excelabo.net/mpfe/connexion.php News://news.microsoft.com/microsoft.public.fr.excel "alain Lebayle" a écrit dans le message de news:48ff6541$0$23650$
Bonsoir, J'ai cette procédure qui fonctionne très bien, mais je souhaite faire partir une feuille de mon classeur qui se nomme "Stats" et non pas tout le classeur. Pouvez-vous m'aider ? Je vous remercie d'avance Alain
Sub Envoie_FichierJoint_OE() Application.ScreenUpdating = False Fichier = ActiveWorkbook.FullName Dest = "" Sujet = "Test d'envoi avec excel" Msg = "Bonjour, Excel vous envoie un message" Shell "C:Program FilesOutlook Expressmsimn.exe " _ & "/mailurl:mailto:" & Dest & "?subject=" & Sujet & "&Body=" & Msg & "" SendKeys "%I" & "p" & Fichier & "~" & "%S" Application.ScreenUpdating = True End Sub
--
Daniel.j
Bonjour Essaie avec cette macro http://dj.joss.free.fr/web.htm#mail033
Daniel FAQ MPFE http://dj.joss.free.fr/faq.htm
"alain Lebayle" a écrit dans le message de news: 48ff8b7f$0$23646$
Bonsoir Philippe et merci Le pb est que sendmail ne me propose pas OE mais un truc vraiment bizarre à la place, comment faire en fait afin de ne lancer que la feuille avec OE, afin de ne pas pertuber les utilisateurs ? Merci Alain
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de news:
Bonsoir, Comme ceci ? http://www.excelabo.net/excel/sortirmail.php#feuillemail -- Avec plaisir http://dj.joss.free.fr/trombine.htm http://jacxl.free.fr/mpfe/trombino.html Philippe.R Pour se connecter au forum : http://www.excelabo.net/mpfe/connexion.php News://news.microsoft.com/microsoft.public.fr.excel "alain Lebayle" a écrit dans le message de news:48ff6541$0$23650$
Bonsoir, J'ai cette procédure qui fonctionne très bien, mais je souhaite faire partir une feuille de mon classeur qui se nomme "Stats" et non pas tout le classeur. Pouvez-vous m'aider ? Je vous remercie d'avance Alain
Sub Envoie_FichierJoint_OE() Application.ScreenUpdating = False Fichier = ActiveWorkbook.FullName Dest = "" Sujet = "Test d'envoi avec excel" Msg = "Bonjour, Excel vous envoie un message" Shell "C:Program FilesOutlook Expressmsimn.exe " _ & "/mailurl:mailto:" & Dest & "?subject=" & Sujet & "&Body=" & Msg & "" SendKeys "%I" & "p" & Fichier & "~" & "%S" Application.ScreenUpdating = True End Sub
--
Bonjour
Essaie avec cette macro
http://dj.joss.free.fr/web.htm#mail033
Daniel
FAQ MPFE
http://dj.joss.free.fr/faq.htm
"alain Lebayle" <alain.lebayle@club-internet.fr> a écrit dans le message de
news: 48ff8b7f$0$23646$7a628cd7@news.club-internet.fr...
Bonsoir Philippe et merci
Le pb est que sendmail ne me propose pas OE mais un truc vraiment bizarre
à la place, comment faire en fait afin de ne lancer que la feuille avec
OE, afin de ne pas pertuber les utilisateurs ?
Merci
Alain
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de news:
OLBCO6HNJHA.5772@TK2MSFTNGP02.phx.gbl...
Bonsoir,
Comme ceci ?
http://www.excelabo.net/excel/sortirmail.php#feuillemail
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/mpfe/connexion.php
News://news.microsoft.com/microsoft.public.fr.excel
"alain Lebayle" <alain.lebayle@club-internet.fr> a écrit dans le message
de news:48ff6541$0$23650$7a628cd7@news.club-internet.fr...
Bonsoir,
J'ai cette procédure qui fonctionne très bien, mais je souhaite faire
partir une feuille de mon classeur qui se nomme "Stats" et non pas tout
le classeur.
Pouvez-vous m'aider ?
Je vous remercie d'avance
Alain
Sub Envoie_FichierJoint_OE()
Application.ScreenUpdating = False
Fichier = ActiveWorkbook.FullName
Dest = "totoettata@free.fr"
Sujet = "Test d'envoi avec excel"
Msg = "Bonjour, Excel vous envoie un message"
Shell "C:Program FilesOutlook Expressmsimn.exe " _
& "/mailurl:mailto:" & Dest & "?subject=" & Sujet & "&Body=" & Msg & ""
SendKeys "%I" & "p" & Fichier & "~" & "%S"
Application.ScreenUpdating = True
End Sub
Bonjour Essaie avec cette macro http://dj.joss.free.fr/web.htm#mail033
Daniel FAQ MPFE http://dj.joss.free.fr/faq.htm
"alain Lebayle" a écrit dans le message de news: 48ff8b7f$0$23646$
Bonsoir Philippe et merci Le pb est que sendmail ne me propose pas OE mais un truc vraiment bizarre à la place, comment faire en fait afin de ne lancer que la feuille avec OE, afin de ne pas pertuber les utilisateurs ? Merci Alain
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de news:
Bonsoir, Comme ceci ? http://www.excelabo.net/excel/sortirmail.php#feuillemail -- Avec plaisir http://dj.joss.free.fr/trombine.htm http://jacxl.free.fr/mpfe/trombino.html Philippe.R Pour se connecter au forum : http://www.excelabo.net/mpfe/connexion.php News://news.microsoft.com/microsoft.public.fr.excel "alain Lebayle" a écrit dans le message de news:48ff6541$0$23650$
Bonsoir, J'ai cette procédure qui fonctionne très bien, mais je souhaite faire partir une feuille de mon classeur qui se nomme "Stats" et non pas tout le classeur. Pouvez-vous m'aider ? Je vous remercie d'avance Alain
Sub Envoie_FichierJoint_OE() Application.ScreenUpdating = False Fichier = ActiveWorkbook.FullName Dest = "" Sujet = "Test d'envoi avec excel" Msg = "Bonjour, Excel vous envoie un message" Shell "C:Program FilesOutlook Expressmsimn.exe " _ & "/mailurl:mailto:" & Dest & "?subject=" & Sujet & "&Body=" & Msg & "" SendKeys "%I" & "p" & Fichier & "~" & "%S" Application.ScreenUpdating = True End Sub
--
alain Lebayle
Ok merci beaucoup Alain
"Daniel.j" a écrit dans le message de news:
Bonjour Essaie avec cette macro http://dj.joss.free.fr/web.htm#mail033
Daniel FAQ MPFE http://dj.joss.free.fr/faq.htm
"alain Lebayle" a écrit dans le message de news: 48ff8b7f$0$23646$
Bonsoir Philippe et merci Le pb est que sendmail ne me propose pas OE mais un truc vraiment bizarre à la place, comment faire en fait afin de ne lancer que la feuille avec OE, afin de ne pas pertuber les utilisateurs ? Merci Alain
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de news:
Bonsoir, Comme ceci ? http://www.excelabo.net/excel/sortirmail.php#feuillemail -- Avec plaisir http://dj.joss.free.fr/trombine.htm http://jacxl.free.fr/mpfe/trombino.html Philippe.R Pour se connecter au forum : http://www.excelabo.net/mpfe/connexion.php News://news.microsoft.com/microsoft.public.fr.excel "alain Lebayle" a écrit dans le message de news:48ff6541$0$23650$
Bonsoir, J'ai cette procédure qui fonctionne très bien, mais je souhaite faire partir une feuille de mon classeur qui se nomme "Stats" et non pas tout le classeur. Pouvez-vous m'aider ? Je vous remercie d'avance Alain
Sub Envoie_FichierJoint_OE() Application.ScreenUpdating = False Fichier = ActiveWorkbook.FullName Dest = "" Sujet = "Test d'envoi avec excel" Msg = "Bonjour, Excel vous envoie un message" Shell "C:Program FilesOutlook Expressmsimn.exe " _ & "/mailurl:mailto:" & Dest & "?subject=" & Sujet & "&Body=" & Msg & "" SendKeys "%I" & "p" & Fichier & "~" & "%S" Application.ScreenUpdating = True End Sub
--
Ok merci beaucoup
Alain
"Daniel.j" <dj@free.fr> a écrit dans le message de news:
u94KrNONJHA.2760@TK2MSFTNGP06.phx.gbl...
Bonjour
Essaie avec cette macro
http://dj.joss.free.fr/web.htm#mail033
Daniel
FAQ MPFE
http://dj.joss.free.fr/faq.htm
"alain Lebayle" <alain.lebayle@club-internet.fr> a écrit dans le message
de news: 48ff8b7f$0$23646$7a628cd7@news.club-internet.fr...
Bonsoir Philippe et merci
Le pb est que sendmail ne me propose pas OE mais un truc vraiment bizarre
à la place, comment faire en fait afin de ne lancer que la feuille avec
OE, afin de ne pas pertuber les utilisateurs ?
Merci
Alain
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de
news: OLBCO6HNJHA.5772@TK2MSFTNGP02.phx.gbl...
Bonsoir,
Comme ceci ?
http://www.excelabo.net/excel/sortirmail.php#feuillemail
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/mpfe/connexion.php
News://news.microsoft.com/microsoft.public.fr.excel
"alain Lebayle" <alain.lebayle@club-internet.fr> a écrit dans le message
de news:48ff6541$0$23650$7a628cd7@news.club-internet.fr...
Bonsoir,
J'ai cette procédure qui fonctionne très bien, mais je souhaite faire
partir une feuille de mon classeur qui se nomme "Stats" et non pas tout
le classeur.
Pouvez-vous m'aider ?
Je vous remercie d'avance
Alain
Sub Envoie_FichierJoint_OE()
Application.ScreenUpdating = False
Fichier = ActiveWorkbook.FullName
Dest = "totoettata@free.fr"
Sujet = "Test d'envoi avec excel"
Msg = "Bonjour, Excel vous envoie un message"
Shell "C:Program FilesOutlook Expressmsimn.exe " _
& "/mailurl:mailto:" & Dest & "?subject=" & Sujet & "&Body=" & Msg & ""
SendKeys "%I" & "p" & Fichier & "~" & "%S"
Application.ScreenUpdating = True
End Sub
Bonjour Essaie avec cette macro http://dj.joss.free.fr/web.htm#mail033
Daniel FAQ MPFE http://dj.joss.free.fr/faq.htm
"alain Lebayle" a écrit dans le message de news: 48ff8b7f$0$23646$
Bonsoir Philippe et merci Le pb est que sendmail ne me propose pas OE mais un truc vraiment bizarre à la place, comment faire en fait afin de ne lancer que la feuille avec OE, afin de ne pas pertuber les utilisateurs ? Merci Alain
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de news:
Bonsoir, Comme ceci ? http://www.excelabo.net/excel/sortirmail.php#feuillemail -- Avec plaisir http://dj.joss.free.fr/trombine.htm http://jacxl.free.fr/mpfe/trombino.html Philippe.R Pour se connecter au forum : http://www.excelabo.net/mpfe/connexion.php News://news.microsoft.com/microsoft.public.fr.excel "alain Lebayle" a écrit dans le message de news:48ff6541$0$23650$
Bonsoir, J'ai cette procédure qui fonctionne très bien, mais je souhaite faire partir une feuille de mon classeur qui se nomme "Stats" et non pas tout le classeur. Pouvez-vous m'aider ? Je vous remercie d'avance Alain
Sub Envoie_FichierJoint_OE() Application.ScreenUpdating = False Fichier = ActiveWorkbook.FullName Dest = "" Sujet = "Test d'envoi avec excel" Msg = "Bonjour, Excel vous envoie un message" Shell "C:Program FilesOutlook Expressmsimn.exe " _ & "/mailurl:mailto:" & Dest & "?subject=" & Sujet & "&Body=" & Msg & "" SendKeys "%I" & "p" & Fichier & "~" & "%S" Application.ScreenUpdating = True End Sub