ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   Fw: send two or more files with Excel and Outlook Express (https://www.excelbanter.com/excel-discussion-misc-queries/105524-fw-send-two-more-files-excel-outlook-express.html)

Infosistem

Fw: send two or more files with Excel and Outlook Express
 
Hello,
I must send some files ( es. file1 - file2.eur - file3.doc ) with Excel and
Outlook Express .

My macro use :
-------------------------------------------------------------

wcHlink = "mailto:" & wcMailAddr & wcMailObjetc & wcmailMess

ActiveWorkbook.FollowHyperlink (wcHlink)

-----------------------------------------------------------
for to execute the program of mail ; and after :
------------------------------------------------------------
Application.SendKeys Keys:="%I", Wait:=True
Application.SendKeys Keys:="A", Wait:=True
Application.SendKeys Keys:=wcNameFile, Wait:=True
Application.SendKeys Keys:="{RETURN}", Wait:=True

----------------------------------------------------------
to put in the buffer's keyboard, the right keys


have you a good idea ?


Thanks




Ron de Bruin

send two or more files with Excel and Outlook Express
 
Hi

Not possible with OE
See if you can use CDO
http://www.rondebruin.nl/cdo.htm


--
Regards Ron de Bruin
http://www.rondebruin.nl



"Infosistem" wrote in message ...
Hello,
I must send some files ( es. file1 - file2.eur - file3.doc ) with Excel and Outlook Express .

My macro use :
-------------------------------------------------------------

wcHlink = "mailto:" & wcMailAddr & wcMailObjetc & wcmailMess

ActiveWorkbook.FollowHyperlink (wcHlink)

-----------------------------------------------------------
for to execute the program of mail ; and after :
------------------------------------------------------------
Application.SendKeys Keys:="%I", Wait:=True
Application.SendKeys Keys:="A", Wait:=True
Application.SendKeys Keys:=wcNameFile, Wait:=True
Application.SendKeys Keys:="{RETURN}", Wait:=True

----------------------------------------------------------
to put in the buffer's keyboard, the right keys


have you a good idea ?


Thanks







All times are GMT +1. The time now is 10:06 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com