Excel で XLOOKUP を使用して電子メール リンクを作成する方法

VBA を使用して Outlook メールにダイナミック リンクを挿入する

Excel および Outlook 用の VBA スクリプト

Sub SendEmails()
    Dim OutApp As Object
    Dim OutMail As Object
    Dim ws As Worksheet
    Dim Sender As String
    Dim SharefileLink As String
    Dim emailBody As String
    Set ws = ThisWorkbook.Sheets("LinkList")
    For i = 2 To ws.Cells(ws.Rows.Count, "A").End(xlUp).Row
        Sender = ws.Cells(i, 1).Value
        SharefileLink = Application.WorksheetFunction.XLookup(Sender, ws.Range("A1:A9000"), ws.Range("G1:G9000"))
        emailBody = "blah blah blah. <a href='" & SharefileLink & "'>upload here</a>. Thank you"
        Set OutApp = CreateObject("Outlook.Application")
        Set OutMail = OutApp.CreateItem(0)
        With OutMail
            .To = Sender
            .Subject = "Your Subject Here"
            .HTMLBody = emailBody
            .Send
        End With
        Set OutMail = Nothing
        Set OutApp = Nothing
    Next i
End Sub

Excel からの動的リンクを使用して電子メール送信を自動化する

openpyxl と win32com.client を使用した Python スクリプト

import openpyxl
import win32com.client as win32
def send_emails():
    wb = openpyxl.load_workbook('LinkList.xlsx')
    ws = wb['LinkList']
    outlook = win32.Dispatch('outlook.application')
    for row in ws.iter_rows(min_row=2, values_only=True):
        sender = row[0]
        sharefile_link = row[6]
        email_body = f"blah blah blah. <a href='{sharefile_link}'>upload here</a>. Thank you"
        mail = outlook.CreateItem(0)
        mail.To = sender
        mail.Subject = "Your Subject Here"
        mail.HTMLBody = email_body
        mail.Send()
send_emails()

Excel および Outlook を使用した電子メール リンクの自動化に関するよくある質問と回答

1. メール本文内のリンクをクリックできるようにするにはどうすればよいですか?
2. 必ず使用してください。 .HTMLBody 電子メール オブジェクトのプロパティを設定し、HTML アンカー タグを含めます。
3. XLOOKUPの代わりに別の関数を使用できますか?
4. はい、次のような他の検索関数も使用できます。 VLOOKUP または INDEX(MATCH()) あなたのニーズに基づいて。
5. ルックアップ関数でのエラーはどのように処理すればよいですか?
6. 次のようなエラー処理テクニックを使用します。 On Error Resume Next VBA の場合、または Python の try-Except ブロック。
7. コードを書かずにこのプロセスを自動化できますか?
8. はい、Microsoft Flow (Power Automate) などのツールを使用すると、コーディングなしでプロセスを自動化できます。
9. メールをさらにフォーマットすることは可能ですか?
10. はい、さらに多くの HTML と CSS を含めることができます。 .HTMLBody 電子メールのスタイルを設定するプロパティ。
11. 複数の受信者に一度に電子メールを送信するにはどうすればよいですか?
12. スクリプト内の受信者のリストをループし、電子メールを個別に送信するか、配布リストを使用します。
13. 自動メールに添付ファイルを含めることはできますか?
14. はい、VBA では、 .Attachments.Add 方法。 Python では、次を使用します。 mail.Attachments.Add()。
15. 電子メールの送信に関する問題をデバッグするにはどうすればよいですか?
16. コード内のエラーをチェックし、Outlook が適切に設定されていることを確認し、別の電子メール アドレスでテストします。
17. 電子メール送信を自動化するのは安全ですか?
18. 機密情報をハードコーディングしないこと、資格情報を保存するための安全な方法を使用することなど、セキュリティのベスト プラクティスに従っていることを確認してください。