Forwarding Appointment

  • Thread starter Thread starter Warren.Clark
  • Start date Start date
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
 
Help with what? What isn't working or not working the way you want?
 
Back
Top