【Outlook×AI】受信メールを「自動格付け」せよ：NLPで緊急度を判定するプロフェッショナル・アーキテクチャ
現場のエンジニア諸君、Outlookの「ルール」機能でメールを振り分けて満足していないか？ それは、ただの「仕分け」であり「管理」ではない。真の業務自動化とは、受信した瞬間にメールの「重み」を理解し、人間が思考する前にアクションの優先順位を決定することにある。
今回は、Outlookの `NewMailEx` イベントを起点とし、外部AI API（OpenAI API等）を呼び出して受信メールの緊急度をスコアリング、フラグを動的に更新する「次世代メール処理エンジン」の設計思想を伝授する。
—
1. なぜ「同期処理」をしてはいけないのか（設計の鉄則）
多くの初学者が陥る罠は、`NewMailEx` イベント内でAPIを直接叩き、同期的に処理を待たせてしまうことだ。Outlookのイベントループで重い通信が発生すれば、UIはフリーズし、最悪の場合、受信処理全体がスタックする。
プロフェッショナルの設計指針：
1. 非同期的な疎結合： イベント発生時は、メールのIDだけをキュー（または一時テーブル）に投げ、即座に処理を終了させる。
2. シングルトンパターンの回避： 複数のメールが同時に届いた際、インスタンスが競合しないよう、処理の排他制御を考慮する。
3. トークン節約の知恵： 全文をAPIに投げるのは無駄だ。署名や引用文を正規表現で削ぎ落とし、純粋な「本文」のみを抽出するプリプロセスを噛ませる。
—
2. 実装：AI連携による緊急度スコアリング・エンジン
以下のコードは、`ThisOutlookSession` モジュールに配置する核となるロジックだ。
‘ 必要な参照設定: Microsoft WinHTTP Services, Microsoft Scripting Runtime
Option Explicit
Private Sub Application_NewMailEx(ByVal EntryIDCollection As String)
Dim entryIDs() As String
Dim i As Long
‘ 複数のメールが同時に届いた場合、IDはカンマ区切りで渡される
entryIDs = Split(EntryIDCollection, “,”)
For i = LBound(entryIDs) To UBound(entryIDs)
‘ 非同期的に実行するために、別プロセスまたはタスクスケジューラを介するのが理想だが、
‘ 今回はシンプルに処理を分ける構成を示す
Call ProcessEmailWithAI(entryIDs(i))
Next i
End Sub
Private Sub ProcessEmailWithAI(ByVal entryID As String)
Dim mail As Object
Dim http As Object
Dim body As String, prompt As String, score As String
Set mail = Session.GetItemFromID(entryID)
If TypeName(mail) <> “MailItem” Then Exit Sub
‘ 1. 本文抽出（不要な引用は正規表現等で除去すること）
body = Left(mail.Body, 1000) ‘ トークン節約のためトリミング
‘ 2. AI連携（OpenAI API等の例）
Set http = CreateObject(“WinHttp.WinHttpRequest.5.1”)
‘ ※ここにAPIキーとヘッダー設定を記述
‘ ※レスポンスからスコア(1-5)を抽出するロジック
‘ 3. 判定に基づくフラグ操作
Select Case score
Case “5”: mail.FlagRequest = “CRITICAL: 即時対応”
mail.FlagStatus = olFlagMarked
mail.FlagIcon = olRedFlagIcon
Case “4”: mail.FlagIcon = olOrangeFlagIcon
Case Else: mail.FlagIcon = olNoFlagIcon
End Select
mail.Save
End Sub
—
3. 保守性を高めるための「3つの絶対ルール」
コードを書いて終わりではない。業務で動かし続けるためには以下の備えが不可欠だ。
① APIのレートリミット対策
AI APIは高頻度で叩くと制限にかかる。`Sleep` を挟むか、あるいはローカルのSQLite/JSONファイルに「未処理メールキュー」を書き出し、バッチ処理で5分おきにAI判定を行うモデルへの移行を推奨する。
② エラーハンドリングの強制
ネットワークが切断された場合、メールの処理が途中で止まるとそのメールは「永遠に未処理」となる。`On Error Resume Next` ではなく、ログファイルに `EntryID` を記録する仕組みを必ず実装せよ。
③ ユーザー定義プロパティの活用
Outlookには `UserProperties` という強力な武器がある。AIが判定したスコアをメールの属性として保存しておけば、後から「緊急度が高い順に並び替える」といったビューの作成が容易になる。
—
4. 最後に：エンジニアとしての矜持
このシステムの真価は、技術的な実装そのものよりも、「どのメールを緊急とみなすか」という定義をAIにどう学習・指示するか（プロンプトエンジニアリング）にある。
「上司からのメールは常に緊急」「プロジェクトX関連のキーワードが含まれていれば高評価」といったビジネスルールを、AIに的確に教え込めるか。それが、貴殿がただのスクリプト屋か、真の業務改革エンジニアかを分かつ境界線だ。
さあ、退屈なメール仕分け作業を過去のものにし、よりクリエイティブな思考に時間を割くための構築を始めよう。健闘を祈る。
