• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 510
  • Last Modified:

Copy email into calendar entry AKA Lotus Notes

I am starting to use MS outlook after many years of Lotus Notes and one feature that I loved in Lotus was the ability to copy an email into a calendar entry. This was a great way to schedule appointments and reminders. Now I know you can use follow ups but this isn't ideal because I like to keep my inbox lean and clean. And once the appointment has bee created I delete the email. This feature also copied the contents of the email in the calendar entry. Is there a comparible action in outlook?

Cheers
Damien
0
dnast01
Asked:
dnast01
  • 3
  • 2
1 Solution
 
David LeeCommented:
Hi dnast01,

Sure is.  Just drag the message over to the calendar and drop it there.  Outlook will create an appointment with the message included in the appointment's body.

Cheers!
0
 
dnast01Author Commented:
Thanks. That helps me a heap. Do many people in outlook community use this feature? Its a little more obvious in Notes as it is an action. A right click menu item would be nice.

Thanks again BlueDevilFan

Damien
0
 
David LeeCommented:
Damien,

You're welcome.  I can't answer your question about how many people use this feature.  In my office not many, but then most of the folks in my office don't use anything more than basic Outlook functions.  I agree that a right-click menu item would be handy.  If you don't mind doing some VBA scripting, then it'd be easy enough to add a tool-bar button to create an appointment from a message.  All you'd need to do is highlight the message and click the tool-bar button.  I don't think I've ever tried to modify a right-click menu in Outlook.  It might be possible to add a selection there also.  
0
 
David LeeCommented:
Damien,

Here's a macro that'll create an appointment from an email.  To use it, select an email and run the macro.  It'll create the appointment and display it on screen.  The message as it appears in the body of the appointment is slightly different from the way it appears if you use the drag-n-drop method.  Otherwise, it looks exactly the same to me.  The nice thing about using the macro approach is that it allows you to perform custom actions that the drag-n-drop method doesn't.  For example, you could add code to the macro that'd fill various fields in with predefined values.  You can also add a toolbar button to make running the macro easier.  Finally, here's a link (http://www.outlookcode.com/codedetail.aspx?id=314) to an article that describes how to create a new context menu selection so you could right-click and run the macro too.  If you decide to do that, then I think the macro will need a slight modification to work properly.

Sub CreateAppointmentFromEmail()
    Dim objSelectedItems As Outlook.Selection, _
        objEmail As Outlook.MailItem, _
        objTemp As Outlook.MailItem, _
        objAppointment As Outlook.AppointmentItem
    Set objSelectedItems = Application.ActiveExplorer.Selection
    For Each objEmail In objSelectedItems
        Set objAppointment = Application.CreateItem(olAppointmentItem)
        With objAppointment
            Set objTemp = objEmail.Reply
            .Subject = objEmail.Subject
            .Body = objTemp.Body
            .Categories = objEmail.Categories
            .Display
            Set objTemp = Nothing
        End With
    Next
    Set objEmail = Nothing
    Set objSelectedItems = Nothing
End Sub
0
 
dnast01Author Commented:
Good work once again BlueDevilFan.
Thanks for the extra information much appreciated.

Cheers
Damien
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Free Tool: IP Lookup

Get more info about an IP address or domain name, such as organization, abuse contacts and geolocation.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

  • 3
  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now