VBAを使うと、メール送信を自動で行うことができます。
2,3通のメールを送信するのであれば手動で問題ありません。
しかし一斉メールを送信したり、メール送信漏れをなくしたりしたい場合は、自動で処理を行う仕組みがあると便利です。
このページでは以下について紹介します。
・メールに複数宛先をいれたり改行したりする方法
・VBAプログラム入りのエクセルをダウンロード可能
上記について紹介します。コードもあわせて紹介しますので、ぜひこのまま読みすすめていってください。
目次
エクセルマクロでメールを送信する事例
イメージをつかんでもらうために、事例を紹介します。
まずは「メールを自動送信する」ということを理解していただければ、と思います。
上記のような一斉送信メールは、以下のページでプログラムを解説しています。
本ページではシンプルなプログラムを紹介します。初学者がイメージを掴むための事例を紹介しているのが本ページと考えていただけると良いです。
エクセルマクロでメールを自動送信するメリット/デメリット
エクセルマクロVBAでメールを自動送信することで、さまざまなメリットがあります。
同時にデメリットもありますので、いくつか紹介します。
アウトルック操作のメリット
2.作業時間が減る
3.仕事のミスが減る
1.すぐに始めることができる
Excelがインストールされていれば、自ずとOutlookもインストールされているため、新しく開発環境を作る必要がありません。すなわち新しい作業は不要ということです。
もちろん無料で始めることが可能です。
2.作業時間が減る
定型文を自動でメール送信/返信できるようになるので、メールにかける時間がガクンと減らせます。
3.仕事のミスが減る
ボタン一発で、複数人に異なるメールを送ることができるようになります。
そのため、宛先確認やタイプミスによるメールの未送信を減らすことができます。
さらに、動画デモで紹介しているような差し込みでのメールが送信できるようになれば、仕事を仕組み化できるようになります。
その結果、人力でやっている仕事をパソコンに実行させることができます。
アウトルック操作デメリット
2.ウェブ上にコードがあまり出回っていない
何かを学ぶときは、メリットだけではなく、デメリットもあります。
1.コード編集に難しさを感じることがある
VBAでアウトルック操作を学ぶとき、オブジェクトの知識が乏しい場合、コード編集に難しさを感じるでしょう。
VBAでエクセルを操作をするときと違って、アウトルック独自のオブジェクトが多数出てきます。これが、混乱する原因になります。
その結果、途中で挫折してしまう…ということがあります。
2.ウェブ上にコードがあまり出回っていない
アウトルック操作は、エクセルVBAの外部連携というカテゴリーです。
外部アプリケーションを操作することは、レベルの高い機能ですので、ウェブ上にコードが出回っていません。
もちろんこれが使えるようになれば、VBAを使いこなす人の中でもかなりレベルの高い層に仲間入りできます。
このページでは、仕事で活用できるサンプルをページ下部で紹介しています。ぜひご活用ください。
アウトルックでメール送信する前に参照設定を変更する
エクセルVBAでoutlookのメールを操作するためのプログラミングに入る前に、以下の参照設定を変更しておく必要があります。
1.VBEを開いて頂いて、「ツール」→「参照設定」
2.Microsoft Outlook 15.0 Object Libraryのライブラリにチェックを入れて、OKをクリック
詳細の設定方法は以下のページで紹介しています。
通常メールとHTMLメールのサンプルを解説(VBAのファイルダウンロード)
2. HTMLメールを自動送信
このページでは上記の2種類のサンプルを紹介します。
なお以下で紹介する2つのVBAプログラムをそのまま使いたい人は、以下のフォームからダウンロードできます。
登録したメールアドレスへVBA入りのファイルを送信します。
本プログラムの内容をそのまま使用可能です。ぜひお仕事にお役立てください。
類似マクロの紹介
このサイトでは、本事例に似たようなメール送信マクロとして以下を紹介しています。
興味があれば、ぜひご覧ください。
VBAでハイパーリンク設定したHTMLメール送信
複数ファイルを添付してメール送信
それでは以下でプログラムを詳しく解説します。
1. 通常のoutlookメールを自動送信
今回紹介するプログラムの概要は以下です。
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 |
'プログラム0｜変数設定の指定 Option Explicit 'プログラム1｜プログラム開始 Sub SendMail1() 'プログラム2｜シート設定 Dim ws As Worksheet Set ws = Worksheets("Sheet1") 'プログラム3｜Outlookアプリケーションを起動 Dim outlookObj As Outlook.Application Set outlookObj = CreateObject("Outlook.Application") 'プログラム4｜Outlookメールを作成 Dim mymail As Outlook.MailItem Set mymail = outlookObj.CreateItem(olMailItem) 'プログラム5｜メール情報を設定 mymail.BodyFormat = 3 'リッチテキストに変更 mymail.To = ws.Range("B2").Value 'To宛先 mymail.CC = ws.Range("B3").Value 'cc宛先 mymail.BCC = ws.Range("B4").Value 'bcc宛先 mymail.subject = ws.Range("B5").Value '件名 'プログラム6｜メール本文を設定 Dim mailbody As String, credit As String mailbody = ws.Range("B6").Value credit = ws.Range("B7").Value mymail.Body = mailbody & vbCrLf & vbCrLf & credit 'プログラム7｜メールにファイルを添付 Dim attachedfile As String attachedfile = ThisWorkbook.Path & "\" & ws.Range("B9").Value If Not attachedfile = "" Then mymail.Attachments.Add Source:=attachedfile End If 'プログラム8｜メール表示 mymail.Display 'メール表示(ここでは誤送信を防ぐために表示だけにして、メール送信はしない) 'プログラム9｜メール保存 mymail.Save '下書き保存 'プログラム10｜メール送信 mymail.Send 'プログラム11｜オブジェクト解放 Set outlookObj = Nothing Set mymail = Nothing 'プログラム12｜プログラム終了 End Sub |
それでは、以下でプログラムを詳しく説明していきます。
プログラム0｜変数宣言の指定
|
1 |
Option Explicit |
「Option Explicit」とは、変数宣言を強制するためのものです。
予期しないエラーを防止できるため「Option Explicit」を入力することを習慣化することを推奨しています。
詳しい説明は以下のページで紹介しています。
プログラム1｜プログラム開始
|
1 |
Sub SendMail1() |
「Sub SendMail1()」のプログラムを開始することを意味します。
VBAではプロシージャという単位でプログラムを呼び出します。
プロシージャの構文は下記となっています。
|
1 2 3 |
Sub プロシージャ名() '実行プログラム End Sub |
「Sub」で始まり「End Sub」で終わります。
「Sub XXXX」の「XXXX」の部分がプロシージャ名です。
このプロシージャ名はあらゆる文字（アルファベット、ひらがな、漢字、数字など）が使用可能です。
ただし、プロシージャ名の先頭は数字を入れるとエラーとなります。
あとで見たときに、「何のプログラムだったのか？」とならないようにするためです。
なお、「()」の中には何も記入されていません。これは引数なしという意味です。
初心者の内は、引数ということが分からなくてもVBAプログラムを書くことは可能です。
興味があれば、「VBA 引数」で検索して調べてみてください。
プログラム2｜シート設定
|
1 2 |
Dim ws As Worksheet Set ws = Worksheets("Sheet1") |
「Sheet1」をwsとして扱います。
プログラム3｜Outlookアプリケーションを起動
|
1 2 |
Dim outlookObj As Outlook.Application Set outlookObj = CreateObject("Outlook.Application") |
「Dim OutlookObj As outlook.Application」で、outlook起動用の変数をOutlookObjとして変数定義を行います。
「Set OutlookObj = CreateObject(“Outlook.Application”)」でOutlookを起動します。
プログラム4｜Outlookメールを作成
|
1 2 |
Dim mymail As Outlook.MailItem Set mymail = outlookObj.CreateItem(olMailItem) |
Outlookメールを作成し、myMailとします。
ここで作成したOutlookメールはPCの裏側で動いているので、PC画面上には出てきません。
プログラム5｜メール情報を設定
|
1 2 3 4 5 |
mymail.BodyFormat = 3 mymail.To = ws.Range("B2").Value mymail.CC = ws.Range("B3").Value mymail.BCC = ws.Range("B4").Value mymail.subject = ws.Range("B5").Value |
ここではエクセルのB2~B5の入力値をメール情報として設定します。
メールフォーマット
myMailのフォーマット設定を3にする。1,2,3を設定することができ、以下の3つから選択することができます。
1. プレーン
2. HTML
3. リッチテキスト
今回はファイルを添付することも想定するため、3:リッチテキストのフォーマットを選択します。
メール情報
mymail.CC：セルB3 →CC宛先
mymail.BCC：セルB4 →BCC宛先
mymail.subject：セルB5 →件名
実際にDebug.Printでチェックしてみます。
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 |
mymail.BodyFormat = 3 'リッチテキストに変更 mymail.To = ws.Range("B2").Value 'To宛先 mymail.CC = ws.Range("B3").Value 'cc宛先 mymail.BCC = ws.Range("B4").Value 'bcc宛先 mymail.subject = ws.Range("B5").Value '件名 Debug.Print "mymail.to: " & mymail.To Debug.Print "mymail.CC: " & mymail.CC Debug.Print "mymail.BCC: " & mymail.BCC Debug.Print "mymail.subject: " & mymail.subject >>>mymail.to: fastclassinfo@gmail.com >>>mymail.CC: fastclassinfo@gmail.com >>>mymail.BCC: fastclassinfo@gmail.com >>>mymail.subject: 【重要】パソコンスキルの教科書 添付します |
上記のようになります。
このようにエクセルに入力された値をメール情報として設定できます。
プログラム6｜メール本文を設定
|
1 2 3 4 |
Dim mailbody As String, credit As String mailbody = ws.Range("B6").Value credit = ws.Range("B7").Value mymail.Body = mailbody & vbCrLf & vbCrLf & credit |
credit：セルB7 →署名
メール本文(mymail.Body)を、「本文 + 改行 + 改行 + 署名 + 改行」で作成します。
実際にDebug.Printでチェックしてみます。
|
1 2 3 4 5 6 7 8 9 10 11 12 |
Dim mailbody As String, credit As String mailbody = ws.Range("B6").Value credit = ws.Range("B7").Value mymail.Body = mailbody & vbCrLf & vbCrLf & credit & vbCrLf Debug.Print mymail.Body >>>Reportを添付します。 >>>ご確認ください。 >>> >>>パソコンスキルの教科書 運営者 >>> |
これで本文を作成できました。
なお、メール本文の最後に挿入している改行は添付ファイルを正しく入れ込むためです。
添付ファイルがメールの最後に表示された方が見た目が良いので、改行を入れています。
プログラム7｜メールにファイルを添付
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 |
<img src="http://fastclassinfo.com/wp-content/uploads/2021/04/005-15-1024x637.jpg" alt="" width="1024" height="637" class="aligncenter size-large wp-image-8203" /> セルB9のファイル名の添付ファイルを読み込み、メールに添付します。 本事例ではセルB9に「Report.pdf」と入力しています。 よって、エクセルファイルの保存フォルダの「Report.pdf」を添付ファイルとしてメール添付します。 Debug.Printでattachedfileに格納されているデータを確認します。 <pre> Dim attachedfile As String attachedfile = ThisWorkbook.Path & "\" & ws.Range("B9").Value If Not attachedfile = "" Then mymail.Attachments.Add Source:=attachedfile End If Debug.Print attachedfile >>>D:\Website_パソコンスキルの教科書\308_VBA_Outlook\01_Outlook基本操作\VBA\report.pdf |
上記のように、変数attachedfileはフォルダパスを取得しています。
ここでは「mymail.Attachments.Add (ThisWorkbook.Path & “\” & attachedfile)」としているため、エクセルファイルと同じフォルダに「添付したいフォルダ」が存在しないとエラーが出ます。ご注意ください。
添付ファイル不要の場合は、空欄にする
もし添付ファイルがない場合は、セルB9は空欄にしておきます。
セルB9が空欄であれば、プログラム6でattachedfileに値が入らないため、メール添付のプログラムは省略されます。
プログラム8｜メール表示
|
1 |
mymail.Display |
「myMail.Display」でmyMailで作成したメールを表示します。
表示する目的は誤送信を防ぐためです。確認せずにメール送信するのは不安なので、敢えて表示しています。
プログラム9｜メール保存
|
1 |
mymail.Save |
プログラム8で表示したメールを保存します。ここは保存する必要もないので、以下のようにコメントアウトしてスキップさせるのもありです。
|
1 |
'mymail.Save 「'」でコメントアウトすると、プログラムをスキップできる |
プログラム10｜メール送信
|
1 |
mymail.Send |
プログラム8で表示したメールを送信します。
メール保存と同じようにコメントアウトすることで、メール送信は実行させないするのはありです。
|
1 |
'mymail.Send |
確認なしで送信するのに抵抗がある人は上記のようなコメントアウトを行うことをお勧めします。
プログラム11｜オブジェクト解放
|
1 2 |
Set outlookObj = Nothing Set mymail = Nothing |
メール作成で使用したOutlookのオブジェクト解放を行います。
プログラム12｜プログラム終了
|
1 |
End Sub |
プログラム1と対になるプログラムです。プログラム終了させる記載です。
「End Sub」を読み込むと、プログラムが終了します。
2. HTMLメールを自動送信
HTMLメールを使うと、色やフォントを変えることができます。
HTMLを使うと、よりメールを装飾をしやすくなるメリットがあります。
プログラムの全体像は以下です。
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 |
'プログラム0｜変数設定の指定 Option Explicit 'プログラム1｜プログラム開始 Sub SendMail2() 'プログラム2｜シート設定 Dim ws As Worksheet Set ws = Worksheets("Sheet1") 'プログラム3｜Outlookアプリケーションを起動 Dim outlookObj As Outlook.Application Set outlookObj = CreateObject("Outlook.Application") 'プログラム4｜Outlookメールを作成 Dim mymail As Outlook.MailItem Set mymail = outlookObj.CreateItem(olMailItem) 'プログラム5｜メール情報を設定 mymail.BodyFormat = 3 'リッチテキストに変更 mymail.To = ws.Range("B2").Value 'To宛先 mymail.CC = ws.Range("B3").Value 'cc宛先 mymail.BCC = ws.Range("B4").Value 'bcc宛先 mymail.subject = ws.Range("B5").Value '件名 'プログラム6｜メール本文をHTML形式にして、フォント変更やリンクをセット Dim mailbody As String, credit As String, link As String, strstyle As String, url As String mailbody = ws.Range("B6").Value credit = ws.Range("B7").Value link = ws.Range("B8").Value url = "<a href=""" & link & """>" & link & "</a>" strstyle = "<font=""ＭＳ Ｐ明朝"" color=""#FFFFFF"">" & mailbody & "</font>" & url mymail.HTMLBody = strstyle & "<br>" & "<br>" & credit & "<br>" 'プログラム7｜メールにファイルを添付 Dim attachedfile As String attachedfile = ThisWorkbook.Path & "\" & ws.Range("B9").Value If Not attachedfile = "" Then mymail.Attachments.Add Source:=attachedfile End If Debug.Print attachedfile 'プログラム8｜メール表示 mymail.Display 'メール表示(ここでは誤送信を防ぐために表示だけにして、メール送信はしない) 'プログラム9｜メール保存 mymail.Save '下書き保存 'プログラム10｜メール送信 mymail.Send 'プログラム11｜オブジェクト解放 Set outlookObj = Nothing Set mymail = Nothing 'プログラム12｜プログラム終了 End Sub |
プログラム6を除いて、通常メールのプログラムと同じ
プログラム6を除き、通常メールで解説したプログラムと同じです。
よって、プログラム6に限定して説明を行います。
プログラム6｜メール本文をHTML形式にして、フォント変更やリンクをセット
|
1 2 3 4 5 6 7 |
Dim mailbody As String, credit As String, link As String, strstyle As String, url As String mailbody = Replace(ws.Range("B6").Value, vbLf, "<br>") credit = Replace(ws.Range("B7").Value, vbLf, "<br>") link = ws.Range("B8").Value url = "<a href=""" & link & """>" & link & "</a>" strstyle = "<font face=""ＭＳ Ｐ明朝"" color=""#FF0000"">" & mailbody & "</font>" & "<br>" & url mymail.HTMLBody = strstyle & "<br>" & "<br>" & credit & "<br>" |
credit：セルB7 →署名
link：セルB8 →URL
セル内の改行をそのままメールに反映させる
|
1 2 |
mailbody = Replace(ws.Range("B6").Value, vbLf, "<br>") credit = Replace(ws.Range("B7").Value, vbLf, "<br>") |
HTMLメールを作成すると、エクセルのセル内改行がキャンセルされてしまいます。
そこで、上記のようにセル内改行(vbLf)をHTML改行
に置換します。
HTML装飾を行う
|
1 2 3 |
url = "<a href=""" & link & """>" & link & "</a>" strstyle = "<font face=""ＭＳ Ｐ明朝"" color=""#FF0000"">" & mailbody & "</font>" & "<br>" & url mymail.HTMLBody = strstyle & "<br>" & "<br>" & credit & "<br>" |
メール本文(mymail.HTMLBody)はリンクやフォントをHTMLに変換します。
実際にDebug.Printでチェックしてみます。
|
1 2 3 4 5 6 7 8 9 10 11 |
Dim mailbody As String, credit As String, link As String, strstyle As String, url As String mailbody = Replace(ws.Range("B6").Value, vbLf, "<br>") credit = Replace(ws.Range("B7").Value, vbLf, "<br>") link = ws.Range("B8").Value url = "<a href=""" & link & """>" & link & "</a>" strstyle = "<font face=""ＭＳ Ｐ明朝"" color=""#FF0000"">" & mailbody & "</font>" & "<br>" & url mymail.HTMLBody = strstyle & "<br>" & "<br>" & credit & "<br>" Debug.Print mymail.HTMLBody >>><font face="ＭＳ Ｐ明朝" color="#FF0000">Reportを添付します。<br>ご確認ください。</font><br><a href="https://fastclassinfo.com/">https://fastclassinfo.com/</a><br><br>パソコンスキルの教科書 運営者<br> |
上記のとおりHTMLの記載を作成することができました。
HTMLメールを作成
最終的に、上記のようなHTMLで装飾されたメールを作成することができます。
VBAでハイパーリンクを設定したOutlookメール作成
以下のページでVBAでハイパーリンクを設定したOutlookメールを作成するプログラムを紹介しています。
もし重要度、開封確認を取得したり、送信日時を取得したいなら
重要度の設定方法
以下の3つの内、1つを選択すれば、メールの重要度を設定できます。もし設定したいなら、上記で紹介している「コード4｜メール本文を改行して署名を入れる」のコードに追加します。
|
1 2 3 4 5 6 7 8 |
'[1]メールの重要度を高くする mymail.Importance = olImportanceHigh '[2]メールの重要度を普通にする mymail.Importance = olImportanceNormal '[3]メールの重要度を低くする mymail.Importance = olImportanceLow |
これらをプログラム7とプログラム8の間に入力することで、重要度を設定できます。
開封確認の設定方法
開封確認をしたい場合は、以下の方法で設定できます。もし設定したいなら、上記で紹介している「コード4｜メール本文を改行して署名を入れる」のコードに追加します。
|
1 2 3 4 5 |
'[1]開封確認を設定する mailItemObj.ReadReceiptRequested=True '[2]開封確認を設定しない mailItemObj.ReadReceiptRequested=False |
これらをプログラム7とプログラム8の間に入力することで、重要度を設定できます。
送信日時の取得方法
エクセルマクロでoutlookメールを送信するとき、送信日時をエクセルに出力したい場合があります。そのときの方法を紹介します。
|
1 |
ws.Range("B10").Value = Now '送信日時を取得 |
上記をプログラム10とプログラム11の間に入力することで、セルB10に送信日時を出力するように設定することが可能です。
VBAでExcel×Outlookの作業を効率化する事例
事例2｜時間指定してOutlookメール送信・配信
事例3｜Gmailのメールを送信
事例4｜Excel×Outlookでリマインドメール配信
事例5｜Excel×Outlook｜集計表をメールに貼り付け
事例6｜受信メールをエクセルに一覧にする(添付ファイルも保存)
事例7｜サブフォルダのメールをエクセルに一覧にする
事例8｜受信メールの条件を絞って取得
事例9｜VBAでメルマガスタンドを作ってみた
事例1｜顧客別にメールを自動送信
VBAを使うとExcelデータを読み込み、メールを個別送信することができます。
たとえばメールアドレスを含んだ顧客リストに対して、個別にメールを通知するプログラムを紹介します。
しかもただ単純にメール送信するだけではなく、顧客の名前を入れたり、ファイル添付したりすることもできます。
・ファイルがあればOutlookメールに添付する
・顧客の名前をメールに差し込む
このようなプログラムを以下で詳しく紹介していきます。
またファイルをダウンロードできるようにもしているので、興味がある人はご覧ください。
ちなみに、このプログラムと以下のPDF作成マクロと組み合わせることで、差し込み印刷で作成したPDFをOutlookに添付してメール送信することも可能です。
事例2｜時間指定してOutlookメール送信・配信
エクセルマクロVBAで時間指定してOutlookメールを送りたい場合、配信タイミングの機能を使います。
配信タイミングをVBAで自動設定すれば、夜中でも早朝でも好きな時間にメールを送信できるようになります。
事例3｜Gmailのメールを送信
VBAを使えば、Gmailを操作してメールを自動送信することができます。
本記事ではExcel VBA×Outlookの事例ですが、中にはExcel VBA×Gmailで作業を効率化したい人もいるかもしれません。
この方法を使えば、Outlookがなくても、エクセルから自動でメールを送ることができます。
以下の記事ではプログラムも含めて紹介しています。
事例4｜Excel×Outlookでリマインドメール配信
仕事をしていると、顧客や社内向けにリマインドメールを送信したいときがあります。
たとえば、期日までにアンケートを提出していない人だけにメールを送信する場合です。
しかし1通1通リマインドメールを作成していると、作業に時間がかかってしまいます。
またメール作成中に入力ミスをしてしまうと、誤った情報を相手に送ってしまいかねません。
そのため単純作業にもかかわらず、確認作業などの負荷が大きくなってしまいます。
このときExcel VBAとOutlookを活用してリマインドメール作成を自動化すると処理を効率化できます。
事例5｜Excel×Outlook｜集計表をメールに貼り付け
仕事をしていると、エクセルのデータ表をOutlookに貼り付けて送信したいときがあります。
しかしこのような作業は、VBAによって自動でエクセル表を貼り付けてメール送信することが可能です。
このページでは、毎週の集計データを定期的にチームに送信するVBAプログラムを紹介します。
事例6｜受信メールをエクセルに一覧にする(添付ファイルも保存)
Excel VBAを使うことで、Outlookで受信したメールをエクセルに一覧にすることができます。
またOutlookの各メールに添付されている資料を、フォルダに自動保管することも可能です。
事例7｜サブフォルダのメールをエクセルに一覧にする
上記の事例では、受信トレイ内のメールをExcelに一覧にする方法を紹介しました。
しかし、実はサブフォルダでも同様のことが可能です。
以下の事例ではOutlookのサブフォルダ内のメールをExcelに一覧にする方法を紹介しています。
事例8｜受信メールの条件を絞って取得
Outlookに定期的に通知されるファイルを入手したいときがあります。
たとえば、社内の基幹システムからCSVファイルを取得したい場合です。
実際、私のこのページで紹介したVBAプログラムを使って、社内データ管理システムから毎日送信されるCSVデータを自動で所定フォルダに保管させていました。
これにより、Outlookメールから毎日のCSVファイルを探す手間をなくすことができました。
このページでは、定期通知されるOutlookメールに添付されているファイルを自動保管するVBAプログラムを紹介します。
事例9｜VBAでメルマガスタンドを作ってみた
顧客に定期的にメール配信をしたいときがあります。
このような作業は、外部のメルマガスタンドを購入して対応する人も多いはずです。
しかしお金をかけずともVBAを使ってExcel×Outlook×Textでツールをつなぎ合わせることで自作することが可能です。
このページでは、VBAでメール定期通知システム(メルマガ配信スタンド)を作ってみます。
Excel VBAについて詳しく理解したいなら
VBAを活用すると、仕事を効率化できる幅を広げることができます。
たとえば私が実際にVBAを活用して効率化してきた作業は以下の記事で紹介しています。
興味がある人は以下の記事もご覧ください。
動画でも解説しています。
エクセルマクロVBAで出来ることを15の事例で紹介｜日常業務をラクにするヒントを見つけよう！
(音声が小さいので、ボリュームを上げてご覧いただければと思います)
VBAの勉強方法
私はプログラミング初心者からVBAを勉強を始めて少しずつレベルアップしていきました。
成長の過程は以下で紹介しています。
学習の過程では、意識すべきポイントがあります。
特に独学の場合だと、勉強を優先してしまい、肝心な実践を疎かにしがちです。
私の経験では、実践から逆算した勉強が必要だと考えています。
目指すべきは会社でお金をもらいながら勉強することです。
要はVBAを仕事の一つとして上司に認めてもらうのです。
そうすればわざわざ高いお金を払って勉強をする必要がなくなります。
しかも作業を自動化して、会社やチームに貢献しつつ、自らのスキルアップできます。
そのために必要な考え方を以下で紹介しています。
とはいえ、プログラミング初心者でVBAについて知識ゼロの人もいるはずです。
いきなり会社でVBAで使うことさえ、とてつもなくハードルが高く見えてしまうものです。
その場合は、VBAの基本について学ぶ必要があります。
たとえば車の運転も慣れてしまえば、たいしたことではありません。
しかし教習所で運転の基本を学び、免許を取得することで、公道で運転できるようになります。
VBAも同じです。VBAに免許はありませんが、まずは基本を学ばないことには会社で使えるレベルにはなりません。
実際に私もプログラミング初心者のときは、動画を見たり書籍を読んだりして勉強しました。
今はオンラインの教材で無料で学習できるものも多いです。
上記のリンクでは、私の経験から勉強にオススメの教材を紹介しています。
興味がある人はご覧ください。
VBAを自分で書けるようになる
さて、本記事で紹介したマクロを利用すれば、作業の自動化が可能になります。
しかしデメリットもあります。それはカスタムできないことです。
なぜなら、色々な要望が増えるからです。
この動画を見たとき、「もっと○○ができるのでは？」や「ここはなんとかならないのか」と感じる人は少なくないはずです。
例えば、「他の条件を付け加えたい」や「日付毎に条件を変えたい」といった要望が出るかもしれません。
このような要望を満たすには、マクロを勉強して自力でマクロを編集できるようになる必要があります。
もし、自力でマクロを編集できるようになれば、今より仕事の効率はグッと上がります。
実際、私も自力でマクロを書けるようになってからは、仕事の生産性が一気に上がりました。
他の人が30分～1時間かけて行う仕事が、ボタン一つで終わらせることができるようになったのです。
その結果、周囲からの信頼も増し、仕事で高い評価を得られるようになりました。
ただ、要望に応えるようになるためには、マクロを学ぶ必要があります。
まずは無料でマクロを勉強してみる
ウェブや書籍で勉強すれば、マクロを習得できると考えている人は少なくありません。
しかし、仕事で使えるマクロを習得したいなら、仕事で使える部分に特化した教材で学ぶことをお勧めします。
なぜなら、ウェブや書籍には仕事に関係しない部分まで提供していることが多いからです。
例えば、マクロ初心者なのに配列を学ぼうとする人がいます。実は配列なしでも仕事で使えるマクロを書くことは可能です。
しかし、マクロ初心者ほど「全ての知識が必要だ」と考えて、無駄な学習に時間を使ってしまうのです。詳しくは、こちらの記事で紹介しています。
そこで、私がお勧めするのは仕事に直結するマクロ教材です。とくにお勧めするのは、こちらの無料オンライン動画です。
なぜなら、仕事に直結する部分に絞って、エクセルマクロを学ぶことができるからです。
マクロの作り方・考え方から解説しているので、教材をしっかり学べばここで紹介したマクロをゼロから書けるようになります。
マクロ初心者が、仕事に直結したいマクロを学ぶなら、まずはこちらの無料オンライン動画を試すのがいいです。
興味がある人は、まずは無料でエクセルマクロの勉強を始めてみてください。
もっと学びたいと感じたら、さらに深く勉強をしてみることをお勧めします。