之前有給大家分享過一篇關于批量将word轉成pdf的檔案，然後将pdf檔案批量按照指定收件人進行郵件發送的文章。文章可以參照：
不同附件的郵件批量發給不同的指定人
批量發送帶PDF附件的郵件
昨天一台灣的網友咨詢了這個問題，同時他也給我分享了他在網上下載下傳的另外一個版本，個人覺得很非常實用，這裡給大家分享一下。文末會分享連結，大家可以下載下傳儲存，萬一以後用得上呢。先來看看怎麼用吧，因為中間确實有個設定需要說一下，不然隻是拷貝代碼的話，還是會出錯。
首先打開Excel檔案，其中有兩個工作表，第一個是發送的清單，裡面的内容很簡單，如下：
工作表 - 發送清單
另外一個工作表就是郵件的标題和正文：
工作表 - 正文
寫好相應的文本後，點選發送郵件按鈕後，自動彈出郵箱用戶端Outlook，界面是這個樣子的：
Outlook發送郵件預覽界面
回到Excel中，會傳回一個對話框顯示有多少封郵件要發送。(我這裡隻寫了一個收件人，是以隻顯示了一封郵件)
Excel中彈出對話框
來看看Excel中的代碼吧。(不懂沒關系，主要明白你拿去之後需要改哪些地方就可以了，非常容易。)
Excel中的代碼
代碼很人性化，基本每一行都有注釋。看看哪些地方值得關注以及後期如果拷貝代碼後需要修改的。
代碼中提到了這句：
代碼中的設定
它這個其實是已經設定好了，如果你要拷貝代碼進行使用的話，完成複制粘貼之後，運作之前需要進行一個設定，否則代碼無法運作，會報錯。設定如圖所示：
點選工具下的引用：
工具 - 引用
調出引用-VBAProject對話框，如下：
引用對話框中的選項
一定要勾選這個：Microsoft Outlook 16.0 Object Library
這個根據你的outlook的版本來，之前那個朋友拷貝後無法運作，就是因為沒有勾選此選項導緻的。一定要看清楚，不要跟上面那個Microsoft Office 16.0 Object Library弄混了，各是各的。
接下來代碼中：
代碼中文字部分
這個發送清單，其實就是工作表的名稱，對應就是Excel中的工作表這個：
對應工作表
再來就是這個“正文”：
代碼中文字部分
對應的是Excel工作表中的這個：
對應工作表
如果你的工作表名稱與代碼中的不一緻，需要進行更改。
其他的類似于Cells(1,2)，意思就是單元格第1行第2列。
我将後面的代碼中進行了一下修改，因為如果不修改的話，郵件會直接發出去，而不是先預覽一下。如果你的郵件相當多，最好先預覽測試一下。沒問題的話，再改回去就可以了。這個地方：
代碼預覽郵件
display就是預覽的意思，如果你無需預覽直接發送，改成下面這樣就可以了：
代碼 - 發送郵件
希望這個工具對大家有用，再次感謝來自寶島台灣網友Kve的分享。
文中提到的連結如下：
連結：https://pan.baidu.com/s/173i3jpJGPy-rvqg3RydM4g
提取碼：wasg
如果本文對你有幫助，請分享給有需要的朋友或你的朋友圈，讓大家一起高效工作。