「その他の連絡先」のフォルダから連絡先を取得する

Question

私は動作するコードスニペットがあります。

Dim Session As Outlook.NameSpace 
Dim ContactFolder As Outlook.Folder 
Set Session = Application.Session 

Set ContactFolder = Session.GetDefaultFolder(olFolderContacts) 

それはOutlook.FolderタイプとしてContactFolderを設定しますが、それはいくつかのデフォルトフレームワーク、olFolderContactsを使用することによってこれを行います。

ContactFolder変数としてカスタムフォルダを設定したいと思います。具体的には、他の連絡先にあります。私はentryIDを含むMSDNのいくつかのメソッドを見たことがありますが、自分のカスタム連絡先フォルダのentryIDを取得できませんでした。フォルダは、連絡先フォルダのサブフォルダがある場合

Answer 1

：

set subFolder = ContactFolder.Folders("My other contacts") 

それは、連絡先フォルダと同じレベルにある場合：

set subFolder = ContactFolder.Parent.Folders("My other contacts")