Changing default reminder time for all day events - additional help needed

[thurston_moore]

I was able to successfully use some VB scripting that I found here to change the default time from 18 hours to whatever I wanted. The problem is that I'd like to choose someone else's calendar that I have rights to. I don't know if that is possible because those calendars don't show up in the folder list, so I can't really get the path. Has anyone been able to do this? I used Diane Poremsky's post included below for reference.

How to Remove Reminders on All Day Events to

 

[Diane Poremsky]

To control the reminder on all events, regardless of the calendar, change

Set Items = Ns.GetDefaultFolder(olFolderCalendar).Items

to

Set Items = Application.ActiveExplorer.CurrentFolder.Items

If you want the option to do this or not, you could tweak the code:

'msgbox block - 3 lines
If MsgBox("Do you want to set the reminder?", vbYesNo) = vbNo Then
Exit Sub
End If

'appt.reminderset block - 2 lines
Appt.ReminderSet = True
Appt.Save