Forwarding Appointment

W

Warren.Clark

I am trying to forward the current appointment in outlook 2003 - I am using
the following code which will forward my current email item even if it does
not have focus - I am entirely new to this can someone help?

Sub AutoCalFwd()

On Error Resume Next
Set thisItem = Application.ActiveInspector.CurrentItem

Set fwdItem = thisItem.Forward
fwdItem.To = "(e-mail address removed)"
fwdItem.Send


End Sub
 
K

Ken Slovak - [MVP - Outlook]

Help with what? What isn't working or not working the way you want?
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top