Outlook のメールをExcel ファイルにエクスポートする（3 の簡単な方法）

Outlook で大量のメールを管理していると、すぐに手に負えなくなってしまうことがあります。メールデータを分析したり、レポートを作成したり、やり取りを追跡したり、重要な情報をアーカイブする必要が生じることも少なくありません。そんなときは、Outlook のメールをExcel にエクスポートすれば、送信者・件名・日付・本文などの情報を構造化された形式で整理でき、分析や管理がぐっと簡単になります。本ガイドでは、Outlook のメールをExcel にエクスポートするための実用的な方法を3 つご紹介します。

なぜOutlook のメールをExcel にエクスポートするのでしょうか？

Outlook メールをExcel ファイルにエクスポート

• 方法1：インポート/エクスポート機能でメールをエクスポート
• 方法2：VBA コードでメールをすばやくエクスポート
• 方法3：Kutools for Outlook でメールをすばやくエクスポート

Excel でのメールデータ分析をさらに活用するためのヒント

まとめ

なぜOutlook のメールをExcel にエクスポートするのでしょうか？

Outlook のメールをExcel にエクスポートすれば、大量のメールデータを効率的に扱えるようになり、さまざまなメリットが得られます。

主なメリットは以下のとおりです：

• より優れたデータ分析– Excel の数式、ピボットテーブル、チャートを使って、コミュニケーションパターンを効果的に分析できます。
• メール追跡 – 顧客へのメールやプロジェクトの連絡、サポートチケットを簡単に監視できます。
• Outlook を開き、ファイル
• レポート作成 – メールデータから構造化されたレポートを簡単に生成できます。
• 簡単にフィルターと並べ替え– Excel なら、フィルターや並べ替え、検索を素早く行えます。

たとえば、メールをエクスポートして、次のような内容を迅速に分析できます：

• 誰が最も多くメールを送っているか
• 1 日または1 か月に何通のメールを受け取っているか
• どの顧客が最も頻繁に連絡してくるか

Outlook メールをExcel ファイルにエクスポート

以下に、Outlook からメールをExcel ファイルにエクスポートするための信頼性が高く実用的な3 つの方法をご紹介します。Outlook の組み込みエクスポート機能を使う方法、VBA でプロセスを自動化する方法、あるいはKutools for Outlook などのサードパーティ製ツールでより素早く処理する方法——それぞれが異なるレベルの利便性と柔軟性を提供します。ご自身のワークフローとエクスポートしたいメールの規模に最も適した方法をお選びください。

方法1：インポート/エクスポート機能を使ってメールをExcel にエクスポートする

Outlook には、メールを CSV ファイルにエクスポートできる組み込みのインポート／エクスポートウィザードが搭載されています。この CSV ファイルはExcel で開けます。

1. Open Outlook and go to File>Open & Export>Import/Export.
   
2. 「インポートとエクスポートウィザード」で、ファイルにエクスポートを選択し、次へをクリックしてください。
   
3. カンマ区切り値をファイル形式として選択し、次へをクリックしてください。
   
4. エクスポートしたいメールフォルダー（例：受信トレイ）を選択し、次へをクリックしてください。
   
5. 参照ボタンをクリックして、保存先を指定し、ファイル名を入力してください。
   
6. 最後のファイルにエクスポートダイアログボックスで、「フォルダーから『電子メールメッセージ』をエクスポート」にチェックが入っていることを確認してください。
   

7. 最後に、完了ボタンをクリックして、エクスポートを開始しましょう。

エクスポートが完了したら、出力された CSV ファイルを開いてください。メールは行と列に整理されて表示され、分析や整理がより簡単になります。

方法2：VBA コードを使ってメールをExcel にエクスポートする

メールを頻繁にエクスポートする場合は、VBA による自動化を利用すれば保存時間を短縮でき、メールを直接Excel にエクスポートできます。

1. Outlook でAlt + F11を押して、VBA エディターを開きましょう。
2. 挿入 > 標準モジュールをクリックし、次のコードをウィンドウにコピー＆ペーストしてください：

