私はOutlook2003環境なので、2007では動作確認できていませんが…。 myItem.To とする代わりに myItem.Recipients(1).Address のようにすれば、受信者(宛先)のアドレスを取れると思います。 以下蛇足。 ●Toに複数のアドレスが設定されていた場合… Toプロパティはセミコロンで区切った単一のStringを返しますが Recipientsプロパティはコレクションを返すので 総ての宛先を取得するには、Recipientsコレクションを回してやる必要があります。 '---↓ タトエバ ↓---------------------------------------- Sub getRecp() Set myFolder = Application.ActiveExplorer.CurrentFolder For Each myItem In myFol