Outlook 2016および2019メッセージで有用なマクロを作成するにはどうすればよいですか？

Microsoft Officeでは、Visual Basic for Applications（VBA）を使用して、Officeの基本機能を強化し、反復的なタスクを自動化することで時間を節約するカスタムプログラムを作成します。これらの小さなVBAプログラムをマクロと呼びます。

このチュートリアルでは、Outlook用のWebで最も完全なマクロ開発リソースを提供したいと思いました。初心者向けのOutlookVBAの基本を探求し、マクロの記述方法を学び、さらに高度で有用なマクロのアイデアを検討します。得られたフィードバックに基づいて、このチュートリアルを実行すると、Outlook用の単純なVBAマクロを開発して実行できるようになります。

• 最初の基本：アクティブなOutlookセッションに単純なカスタムVBAマクロを挿入して保存する方法を学習します。
• 次に、コンピューターにマクロ開発環境をセットアップします。
• OutlookVBAの最も基本的な例を見ていきます。これにより、マクロ開発の基本を理解し、簡単なマクロを作成できるようになります。
• 次に、クイックアクセスツールバーでマクロのショートカットアイコンを定義します。これにより、マクロを簡単に実行できるようになります。
• 最後に、Outlookマクロを有効にしてセキュリティ設定を処理し、コンピューターでプロンプトが表示されたときにコードが実際に実行されるようにします。

Outlookマクロを記録できますか？

他のOfficeアプリとは異なり、Outlookは、ユーザーアクションをキャプチャし、バックグラウンドで必要なVBAコードを自動生成するための単純なマクロレコーダーを提供していません。したがって、独自のカスタム機能をOutlookに追加する場合は、単純なVBAプログラムを作成し、それらをOutlookセッションに組み込む方法を学ぶ必要があります。

注：Officeマクロレコーダーが実際にどのように機能するかを知りたい場合は、MSWordマクロとExcelVBAマクロのチュートリアルを調べることをお勧めします。

OutlookでVBAマクロを作成する

1. まず、MicrosoftOutlookを開きます。
2. 次に、Altボタン+ F11を押します。
3. VBA開発者の統合開発環境（IDE）が開きます。
4. ThisOutlookSessionノードまでプロジェクトツリーを展開します。
5. ThisOutlookSessionを右クリックし、[挿入]をクリックします。
6. 次に、VisualBasicモジュールを挿入します。これを行うには、先に進んでモジュールを選択します。
7. VBAコードをモジュールウィンドウに貼り付けます。
8. [ファイル]をクリックし、[保存]を選択します。
9. 先に進み、開発者環境を閉じます。これにより、Outlookのユーザーインターフェイスに戻ります。

注：VBAの使用を開始するには、いくつかの簡単なコード例を読んでください。不明なリソースからVBAコードをコピーしないでください。

Outlookで開発者タブを設定するにはどうすればよいですか？

Outlookマクロを頻繁に開発する場合は、Office開発環境をセットアップすることをお勧めします。派手ですね。実際、これは非常に簡単な手順です。詳細については、以下をお読みください。

1. Outlookを開き、上部のリボン領域を右クリックして、[リボンのカスタマイズ]を選択します。

1. 開発者エントリを確認し、[ OK]をクリックします。

1. これで、リボンに[開発者]メニューが表示されます。

便利なOutlookVBAの例

メールメッセージを作成する

この単純なスニペットは、プログラムで新しい電子メールメッセージアイテムを作成します。

スクリプトは、Outlookメールアイテムを作成することから始まり、次に、宛先、件名、本文、およびCCフィールドを設定します。最後に、Outlookにメッセージが表示されるので、手動で確認して送信できます。

Public Sub CreateMail() Dim MyEmail As MailItem ' Create a new Outlook message item programatically Set MyEmail = Application.CreateItem(olMailItem) 'Set your new message to, subject, body text and cc fields. With MyEmail .To = "[email protected]" .Subject = "Insert your message subject here" .Body = "Insert your email text body here" .CC = "[email protected]" End With MyEmail.Display End Sub

高度な注意：VBAで新しい電子メールを定義するときに、事前定義されたOutlookテンプレートを使用できます。これを行うには、CreateItemFromTemplateメソッドを利用して、Outlookテンプレートファイルの場所を指定する必要があります（* .oft）。

プログラムでメールを送信する

作成したばかりの電子メールをOutlookに自動的に送信させる場合は、上記のコードに次の行を追加できます。前のスニペットのEndSubステートメントの前に次の行を貼り付けます。

MyEmail.Send

メールにファイルを添付する

多くの場合、ファイルが添付された電子メールの送信を自動化する必要があります。これは、Word文書、Excelスプレッドシート、Powerpointプレゼンテーション、PDF文書などです。プログラムで添付ファイル付きの電子メールを送信する場合は、次のコードを使用します。

#VBA Code Dim MyEmail As MailItem ' Create a new Outlook message item programatically Set MyEmail = Application.CreateItem(olMailItem) 'Define your attachment folder path and file name - modify this part as needed Dim AttachFolder, AttachFile As String AttachFolder = "C:\" AttachFile = "test.txt" 'Set your new message to, subject, body text and cc fields. With MyEmail .To = "recipient@my_server.com; mysecondrecipient@my_server.com" .Subject = "This is your message subject" .Body = "Insert your email text body here" .CC = "cc@my_server.com" .Attachments.Add AttachFolder & AttachFile End With MyEmail.Display End Sub

ノート：

• スニペットに正しいパスと添付ファイル名を設定していることを確認してください。
• この例では、複数の受信者をメールに設定しました。必要に応じて調整してください。

