How do I send a document as attachment and fill in email address?

[Ray7071]

I have created a Word 2000 Document as a Form. On the Form I have a Button
which can send the whole Form (Document) as a Mail Attachment by using the
following (which i copied from the help file by searching around)...

Private Sub CommandButton1_Click()
Options.SendMailAttach = True
ActiveDocument.SendMail

End Sub

When the Buton is 'Clicked' it Opens Outlook Express with the Form attached
OK. So far - so good.

How can I arrange for the Button to ALSO fill in the email address i.e the
'To:' Address with an address of my choice thus automating the return of the
filled form to me? At prewsent a user has to fill in my email address and
could (often does) make a mistake.

Finally, will the Button work with earlier and later versions of 'Word'

Thanks, Ray7071

 

[Doug Robbins - Word MVP]

I think that you are going to have to use Outlook for this, not Outlook
Express because AFAIK it cannot be automated.

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

http://www.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

 

[alborg]

Hi Ray:

You might wish to look into the SendObject Action, selecting all the text in
your document and sending it off either as a txt or rtf among other document
types.

URL: http://msdn.microsoft.com/en-us/library/aa164065(office.10).aspx

Cheers,
Al

 

[Suzanne S. Barnhill]

The referenced article seems to refer to Access, and the result seems to
send the object (and none of the objects described is a Word document, much
less a protected form) in the body of the email. If the arguments in the
SendObject Action that provide the recipient, subject line, etc., are
applicable to a Word VBA command, however, this would be helpful.

 

[alborg]

Hi Suzanne:

Yeah, you're right. The sendobject action will work in MS Word, but only to
place the text within the body of the email. It doesn't allow attachments
from within the MS Word platform, which is too bad- it is a fast and slick MS
Access action!

Anyhow, for those interested in seeing how it works in a limited manner,
download the Word template called "Gettysburg Address" here-
http://www.box.net/shared/static/70zd8lhk40.dot. All you have to do is to
bring it up, then click on the toolbar item called
"Project.AutoMacros.popuserform". Once you place your email in the textbox
supplied on the form, it'll scoop up the template's Gettysburg Address text
and send it off in the email, sans the picture of Abraham Lincoln.

Cheers,
Al