View Single Post
  #8  
Old April 19th, 2008, 09:41 AM posted to microsoft.public.word.newusers
Graham Mayor
external usenet poster
 
Posts: 18,297
Default How to get to email from Word

I suspect what you are looking for is the 'Send To Mail Recipient' command
which you can add to the QAT.
or
You can select the text you want in your e-mail and run the following macro

Sub Send_Extract_As_Mail()
' send the document in an Outlook Email message
Dim bStarted As Boolean
Dim oOutlookApp As Outlook.Application
Dim oItem As Outlook.MailItem

On Error Resume Next

'Get Outlook if it's running
Set oOutlookApp = GetObject(, "Outlook.Application")

'Outlook wasn't running, start it from code
If Err 0 Then
Set oOutlookApp = CreateObject("Outlook.Application")
bStarted = True
End If

'Create a new mailitem
Set oItem = oOutlookApp.CreateItem(olMailItem)
With oItem
.to = "
.Subject = InputBox("Subject?")
.Body = Selection
.Display
End With
'Clean up
Set oItem = Nothing
Set oOutlookApp = Nothing
End Sub

http://www.gmayor.com/installing_macro.htm

If you want to pick the recipient delete the .to line


--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org



George Lutz wrote:
Because in my Word document, I use macros that greatly simplify my
composing of the email. E.g., if I want to send an email to
Jennifer, my ETJ macro prepares the header, including To: Jennifer,
From: George, it inputs the client name into a line, etc. Then I
sue another macro to select and copy the whole email, hit the button
that apparently no longer exists in 2007, then hit Control-V to
insert everything into the blank email template.

"Gordon" wrote:

"George Lutz" wrote in message
...
But I don't want to send the entire Word document -- just the
portion of it
that is my email. I take notes as I go through the day, and
occasionally compose an email that I then want to send. The email
is just a small portion
of the day's notes. So, I compose the email, then cut and paste
its text into Outlook. The button I used in Word 2003 called up
Outlook, opened a blank email, and allowed me to paste in the text
I had prepared in Word. I
also had a button that called up Outlook with an email already
addressed to
my assistant, who is the recipient of about half of the 20 or so
emails I send each day -- very convenient. Amazing that such a
useful feature would
be eliminated in an "updated" version of Word!



Unfortunately Outlook 2007 doesn't use all of Word 2007 as the email
editor - it uses a stub. Therefore you can't do what you used to do
in 2003 in the same way.
However, I don't understand why you would compose an email in Word
and then paste the text into an email - why not just write the text
directly into a new email message?