VBAでタスクを作成する

次のスニペットは、Outlookタスクを作成し、それを別の個人に割り当て、タスクの件名と本文を設定します。

Public Sub CreateTask() Dim MyTask As TaskItem ' Create a new Outlook task Set MyTask = Application.CreateItem(olTaskItem) 'Set your new task recipients and information fields With MyTask .Assign .Recipients.Add "taskrecipient@my_server.com" .Subject = "This is your task subject" .Body = "Insert a thorough explanation of your task here." End With MyTask.Display End Sub

HTMLとして保存

電子メールのHTMLへの保存を自動化する方法を尋ねた読者はほとんどいませんでした。以下のコードはまさにそれを実現します。

Public Sub SaveAsHTML() On Error Resume Next Dim MyWindow As Outlook.Inspector Dim MyItem As MailItem Dim FilePath As String FilePath = Environ("HOMEPATH") & "\Documents\" & "\" Dim ItemName As String Set MyWindow = Application.ActiveInspector If TypeName(MyWindow) = "Nothing" Then MsgBox ("Kindly open an email to save") Else Set MyItem = MyWindow.CurrentItem ItemName = MyItem.Subject ' File name will be identical to the message subject With MyItem .SaveAs FilePath & ItemName & ".html", olHTML End With End If End Sub

注：このコードは、Outlookで開いている（受信トレイ/エクスプローラービューではない）電子メールでのみ起動するようにしてください。

Outlookマクロ関連の質問

マクロはOutlookのどこに保存されますか？

使用したマクロが正確に保存されている場所をさまよっている可能性があります。たとえば、personal.xlbファイルまたは特定のスプレッドシートにマクロを保存できるExcelとは異なります。すべてのMicrosoftOutlookマクロは、ファイルシステムの1つのグローバルファイルに保存されます。具体的には、すべてのマクロを保存するファイルの名前はVBAProject.otmです。このファイルは、C：\ users \\ AppData \ Roaming \ Microsoft \ Outlookにあります。

Outlookマクロのショートカットボタン

次のステップは、マクロを簡単に実行できる小さなショートカットボタンを挿入することです。簡単にするために、このボタンをクイックアクセスツールバーに挿入します。

1. まだ開いていない場合は、MicrosoftOutlookを開きます。
2. 上部のOutlookリボンを右クリックし、[クイックアクセスツールバーのカスタマイズ]を選択します。

       注：同様の手順を使用して、クイックアクセスツールバーではなくリボン自体にアイコンを配置できます。

1. 'コンボボックスからコマンドを選択'を押して、マクロを選択します。

1. 作成したマクロを選択し、[追加]をクリックします。

1. [変更]をクリックして、クイックアクセスツールバーボタンのカスタムアイコン画像を定義します。

1. 完了したら、[OK]をクリックします。

Outlookでマクロを有効にする方法は？

この手順はオプションであり、新しく作成したマクロの実行時にエラーメッセージが表示された場合にのみ実行する必要があります。

1. 次は、OutlookがVBAマクロを実行できるようにすることです。既定では、Microsoft Officeはマクロを無効にし、許可しません。したがって、カスタムOutlookマクロを実行できるように、適切なマクロセキュリティを定義する必要があります。
2. Outlook 2016で、リボンの[開発者]をクリックし、[マクロセキュリティ]を選択します。

1. マクロのセキュリティ設定を選択します。
   1. Outlook 2016の場合：デジタル署名されたマクロのみの通知、他のすべての無効化されたマクロ、またはすべてのマクロの通知を選択します。
   2. Outlook 2019の場合：[通知付きのすべてのマクロを無効にする]を選択します。これにより、マクロを実行する前にユーザーの承認を必要とする警告メッセージが投稿されます。
2. マクロのセキュリティ設定を行ったら、[ OK ]をクリックします。

注：現在のセキュリティ設定により、Outlookでマクロを実行できない場合があります。Outlookマクロプロジェクトでマクロが無効になっている場合の手順に関するチュートリアルは次のとおりです。

Outlookマクロの使用方法は？

最後になりましたが、間違いなく重要なことですが、今度は新しく作成したマクロを実行します。

1. クイックアクセスツールバー（画面の左上–ホームメニューの少し上）に移動します。
2. マクロに割り当てたアイコンを押します。
3. Voi'la、（最初の）Outlook VBAマクロを完了して実行しました！

追加のOutlookマクロのアイデア

読者の何人かは、OutlookAutomationのアイデアをさらに指定できるかどうか尋ねました。ここに始めるためのいくつかのものがあります。

1. 受信メッセージの添付ファイルを特定のフォルダに自動的に保存します。
2. CSVファイルから予定のエントリのリストを読み取り、1つ以上のカレンダーに予定を自動的に作成します。
3. 受信メールからの自動タスク/会議/連絡先の作成。
4. 一連の定期的な会議に対する出席者の応答ステータスのステータスを視覚化します。
5. Excel、Word、またはAccessからOutlookの電子メールを送信します。
6. すべての添付ファイルを特定のOutlookフォルダーからコンピューターにダウンロードします。Outlookアカウントの容量が限られている場合は、このマクロを使用して、Outlookで管理する代わりに、大きな添付ファイル（たとえば、5Mbを超える）のみをディスクにダウンロードできます。
7. Outlookの連絡先をAccessデータベースに直接エクスポートします。連絡先をCSVにエクスポートすることが製品で利用可能であることに注意してください。
8. 個人または定期的な予定の会議情報を自動的に更新します。

次のステップ

• 特定のVBAヘルプが必要ですか？カスタム提案については、お気軽にお問い合わせください。