Re: Recurring Appointments in public folder

So I'm confused, was there a final decision on wether you could force and/or
prompt the requestor for an End date to recurring meetings? We are currently
looking at switching our conference Room scheduling to Outlook (to make the
most of Office) and this is one of the questions.

Thanks!
Cary Rosenberg, Admin Asst to
Jackie Breiter, VP Infrastructure Services.
PharMerica

"ML" wrote:

It works!

Thank you so much!

I love you!

~ML


"Ken Slovak - [MVP - Outlook]" wrote:

In order to find the end date or number of occurrences for a series you need
to get the RecurrencePattern of the appointment. First you check to make
sure the item is part of a recurring series, if you get the
RecurrencePattern of a non-recurring item you convert it into a recurring
item.

If Item.IsRecurring Then
Set oRecurPattern = Item.GetRecurrencePattern
If oRecurPattern.NoEndDate Then


--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Absolute Beginner's Guide to Microsoft Office Outlook 2003
Reminder Manager, Extended Reminders, Attachment Options
http://www.slovaktech.com/products.htm


"ML" <ML@xxxxxxxxxxxxxxxxxxxxxxxxx> wrote in message
news:1CD08823-CDC9-4F50-A139-B7BD72C432EE@xxxxxxxxxxxxxxxx
Thanks Ken,

Right now, I'm trying to write a code to check if the user chose
"NoEndDate." Then a warning message pops up saying that "You have to
choose
either End After or End by"

The message box is working but I cannot catch NoEndDate value whether the
user chose NoEndDate or not. Can you take a look at my code and make
suggestion?

Thanks,
ML

Function Item_Write()
If NoEndDate = True Then
'You cannot save and message box pops up
Item_Write = False
Dim MyVar1
MyVar1 = MsgBox ("Please select either End After or End by in the
range of recurrece!",vbOKOnly)
Else
'You can save and a reminder pops up
Item_Write = True
Dim MyVar2
MyVar2 = MsgBox ("Reminder: Please notify your admin of any
inactive
recurring meetings in 250W calendar. - GFITech Wax Removal Team",vbOKOnly)
End If

End Function


.

Relevant Pages

  • Re: Recurring Appointments in public folder
    ... First you check to make sure the item is part of a recurring series, if you get the RecurrencePattern of a non-recurring item you convert it into a recurring item. ... The message box is working but I cannot catch NoEndDate value whether the ... MyVar1 = MsgBox ("Please select either End After or End by in the ... 'You can save and a reminder pops up ...
    (microsoft.public.office.developer.outlook.forms)
  • Re: Daylight Savings Time shift still broken in Entourage 11.3.3/11.3.4; Mac OS 10.4.7
    ... Recurring events created after the upgrade to 11.3.4 work fine. ... thousands of separate recurring meetings that must be recreated. ... If your events are on an Exchange server then that means your Exchange ...
    (microsoft.public.mac.office.entourage)
  • Re: Recurring Appts. - Outlook XP vs. 2000
    ... Recurring meetings have a circle made from two arrows. ... Open the meeting and have a look at its settings. ... > Previously scheduled appointments that are changed by ...
    (microsoft.public.outlook.calendaring)
  • Re: viewing recurring meetings
    ... Sue Mosher, Outlook MVP ... Microsoft Outlook Programming - Jumpstart for ... tell me what to do to get reliable listings of recurring meetings? ...
    (microsoft.public.outlook.calendaring)
  • Daylight Savings Time shift still broken in Entourage 11.3.3/11.3.4; Mac OS 10.4.7
    ... Recurring events created after the upgrade to 11.3.4 work fine. ... thousands of separate recurring meetings that must be recreated. ...
    (microsoft.public.mac.office.entourage)
Loading