コピー2018.08.31みなさまこんにちは、ノグチです。前回は、Outlookの受信メールフォルダと、そのサブフォルダーにアクセスしてフォルダ名を書き出す方法をご紹介しました。エクセルVBAでOutlookの受信メールフォルダとサブフォルダ名を書き出す方法エクセルVBAでOutlookの受信メールフォルダにあるメールの内容を、エクセルのワークシートに書き出す方法を、数回の連載でご紹介しています。今回は、GetDefaultFolderメソッドとFoldersプロパティで、受信メールフォルダとサブフォルダの名称を書き出す方法のご紹介です。前回の記事で、GetDefaultFolderメソッドと引数olFolderInboxで、Outlookの受信メールフォルダーとそのサブフォルダーにアクセスすることができました。今回の記事の目的である、フォルダの中のメールの内容を書き出すためには、フォルダ内のメールのデータにアクセスする必要がありますね。そこで使うのが、GetDefaultFolderメソッドで取得したFolderオブジェクトの、Itemsプロパティ。Itemsプロパティは、Outlookのデータフォルダ内にある、受信メールフォルダ内のメールデータをItemsオブジェクトとして取得できるメソッドです。Folderオブジェクト.Items(メールのインデックス番号)MailItemオブジェクトのプロパティでメールの情報を取得FoldersオブジェクトのItemsプロパティで取得できたItemsオブジェクトは、MailItemオブジェクトの形で取得できるので、MailItemオブジェクトのプロパティで、欲しい情報を取得していきます。MailItemオブジェクトのプロパティは、下記記事でまとめていますのでそちらをご覧くださいね。エクセルVBAでOutlookメールの下書きを作成・表示して送信前に内容チェックするOutlookのMailItemオブジェクトのDisplayメソッドを使って、VBAで作成したOutlookのメール内容を、メール送信前にチェックする方法をご紹介しています。「VBAでメールを作成するのは便利だけど、内容をチェックしないでメール送信してしまうのは心配...」という方にお勧めです。ここまでをコードにしてみると、こんな感じのコードになります。Sub特定のフォルダからメールを取り出すItemメソッドで特定フォルダのFolderオブジェクトを取得する上のコードは、受信メールフォルダ全体を対象にメールを取り出していますが、FoldersオブジェクトのItemメソッドを使って特定のフォルダにあるメールだけを対象にすることもできます。さっきからFoldersだったりFolderだったり、ItemsだったりItemだったりややこしいですね。Itemメソッドはこんな感じで記述します。Foldersオブジェクト.Item(フォルダ名)引数のフォルダ名は、文字型で指定してくださいね。特定のフォルダからメールを取り出してワークシートに書き出すコードでは、ItemsオブジェクトとFoldersオブジェクトのItemメソッドを使って、受信メールフォルダからメールを取り出してみましょう。このような書き出し用のワークシートを準備しました。書き出し対象のサブフォルダがコチラ。3件のメールがありますね。Nextのループ分の中でitemsオブジェクトの中身を、フォルダ内にあるメールの件数分だけ取り出して、ワークシートに書き込む...というコードです。実行結果このコードを実行してみると...この通り、SubFolder1フォルダ内のメールがワークシートに書き出されていますね。最後に今回は、受信メールフォルダのサブフォルダ内にあるメールの内容を、ワークシートに書き出す方法をご紹介しました。あるプロジェクトやイベントの出欠連絡などのメールの内容をワークシートに纏めないといけない!といった時にとっても便利ですよ。それでは、最後までお読みいただきありがとうございました!連載目次:エクセルVBAでOutlookを操作してみよう!エクセルVBAでOutlookのメール作成、送信などの操作をする方法をご紹介しています。メーラーとして便利なOutlookですが、VBAと組み合わせて更に便利に使ってしまいましょう。投稿者プロフィールノグチフリーランスPG・SE元製造子会社SE。業務システム保守・導入両方やった経験をお伝えすることで、少しでもシステムや手作業に悩まされる人が減ればいいなぁと日々夢見ております。「コミュニティ+講座」形式で継続性&教え合える環境も提供。!ノンプログラマーがプログラミングスキルを身に着ける支援ををするコミュニティ。セミナー・もくもく会・Facebookグループのサポートで「自らで学び続ける力をつける」支援、「教え合うことで学びの価値を上げる」場の提供をしています。【エクセルVBA】VBEにコメントブロックのショートカットキーを設定する方法エクセルVBAの業務効率を上げるためのVBEのテクニックについてお伝えしています。今回はVBEにコメントブロックと非コメントブロックのショートカットキーを独自で設定する方法についてお伝えします。「初心者でもわかる!エクセルVBAのクラスモジュールの活用法」をテーマに、その使い方と便利さについてシリーズでお伝えしていきます。今回は、エクセルVBAで最も簡単なクラスを作る方法をお伝えしていきます。2018.12.18Excel・VBA活用術エクセルVBAでマクロの実行完了と処理時間をチャットワークに通知する方法エクセルVBAでHTTP通信を行う方法についてあれこれお伝えしています。今回は一つ便利な使用例として、マクロの実行完了についてチャットワークへの通知してお知らせする方法についてお伝えします。2017.12.05Excel・VBA活用術エクセルVBAによる運用業務で人為的ミスを減らす4つの方法エクセルVBAを運用業務で活用されている方必見!人為的ミスを大幅に減らす4つの方法を紹介します。エクセルVBAはメイン処理に偏らず人為的ミスを想定したコーディングが業務効率化に繋がります。【エクセルVBA】最初っから知っておきたいVBEのショートカットキーまとめエクセルVBAの業務効率を上げるためのVBEのテクニックとして、ショートカットキーの活用は外せませんよね。今回は、エクセルVBAを始めるなら最初っからマスターしておきたいショートカットキーをまとめてお伝えします。2017.02.16Excel・VBA活用術エクセルが驚愕の効率アップ!範囲選択のオススメショートカットExcelでお仕事する機会が多い方なら絶対に覚えてほしい範囲選択のショートカットを3つ紹介します。マスターすると驚くほどExcel業務のスピードが上がります。おまけで練習用Excelファイルも提供しています。「コミュニティ+講座」形式で継続性&教え合える環境も提供。詳細・お申込はこちら隣ITを応援する当ブログを「応援したい!」「役に立ったよ!」というお気持ちを、コチラからお支払いただくことができます。日々更新の活力倍増いたします。※PayPalアカウントが必要です。※金額は変更可能です。Platform23HTML・CSS32iPhone・アプリ29Monaca・スマホアプリ開発7PC全般・Windows86PowerPoint・VBA28Python87RPA1VBScript15Vue.js・JavaScript13WEBサービス・クラウド68WordPress・ブログ88Word・VBA42コミュニティ・イベント108セミナーのお知らせ11チャットワーク72データ分析・アクセス解析40仕事・生産性・働き方73動画配信8商業出版21起業・フリーランス72電子書籍・Kindle3運営会社プランノーツは"IT×働き方改革"をお手伝いする会社です。「コミュニティ+講座」形式で継続性&教え合える環境も提供。詳細・お申込はこちら隣ITを応援する当ブログを「応援したい!」「役に立ったよ!」というお気持ちを、コチラからお支払いただくことができます。日々更新の活力倍増いたします。※PayPalアカウントが必要です。※金額は変更可能です。Platform23HTML・CSS32iPhone・アプリ29Monaca・スマホアプリ開発7PC全般・Windows86PowerPoint・VBA28Python87RPA1VBScript15Vue.js・JavaScript13WEBサービス・クラウド68WordPress・ブログ88Word・VBA42コミュニティ・イベント108セミナーのお知らせ11チャットワーク72データ分析・アクセス解析40仕事・生産性・働き方73動画配信8商業出版21起業・フリーランス72電子書籍・Kindle3運営会社プランノーツは"IT×働き方改革"をお手伝いする会社です。RowSourceプロパティとAddItemメソッド2020.01.21GASでGoogleスライドのSlideオブジェクトの概要とその取得方法2020.01.162020.01.24Facebookページいつも隣にitのお仕事タイトルとURLをコピーしました。