W
Warren.Clark
I am want to forward my current appointment and i am using the following code
that i copied -it forwards the current email fine - even when my calendar
item has focus , i am new at this can anyone 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
that i copied -it forwards the current email fine - even when my calendar
item has focus , i am new at this can anyone 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