dnast01
asked on
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
Cheers
Damien
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
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.
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.
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(olA ppointment Item)
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
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
For Each objEmail In objSelectedItems
Set objAppointment = Application.CreateItem(olA
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
ASKER
Good work once again BlueDevilFan.
Thanks for the extra information much appreciated.
Cheers
Damien
Thanks for the extra information much appreciated.
Cheers
Damien
ASKER
Thanks again BlueDevilFan
Damien