 |
 | Home | Contact Us | FAQ | Search & Site Map | Link to Us |
 | Sign In | Join | Other 45 Sites in Network |
| HomeDiscussionsAccessExcelInfoPathOutlookPowerPointPublisherWordDirectoryUser Groups Related Topics Outlook ExpressInternet ExplorerWindowsMS Server ProductsMore Topics ... |
MS Office Forum / Outlook / Programming VBA / November 2006filtering appointment attendees and resources??
Hi, here is the problem. I have a list of 40 or so meeting rooms, that I want to be able to choose from when I set up a meeting in outlook. These meeting rooms show up in the outlook address book, similar to staff members, and are currently added as a "resources" from the address book into the meeting. Is there a way to provide a filtered list of those rooms based on the time and date currently selected in the meeting schedul?. I would think I could write a function that would take the time and date, and scan the appropriate items in the address book (the rooms), and provide a list of those that are currently available. and then further add the room if I were to d-click on it from the list. Can someone point me in the right direction to do something like this? You can build such a list on a UserForm. Please see the Recipient.FreeBusy function in the VBA help file.  SignatureViele Gruesse / Best regards Michael Bauer - MVP Outlook -- www.VBOffice.net -- Am 29 Nov 2006 10:43:28 -0800 schrieb callmedoug: > Hi, > [quoted text clipped - 13 lines] > > Can someone point me in the right direction to do something like this? Hi Micheal, So let me know if this would be the correct course of action. 1 Create a user button that would open a user form 2 have the form get the freebusy information for only those recipients that the name begins with MTGRM 3 display a listbox of the recipients that are free 4 when d-click on one of the recipients in the listbox, add it as a resource, and close the form. if that is correct, would the following code work for filtering the addressbook down to only meeting rooms? 'list entries in outlook addressbook that start with mtgrm Dim myAddressList As AddressList Dim AddressEntry As AddressEntry Set myAddressList = Application.Session.AddressLists("Global Address List") For Each AddressEntry In myAddressList.AddressEntries if left(AddressEntry.Name,5) = "MTGRM" then MsgBox AddressEntry.Name end if ' add code here to check for freebusy ' add code here is is free add to listbox Next Thanks > You can build such a list on a UserForm. Please see the Recipient.FreeBusy > function in the VBA help file. [quoted text clipped - 23 lines] > > > > Can someone point me in the right direction to do something like this? Hi Micheal, So let me know if this would be the correct course of action. 1 Create a user button that would open a user form 2 have the form get the freebusy information for only those recipients that the name begins with MTGRM 3 display a listbox of the recipients that are free 4 when d-click on one of the recipients in the listbox, add it as a resource, and close the form. if that is correct, would the following code work for filtering the addressbook down to only meeting rooms? 'list entries in outlook addressbook that start with mtgrm Dim myAddressList As AddressList Dim AddressEntry As AddressEntry Set myAddressList = Application.Session.AddressLists("Global Address List") For Each AddressEntry In myAddressList.AddressEntries if left(AddressEntry.Name,5) = "MTGRM" then MsgBox AddressEntry.Name end if ' add code here to check for freebusy ' add code here is is free add to listbox Next Thanks > You can build such a list on a UserForm. Please see the Recipient.FreeBusy > function in the VBA help file. [quoted text clipped - 23 lines] > > > > Can someone point me in the right direction to do something like this? OMG sorry for multiple replies I am not sure what i did to make that happen. Hi Micheal, So let me know if this would be the correct course of action. 1 Create a user button that would open a user form 2 have the form get the freebusy information for only those recipients that the name begins with MTGRM 3 display a listbox of the recipients that are free 4 when d-click on one of the recipients in the listbox, add it as a resource, and close the form. if that is correct, would the following code work for filtering the addressbook down to only meeting rooms? 'list entries in outlook addressbook that start with mtgrm Dim myAddressList As AddressList Dim AddressEntry As AddressEntry Set myAddressList = Application.Session.AddressLists("Global Address List") For Each AddressEntry In myAddressList.AddressEntries if left(AddressEntry.Name,5) = "MTGRM" then MsgBox AddressEntry.Name end if ' add code here to check for freebusy ' add code here is is free add to listbox Next Thanks > You can build such a list on a UserForm. Please see the Recipient.FreeBusy > function in the VBA help file. [quoted text clipped - 23 lines] > > > > Can someone point me in the right direction to do something like this? |
Reply to this Message |
 Sign In
 Join
 My Latest Posts My Monitored Threads My Blog My Photo Gallery My Profile My Homepage Start New Thread Enable EMail Alerts Rate this Thread
|
©2008 Advenet LLC Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.