如何使用Excel自動大局部發送郵件

很多時候，我們會遇到這種需要針對不同主體發送不同內容的場景。一般情況下，我們會一個個的逐一去發，但是，如果你需要發送的內容以及附件達到上百個或者更多的時候，再這樣手工去發送就太困難了。

實際上，有更好的辦法，那就是使用程序自動批量發送。理論上，任何程序語言都可以做到，在此，先不考慮其它高級語言的實現辦法，我還是使用最簡單的VBA來做。

1、制作郵件內容列表

在此，需要把郵件里面的主要內容，收件人名稱、收件人郵箱、郵件主題、郵件正文、郵件附件路徑全部放到列表里面，具體如下圖：

2、編寫執行發送郵件的VBA代碼

以下是執行發送郵件的核心代碼部分。在此，使用到了微軟CDO對象。此部分代碼可以適用大部分的郵箱發送，只要修改使用郵箱的相關配置參數即可。在此，我使用的是126的郵箱發送，相關配置參數也是126的。以下代碼中已做了詳細的注釋。

3、發送效果

以下是執行后的具體效果。

4、總結

以上，僅僅做了單次發送的一個案例。如果需要針對大批量的發送，那么只要循環數據列表即可，也就是把發送郵件的主代碼寫入數據列表循環體內即可。這部分就由諸位自行研究修改，出于對各位的負責，還是不打算全部一次性寫完，得給各位朋友留出自行學習的空間。