Sub ExportEmailsWithBodyToExcel()

    Dim olApp As Outlook.Application
    Dim olNs As Outlook.NameSpace
    Dim olFolder As Outlook.MAPIFolder
    Dim olSubFolder As Outlook.MAPIFolder
    Dim olItems As Outlook.Items
    Dim olMail As Object
    
    Dim xlApp As Object
    Dim xlWB As Object
    Dim xlWS As Object
    
    Dim i As Long
    Dim savePath As String
    Dim mailboxName As String
    Dim folderName As String
    
    '===== Modify here =====
    mailboxName = "skyyang@extendoffice.com"      'Specify the mailbox name
    folderName = "Inbox"                         'Specify the folder name (e.g., Inbox or Sent Items)
    savePath = "C:\Users\Public\OutlookEmails.xlsx"   'Specify the Excel file save path and file name    '=======================
    
    Set olApp = Outlook.Application
    Set olNs = olApp.GetNamespace("MAPI")
    Set olFolder = olNs.Folders(mailboxName)
    Set olSubFolder = olFolder.Folders(folderName)
    Set olItems = olSubFolder.Items
    olItems.Sort "[ReceivedTime]", True
    Set xlApp = CreateObject("Excel.Application")
    xlApp.Visible = True
    Set xlWB = xlApp.Workbooks.Add
    Set xlWS = xlWB.Sheets(1)
    xlWS.Cells(1, 1).Value = "No."
    xlWS.Cells(1, 2).Value = "Subject"
    xlWS.Cells(1, 3).Value = "Sender Name"
    xlWS.Cells(1, 4).Value = "Sender Email"
    xlWS.Cells(1, 5).Value = "To"
    xlWS.Cells(1, 6).Value = "CC"
    xlWS.Cells(1, 7).Value = "Received Time"
    xlWS.Cells(1, 8).Value = "Email Body"
    i = 2
    For Each olMail In olItems
        If TypeName(olMail) = "MailItem" Then
           xlWS.Cells(i, 1).Value = i - 1
            xlWS.Cells(i, 2).Value = olMail.Subject
            xlWS.Cells(i, 3).Value = olMail.SenderName
            xlWS.Cells(i, 4).Value = olMail.SenderEmailAddress
            xlWS.Cells(i, 5).Value = olMail.To
            xlWS.Cells(i, 6).Value = olMail.CC
            xlWS.Cells(i, 7).Value = olMail.ReceivedTime
            xlWS.Cells(i, 8).Value = olMail.Body
            xlWS.Cells(i, 8).WrapText = True
            i = i + 1
        End If
    Next olMail
    xlWS.Columns("A:H").AutoFit
    xlWS.Columns("H").ColumnWidth = 80
    xlWS.Rows(1).Font.Bold = True
    xlWB.SaveAs savePath
    xlWB.Close
    xlApp.Quit
    MsgBox "Emails exported successfully!", vbInformation
End Sub

3. F5を押すと、Outlook が自動的にメールをExcel にエクスポートします。

方法3：Kutools for Outlook を使ってメールをExcel にエクスポートする

コーディング不要のソリューションをお探しであれば、Kutools for Outlook を使えば、わずか数回のクリックでメールのエクスポートが驚くほど簡単かつ迅速に実行できます。複雑なエクスポート設定や VBA スクリプトの記述なしに、エクスポートしたいフォルダーを選び、Kutools ですべてのメールを一括エクスポート可能。大量のメールを素早く処理したい場合に特に便利で、プロセスをシンプルかつ効率的に保ちます。

Kutools for Outlook をダウンロードしてインストール後、以下の手順に従ってください：

1. Excel にエクスポートしたいメールフォルダー（受信トレイ、送信済みアイテムなど）を選択してください。
2. 次に、KUTOOLS PLUS>レポート>クイックレポートをクリックします（下記スクリーンショット参照）：
   
3. 「レポートを保存」ダイアログボックスで、まずExcel ファイルの保存先フォルダーを選択します。次に、「ファイル名」フィールドにエクスポートするファイル名を入力し、最後に保存ボタンをクリックしてください。
   
4. エクスポート後、エクスポートしたファイルをすぐに開くかどうか尋ねるダイアログボックスが表示されます。はいをクリックして、すぐにお使いください。
   

指定されたメールフォルダー内のすべてのメールが正常にエクスポートされ、新たに開かれたExcel ワークブックに表示されています。

Excel でのメールデータ分析をさらに活用するためのヒント

Outlook のメールをExcel にエクスポートすれば、Excel の強力なデータ分析機能を活用してメールデータを整理・集計し、有益な情報を効率的に抽出できます。以下のヒントを活用すれば、メール情報の分析がさらにスムーズになります。

まとめ

Outlook のメールをExcel にエクスポートすれば、メールデータをより効果的に整理・管理・分析できます。本ガイドでは、このタスクを確実に達成するための3 つの実用的な方法をご紹介しました。

メールのエクスポートをたまに行うだけであれば、インポート/エクスポートウィザードがシンプルで信頼性の高い選択肢です。プロセスを自動化したい方には、VBA マクロがより高い柔軟性を提供します。ただし、コーディングなしでさらに迅速かつ簡単に大量のメールをエクスポートしたい場合は、Kutools for Outlook を使えばわずか数回のクリックで実現できます。

メールをExcel で整理すれば、コミュニケーションパターンを簡単に分析したり、レポートを生成したり、メール情報をより効率的に管理したりできます。