![]() |
If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Search this Thread | Display Modes |
#1
|
|||
|
|||
![]()
I have a rule to move calendar item to a subfolder within mailbox. Due to
this the snipper doesnt post item as tentative. I'm looking for a script to attach to calendar rule either to post tentative or mark the item as open so it would post tentative. I selected a RULE for all incoming meeting appointments and enabled 'run a script'. Below is what is shown in my script. Sub CustomMeetingRequestRule(Item As Outlook.MeetingItem) Rem Outlook.Add (olAppointmentItem) Open(Outlook.Inspectors.Item.CurrentItem) End Sub Either Outlook.Add (olAppointmentItem) OR Open(Outlook.Inspectors.Item.CurrentItem) is working. Can anyone give me the right syntax for opening current appt item. |
Ads |
#2
|
|||
|
|||
![]()
It should be something like (untested):
Set appt = Item.GetAssociatedAppointment(AddToCalendar:=True) appt.BusyStatus = olTentative appt.Save If you want to "open" the meeting request, the proper method is Display: Item.Display -- Sue Mosher, Outlook MVP Author of Configuring Microsoft Outlook 2003 http://www.turtleflock.com/olconfig/index.htm and Microsoft Outlook Programming - Jumpstart for Administrators, Power Users, and Developers http://www.outlookcode.com/jumpstart.aspx "Henry" wrote in message ... I have a rule to move calendar item to a subfolder within mailbox. Due to this the snipper doesnt post item as tentative. I'm looking for a script to attach to calendar rule either to post tentative or mark the item as open so it would post tentative. I selected a RULE for all incoming meeting appointments and enabled 'run a script'. Below is what is shown in my script. Sub CustomMeetingRequestRule(Item As Outlook.MeetingItem) Rem Outlook.Add (olAppointmentItem) Open(Outlook.Inspectors.Item.CurrentItem) End Sub Either Outlook.Add (olAppointmentItem) OR Open(Outlook.Inspectors.Item.CurrentItem) is working. Can anyone give me the right syntax for opening current appt item. |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
Calendar - 'Run a script' | henry | Outlook - Calandaring | 1 | August 28th 06 08:34 PM |
Rule 'run a script' not running my script | [email protected] | Outlook and VBA | 3 | May 30th 06 12:09 PM |
Script Not run in outlook 2003 | Joey | Outlook and VBA | 4 | May 19th 06 02:10 PM |
"Run a script" rule triggers but script does not execute | Trey Shaffer | Outlook and VBA | 7 | April 7th 06 11:34 PM |
I want the calendar month view to open w/ current week on top | divi | Outlook - Calandaring | 1 | February 13th 06 09:22 PM |