Outlook から特定のExcel ファイルを開くにはどうすればよいですか？

Outlook 作業中に特定のExcel ファイルを頻繁に使う必要があり、その都度開くのが手間だと感じていませんか？本記事では、Outlook から指定したブックを素早く簡単に開く方法をご紹介します。

VBA コードでOutlook から特定のExcel ファイルを開く

---

VBA コードでOutlook から特定のExcel ファイルを開く

次の手順に従えば、以下の VBA コードを使って必要な既定のブックファイルをすぐに開くことができます。

1．Outlook で「Alt」＋「F11」キーを押して、「Microsoft Visual Basic for Applications」ウィンドウを開きます。

2．次に、「挿入」＞「モジュール」をクリックし、表示される「モジュール」ウィンドウに次のコードを貼り付けてください。

VBA コード：Outlook から特定のExcel ファイルを開く：

Public Sub OpenSpecificExcelWorkbook()
    Dim xExcelFile As String
    Dim xExcelApp As Excel.Application
    Dim xWb As Excel.Workbook
    Dim xWs As Excel.Worksheet
   Dim xExcelRange As Excel.Range
    xExcelFile = "C:\Users\DT168\Desktop\split document\kto-data.xlsx"
    Set xExcelApp = CreateObject("Excel.Application")
    Set xWb = xExcelApp.Workbooks.Open(xExcelFile)
    Set xWs = xWb.Sheets(1)
    xWs.Activate
    Set xExcelRange = xWs.Range("A1")
    xExcelRange.Activate
    xExcelApp.Visible = True
End Sub

注：上記コード内のExcel ファイルパス「C：\Users\DT168\Desktop\split document\kto-data.xlsx」は、ご使用の環境に合わせて変更してください。

3．引き続き、「Microsoft Visual Basic for Applications」ウィンドウで「ツール」＞「参照設定」をクリックし、「参照設定 - Project1」ダイアログボックスを開きます。そして、「利用可能な参照設定」リストボックスから「Microsoft Excel Object Library」オプションにチェックを入れてください（下記スクリーンショット参照）。

4．次に、「OK」ボタンをクリックしてダイアログを閉じ、コードウィンドウに戻り、変更を保存してください。その後、このコードを「クイックアクセスツールバー」に追加する必要があります。

5．Outlook のメインインターフェースで、「クイックアクセスツールバーのカスタマイズ」アイコンをクリックし、「その他のコマンド」を選択してください（下記スクリーンショット参照）。

6．「Outlook のオプション」ダイアログボックスで：

• (1．)「コマンドの選択元」ドロップダウンリストで「マクロ」を選択してください。
• (2．)次に、先ほど挿入した VBA コードの名前を選択してください。
• (3．)「追加」ボタンをクリックし、そのコードを「クイックアクセスツールバーのカスタマイズ」リストボックスに追加します。

7．すると、以下のスクリーンショットのようにマクロアイコンが「クイックアクセスツールバー」に表示されます。これ以降は、このボタンをクリックするだけで、指定したExcel ファイルが即座に開きます。