如何用excel批量發郵件自動發郵件
操作方法
(01)1.準備待發送的數據:a.) 開啟Excel,新建b.) 填入下面的內容,第一列:接收人,第二列:郵件標題,第三列:正文,第四列:附件路徑注意:附件路徑中可以有中文,但是不能有空格這裏你可以寫更多內容,每一行作爲一封郵件發出。注意:郵件正文是黑白文字內容,不支援加粗、字型顏色等。(如果你需要支援彩色的郵件,後面將會給出解決辦法)2.編寫宏發送郵件a.) Alt + F11 開啟宏編輯器,選單中選:插入->模組b.) 將下面的代碼粘貼到模組代碼編輯器中:Public Declare Function SetTimer Lib "user32" _(ByVal hwnd As Long, ByVal nIDEvent As Long, ByVal uElapse As Long, ByVal lpTimerfunc As Long) As LongPublic Declare Function KillTimer Lib "user32" _(ByVal hwnd As Long, ByVal nIDEvent As Long) As LongPrivate Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)Function WinProcA(ByVal hwnd As Long, ByVal uMsg As Long, ByVal idEvent As Long, ByVal SysTime As Long) As LongKillTimer 0, idEventDoEventsSleep 100'使用Alt+S發送郵件,這是本文的關鍵之處,免安全提示自動發送郵件全靠它了Keys "%s"End Function' 發送單個郵件的子程序Sub SendMail(ByVal to_who As String, ByVal subject As String, ByVal body As String, ByVal attachement As String)Dim objOL As ObjectDim itmNewMail As Object'引用Microsoft Outlook 對象Set objOL = CreateObject("ication")Set itmNewMail = teItem(olMailItem)With ect = subject '主旨 = body '正文字文 = to_who '收件者 attachement '附件,如果你不需要發送附件,可以把這一句刪掉即可,Excel中的第四列留空,不能刪哦lay '啓動Outlook發送視窗SetTimer 0, 0, 0, AddressOf WinProcAEnd WithSet objOL = NothingSet itmNewMail = NothingEnd Sub'批量發送郵件Sub BatchSendMail()Dim rowCount, endRowNoendRowNo = Cells(1, 1)t'逐行發送郵件For rowCount = 1 To endRowNoSendMail Cells(rowCount, 1), Cells(rowCount, 2), Cells(rowCount, 3), Cells(rowCount, 4)NextEnd Sub3.最終代碼編輯器中的效果如下圖:爲了正確執行代碼,你還需要在選單中選擇: 工具->引用中的Microseft Outlook X.0 Object Library 勾選上(X.0是版本號,不同機器可能不一樣,有具體教程)c.)粘貼好代碼、勾選上上面的東東後可以發送郵件了,點擊上圖A紅圈所示的綠色三角按鈕,會彈出下圖所示的對話框,點執行,就開始批量發送郵件了。d.) 如果你想確認你的郵件是否都發出去了,可以去Outlook的“已發送郵件”檔案夾中檢視,是否有你希望發出的郵件,如果有,恭喜你,收工~~
-
電腦無法訪問指定設備路徑或檔案怎麼辦
關於電腦,現在很多人都在用它,但是有時候在開啟一個程序的時候會發現突然顯示警告說無法訪問指定設備路徑或檔案,下面我來教大家一種方法來解決這個問題。操作方法(01)首先我們要清楚我們安裝的這個程序,也就是軟件安裝位置在哪個盤,如果不清楚就點擊鼠標右鍵,然後開啟...
-
如何利用ps去水印
當你在網絡上看到一張圖片的時候很想儲存下來的時候,卻無奈的發現這張圖片有水印,通常我們使用的方法就是截圖,用裁剪的方式去掉有水印的地方,但是如此就會破壞整張圖的佈局美感,下面就教你如何用ps的填充功能快速去除水印。操作方法(01)相信大家對於如何安裝ps已經很...
-
百度地圖檢視座標
操作方法(01)首先,電腦開啟搜狗瀏覽器,進入百度官網。(02)在上邊我們點擊百度地圖的按鈕。(03)進入地圖上,可以看到當前自己所在城市。(04)點擊地圖下方的“地圖開發平臺”按鈕。(05)在地圖開放平臺頁面,點擊:開發文檔——座標拾取器。(06)然後在地圖中,隨意點擊一個位置,就可以查...
-
英雄聯盟阿卡麗神祕商店鑰匙怎麼使用
神祕鑰匙說明:1、神祕鑰匙由英雄聯盟官方活動發放,暫無其他渠道獲得,敬請留意。2、擁有神祕鑰匙的玩家,在阿卡麗的神祕商店中擁有額外一次重新載入折扣的機會操作方法(01)每位召喚師擁有一次抽折扣的機會,使用鑰匙獲得額外一次抽折扣的機會。檢視鑰匙說明,在泳池派對的世界...