Automatic mail from WORD

[Gù]

I'm not able to find a good method to write a macro for the instruction
"SEND ACTIVE DOCUMENT BY E-MAIL" (FILE main menù)

Can you help me, please?

Many thanks

Guido

 

[Doug Robbins]

See the article "How to send an email from Word using VBA" at:

http://word.mvps.org/FAQs/InterDev/SendMail.htm


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

 

[Gù]

Dera Doug, thanks for your help.
It seemed perfect, but now I have other problems: fist of all, VBA doesn't
konws ActiveDocument.ROUTE, and I don't find it anywhere.
Moreover, this method let me send the document as attachement, but i need to
make it be the body of the mail!
Oh, i'm so sad!!! MORE HEEEEELP!

Guido

 

[Doug Robbins]

Check out the ActiveDocument.SendMail command.

--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

 

[Gù]

Well, the macro should be perfect.
But, if it runs, VBA tells me that i didn't install MAIL in my PC. What is
this? A library? A *.exe program? a *.DLL?
Consider that I installed FULL Office in my computer!!!!
The strange thing is that, if I use the manual method (in a WD document I
choose SEND DOCUMENT TO...) it doesn't have problems!!!

 

[Doug Robbins]

For me it opens an Outlook mail message window. Do you have Outlook
installed and set as the default mail program? Not Outlook Express.

--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

 

[Gù]

No, I don't use OUTLOOK! So I don't want to set a particular browser: I need
only WORD.

The problem is that, if I run the command from the document (File/Send by
email) it runs perfectly! WORD opens a little window where I've to insert
some parameter (the normal parameters of a normal mail: Address, Subject,
Priority, and so on...): it's simple and fast. Then WORD sends the mail, and
I receve it without problems. The document is not an attachement, but the
real mail content!

I try to explain what I need

Sub POSTA()
ActiveDocument.HasRoutingSlip = True (I think this is
correct)
With ActiveDocument.RoutingSlip
.Subject = "Prova mail automatica"
.AddRecipient "my (e-mail address removed)"
.AddRecipient "(e-mail address removed)"
.Delivery = wdAllAtOnce
(????????????)
End With
Options.SendMailAttach = False (With FALSE I
make Active Document be part of the email instead of an attachement)
SEND IT!!!!!!!!!!!!!! <-------------------- I need to send the
current document: I don't find the correct instruction
End Sub


To be honest, I think that I'm looking for something impossible, cause I
found many objects and instructions, but no one like the manual command...
I'm sad.........

 

[Doug Robbins]

You said "No, I don't use OUTLOOK! "

I think that is your problem. Some of these things do not work with other
mail programs.

--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP