自學VBA,小插曲,適合入門級Outlook發送郵件小工具,快動手試試

小插曲,一起來編寫一個入門級的通過Outlook發送郵件的小工具,代碼其實也就10幾行,非常簡單,適合初學者試手,大家可以按照我下面介紹一步一步來完成。前提條件是需要安裝Outlook和Excel。趕緊往下看吧。

自學VBA,小插曲,適合入門級Outlook發送郵件小工具,快動手試試

工具界面

界面就不用多說了,按鈕是通過在“開發工具”菜單中插入選項上,選擇Button創建菜單。

在Button上綁定宏方法是,右鍵按鈕選擇指定宏,在彈出的宏對話框中選中發送郵件的宏方法,確定即按鈕和宏綁定好了。

自學VBA,小插曲,適合入門級Outlook發送郵件小工具,快動手試試

按鈕綁定宏方法

接下來讓我們看看怎麼編寫代碼,其實代碼很簡單,就十幾行代碼。

第一步:先按Alt+F11 打開代碼編輯器,並右鍵新增一個模塊,如下圖:

自學VBA,小插曲,適合入門級Outlook發送郵件小工具,快動手試試

插入模塊

第二步:編寫一個發送郵件的方法,如下圖

自學VBA,小插曲,適合入門級Outlook發送郵件小工具,快動手試試

實現代碼

一個簡單的通過Outlook發送郵件的簡單工具完成了。

還有一個注意的地方,代碼中Outlook.Application需要引用一個Microsoft的Outlook引用,以Misrosoft Outlook XX Object Library,其中XX是版本,不同的Outlook版本這個地方會有不同,如果不引用運行代碼會報錯。如下圖:

自學VBA,小插曲,適合入門級Outlook發送郵件小工具,快動手試試

引用outlook組件

看看效果吧,點擊首頁的Run按鈕,再打開Outlook看看,是不是郵件已經進去啦。快動手寫一個吧。

自學VBA,小插曲,適合入門級Outlook發送郵件小工具,快動手試試

效果


分享到:


相關文章: