conf t

インフラエンジニアのメモ

Outlook マクロ Outlookの個人用フォルダ(pst)へアクセスする

 

普通の受信トレイと方法は一緒です。

 

下記画像でいうと、ローカル1が個人用フォルダなので、この中のローカル1フォルダにアクセスします。

 

f:id:monaski:20140525234706p:plain

 

 

Set objOutlook = CreateObject("Outlook.Application")  

Set objNamespace = objOutlook.GetNamespace("MAPI")

Set objbox = objNamespace.Folders("ローカル1")

Set objInbox = objbox.Folders("TEST1")

 

MAPIオブジェクトの1つ下に各メールアドレスや個人フォルダがあります。

Foldersメソッドで個人用フォルダのローカル1を取得後、同じ手法でさらに下の

TEST1フォルダを取得しています。

 

 

 

ローカル1に何個もサブフォルダがあって入れ子になっていても、上記のようにFoldersメソッドで順番に辿っていけばアクセスできます。

 

 

 

参考

http://gallery.technet.microsoft.com/office/b1c012d7-f7e2-4761-a5a8-8df81cf3d578

 

 

 

 

 

 

 

 

広告を非表示にする