ゲスト 18人 と メンバー0人 がオンラインです

vba - excel - Outlookのフォルダ選択ダイアログを表示する

参照数: 424

概要

Outlookのフォルダを選択するダイアログを表示する。

※フォルダ：↓のようなoutlookのフォルダ

　{メールアドレス}　
　　　└　受信トレイ
　　　　　　　└　フォルダ１


サンプル

    Dim objOutlook As Outlook.Application
    Dim objNameSpace As Outlook.namespace
    Dim objFolder As Outlook.Folder
    
    Set objOutlook = New Outlook.Application
    Set objNameSpace = objOutlook.GetNamespace("MAPI")

    ' フォルダ選択ダイアログを表示する
    ' 戻り値に選択したフォルダの「Folder」オブジェクト
    '　→フォルダを選択しなかった場合は「Nothing」になる
    Set objFolder = objNameSpace.PickFolder

 

Main Menu