Emailing Excel Worksheet
Barry Brown
I select Send To: Recipient it calls the wrong email program on the
computer. How do I change the default mail program? I've checked the
Mail Control Panel and that is setup correctly.
Dave Peterson
Start windows explorer (not internet explorer)
then click on View|folder Options
then on the file types tab
look for URL:mailto protocol
edit that to what you want.
I use Netscape 4.7 under win98 and have:
Under Open (greyed out)
application used to perform this action:
C:\PROGRAM FILES\NETSCAPE\COMMUNICATOR\PROGRAM\NETSCAPE.EXE -h "%1"
Use DDE is checked
DDE Message is: %1
DDE Application not running is empty
Topic is:
WWW_OpenURL
If it works, let us know. If it doesn't, too!
(if yours is set up differently, write down before you change anything...
Good luck
--
Dave Peterson
pete...@freewwweb.com
Searcher
mailer? If you have Netscape, it will take over the MAPI (File/Send) duties
unless you disable it from doing so. Too often, a new application will take
over just by launching it. Outlook Express does this if you do not tell it
explicitely that it is not the default mailer.
If you have IE5 loaded, it too has a setting under Tools/Options/Programs.
See what is listed as the EMail application.
If that doesn't work, try this URL
http://support.microsoft.com/support/kb/articles/Q199/8/23.ASP
The bottom line is that there no mechansim within within Windows to properly
reset the defualt messaging application.
Mark Ryan
www.distributedspreadsheet.com
If you consolidate worksheets from multiple users, you need to take a look!"
"Barry Brown" <bar...@widomaker.com> wrote in message
news:120420001730076290%bar...@widomaker.com...
Barry Brown
Excel to force the use of the correct email program to send the active
window as an attachment. Any thoughts on what the coding would be will
be greatly appreciated.
In article <O#lrZzNp$GA.273@cppssbbsa04>, Searcher
STéphane
you can be interested by this :
send an excel workbook
VBA : ThisWorkbook.SendMail Recipients:="som...@somewhere.com",
Subject:="Here is the workbook entire path"
Formula : =mailto:royer...@excite.com?attachment="c:\temp\classeur1.xls"
you'll find it on my website but it's in french
http://touareg.citeweb.net/
http://touareg.citeweb.net/aideinformatique/mainexcel.html (see the webmail
icon)
Barry Brown <bar...@widomaker.com> a écrit dans le message :
130420000938155326%bar...@widomaker.com...
Don Guillett
Do you have an English macro to mail a range(not workbook as attachment)as
part of the body of email using outlook EXPRESS 5.0 & xl97 sr2??? Pls copy
to below.
--
Don Guillett
SalesAid Software
Granite Shoals, TX
don...@281.com
STéphane <sro...@synapsys-conseils.fr> wrote in message
news:usMtGDVp$GA.282@cppssbbsa03...
STéphane
here's the examples i build and put into my website a long time ago (they
lay below)
you should manage to solve your problem with this stuff
hth, bye
STéphane
PS : on condition you manage in french, you will find some stuff that may
interest you on my website :
http://touareg.citeweb.net/aideinformatique/mainexcel.html
Sub SendMail()
Dim AddressString As String
AddressString = "mailto:" & Range("A1") & "?subject=" & Range("B1") &
"&body=" & Range("C1")
ActiveWorkbook.FollowHyperlink Address:=AddressString
End Sub
Sub Mail_Me()
Shell ("Start mailto:jm...@freenetname.co.uk")
End Sub
Sub envoi()
dest="Zaza"
Set ol=CreateObject("outlook.application")
Set mail=ol.createitem(olmailitem)
mail.body=ThisWorkbook.Sheets(1).Cells(1).Text
mail.Recipients.Add dest
mail.send
End Sub
Autre exemple
Sub SendEMailWithAttachments()
Dim ol As Object, myItem As Object
Set ol = CreateObject("outlook.application")
Set myItem = ol.CreateItem(olMailItem)
myItem.To = "to...@excel.com"
myItem.Subject = "Test Mail"
myItem.Body = "Hello Word." & Chr(13) & Chr(13) & "Bye All"
Set myAttachments = myItem.Attachments
myAttachments.Add "C:\temp\monclasseur.xls"
MsgBox "Now sending to " & myItem.To
myItem.Send
Set ol = Nothing
End Sub
Don Guillett <don...@281.com> a écrit dans le message :
eEBebsXp$GA.239@cppssbbsa05...