VBAでGmailの添付ファイルを自動で送信する方法！実践的な手順とポイント解説

2025.10.082026.09.04

VBAを使ってGmailに添付ファイルを送信したいけれど、どう始めたらいいのか悩んでいませんか？「VBAでGmailを操作するのは難しそう」と感じるかもしれませんが、実は基本的な設定を理解すれば、誰でも簡単に自動化できます。このガイドでは、VBAを使ってGmailに添付ファイルを送信する方法を、初心者でも理解できるように解説します。実務に役立つコード例も豊富に紹介しますので、ぜひ最後までご覧ください！

VBAとGmailの連携の基本なぜVBAを使うべきか
VBAでGmailの添付ファイルを送信するための準備
1. Google APIの有効化
2. VBAでGoogle APIライブラリのインポート
VBAコード例Gmailに添付ファイルを送信する
1. Gmail APIに接続する
2. 添付ファイルをエンコードする
VBA Gmail 添付ファイルに関する疑問解決
1. Q1: 添付ファイルのサイズ制限はありますか？
2. Q2: 複数のファイルを添付するにはどうすればいいですか？
まとめ

VBAとGmailの連携の基本なぜVBAを使うべきか

Gmailのイメージ

VBAを使うことで、Gmailの操作を自動化できます。例えば、毎日決まった時間にメールを送信したり、大量のファイルを一括で送ることができるのです。これにより、手動での作業を減らし、業務効率を劇的に向上させることが可能です。

VBAを使ってGmailと連携するためには、GoogleのAPIを活用する必要がありますが、その設定が少し複雑に感じるかもしれません。しかし、正しい手順を踏めば、簡単に自動化できます。次に、実際にVBAを使ってGmailに添付ファイルを送信するための基本的な手順を紹介します。

VBAでGmailの添付ファイルを送信するための準備

VBAを使ってGmailに添付ファイルを送信するには、いくつかの準備が必要です。最初に理解しておくべき点は、VBA単体では直接Gmailを操作できないことです。GoogleのAPIを使って、Gmailの送信機能にアクセスします。以下の準備を整えましょう。

Google APIの有効化

まず、GoogleのAPIコンソールでGmail APIを有効にする必要があります。APIを有効にすることで、VBAからGmailにアクセスできるようになります。手順は以下の通りです。

Google Cloud Consoleにログインします。
新しいプロジェクトを作成し、「Gmail API」を有効化します。
APIキーを生成して、VBAコードに組み込むために必要な認証情報を取得します。

VBAでGoogle APIライブラリのインポート

VBAでは、Google APIを使うためのライブラリをインポートする必要があります。これには、Microsoft XML, v6.0のライブラリを使用するのが一般的です。これにより、VBAでHTTPリクエストを送り、GoogleのAPIと連携できます。

VBAコード例Gmailに添付ファイルを送信する

準備が整ったら、実際にVBAコードを書いていきます。以下は、Gmailに添付ファイルを送信する基本的なコード例です。

Gmail APIに接続する

VBAを使ってGoogleのGmail APIに接続するためのコードは以下のようになります。このコードは、事前に取得したAPIキーを使って、Gmail APIにリクエストを送信します。

vba

Sub SendEmailWithAttachment()

    Dim url As String

    Dim http As Object

    Dim apiKey As String

    Dim message As String

    Dim attachmentPath As String
    ' APIキーとメッセージ内容を設定

    apiKey = "YOUR_API_KEY"

    attachmentPath = "C:\path\to\your\file.txt"
    ' メール内容の設定

    message = "Subject: Test Email with Attachment" & vbCrLf & "This is the body of the email."
    ' HTTPリクエストを作成

    Set http = CreateObject("MSXML2.XMLHTTP")

    url = "https://www.googleapis.com/upload/gmail/v1/messages/send?uploadType=multipart&key=" & apiKey
    ' 添付ファイルを送信するためのコードを追加

    ' ここにファイルをエンコードし、リクエストを送信するコードを追加します

http.Open "POST", url, False http.Send message End Sub

添付ファイルをエンコードする

添付ファイルをGmailで送信する際は、ファイルをbase64でエンコードして送信する必要があります。ここでは、添付ファイルのエンコード部分を実装します。

vba

Function EncodeBase64(filePath As String) As String

    Dim binaryData As String

    Dim byteArray() As Byte

    Dim base64 As Object

    Dim stream As Object
    ' バイナリデータを取得

    Open filePath For Binary Access Read As #1

    ReDim byteArray(LOF(1) - 1)

    Get #1, , byteArray

    Close #1

' Base64エンコード Set base64 = CreateObject("MSXML2.DOMDocument.6.0") Set stream = base64.createElement("base64") stream.DataType = "bin.base64" stream.nodeTypedValue = byteArray EncodeBase64 = stream.text End Function

VBA Gmail 添付ファイルに関する疑問解決

VBAを使ってGmailに添付ファイルを送信する際に直面する可能性のあるよくある疑問とその解決策についても触れておきます。

Q1: 添付ファイルのサイズ制限はありますか？

A1: はい、Gmailには1通のメールに対する添付ファイルのサイズ制限があります。添付ファイルの最大サイズは25MBです。それを超える場合は、Googleドライブを使ってファイルを送信する必要があります。

Q2: 複数のファイルを添付するにはどうすればいいですか？

複数のファイルを送信するためには、ファイルごとにBase64エンコードを行い、メールの本文にそれぞれのファイルを追加します。VBAコードで複数の添付ファイルを扱うには、ファイルの配列を作成し、繰り返し処理を用いて添付を行います。

まとめ

VBAを使ってGmailに添付ファイルを送信する方法は、最初は少し難しそうに感じるかもしれませんが、実際には手順を追っていけば誰でも簡単に実現できます。今回紹介したコードを基に、Gmail APIと連携する方法を学び、実務での効率化に役立ててください。少し手間がかかる部分もありますが、手順を一つ一つ確認しながら進めていけば、自動化の力を最大限に活用できるようになります。