Results 1 to 6 of 6
  1. #1
    Gold Lounger
    Join Date
    Dec 2000
    Location
    Hollywood (sorta), California, USA
    Posts
    2,759
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Add Address Book (any)

    In order to see an Address Book listed in the InsertAddress (also called GetAddress) dialog,
    you have to tell Outlook to include it in the list of address books by checking the box. See below.

    Can anyone tell me how to check that check box programmatically?

    A little code here would be greatly appreciated.
    Attached Images Attached Images
    Kevin <IMG SRC=http://www.wopr.com/w3tuserpics/Kevin_sig.gif alt="Keep the change, ya filthy animal...">
    <img src=/w3timages/blackline.gif width=33% height=2><img src=/w3timages/redline.gif width=33% height=2><img src=/w3timages/blackline.gif width=33% height=2>

  2. #2
    Star Lounger
    Join Date
    Feb 2003
    Location
    Canberra, Australian Capital Territory, Australia
    Posts
    53
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Add Address Book (any)

    it is a property of the folder object -
    Dim olApp As Outlook.Application
    Dim nmsName As Outlook.namespace
    Dim fldFolder As Outlook.MAPIFolder

    Set olApp = Outlook.Application
    Set nmsName = olApp.GetNamespace("Mapi")
    Set fldFolder = nmsName.GetDefaultFolder(olFolderInbox)

    'Display the folder as Outlook Address Book
    fldFolder.ShowAsOutlookAB = True

  3. #3
    Gold Lounger
    Join Date
    Dec 2000
    Location
    Hollywood (sorta), California, USA
    Posts
    2,759
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Add Address Book (any)

    I get "Object doesn't support this property or method"

    I need to set this property on a public contacts folder, not my
    own contacts. The ShowAsOutlookAB property appears not to
    apply to public contact folders??

    Appreciate your posting, though. Any other ideas?

    I'm googling without success.
    Kevin <IMG SRC=http://www.wopr.com/w3tuserpics/Kevin_sig.gif alt="Keep the change, ya filthy animal...">
    <img src=/w3timages/blackline.gif width=33% height=2><img src=/w3timages/redline.gif width=33% height=2><img src=/w3timages/blackline.gif width=33% height=2>

  4. #4
    Gold Lounger
    Join Date
    Dec 2000
    Location
    Hollywood (sorta), California, USA
    Posts
    2,759
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Add Address Book (any)

    I just read that that property is only supported in Outlook 2002.
    Kevin <IMG SRC=http://www.wopr.com/w3tuserpics/Kevin_sig.gif alt="Keep the change, ya filthy animal...">
    <img src=/w3timages/blackline.gif width=33% height=2><img src=/w3timages/redline.gif width=33% height=2><img src=/w3timages/blackline.gif width=33% height=2>

  5. #5
    Star Lounger
    Join Date
    Feb 2003
    Location
    Canberra, Australian Capital Territory, Australia
    Posts
    53
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Add Address Book (any)

    Um, question - what version you developing for?
    Did you try adding the public folder to your favo<u>rites (I am Australian... we spell better), and doing it to that one?
    (I did this last year, but I don't recall if my users were all Outlook 2002)

  6. #6
    Gold Lounger
    Join Date
    Dec 2000
    Location
    Hollywood (sorta), California, USA
    Posts
    2,759
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Add Address Book (any)

    We're still on Office 9 but are shortly upgrading to 10. I'll save the code for
    the upgrade and things should be fine. Thanks for your help!
    Kevin <IMG SRC=http://www.wopr.com/w3tuserpics/Kevin_sig.gif alt="Keep the change, ya filthy animal...">
    <img src=/w3timages/blackline.gif width=33% height=2><img src=/w3timages/redline.gif width=33% height=2><img src=/w3timages/blackline.gif width=33% height=2>

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •