'設定收件人位址(從通訊錄表的「e-mail位址」欄位中獲得)
objmail.from = "[email protected]"
objmail.to = worksheets("郵箱位址").cells(rowcount, 2).value
'設定郵件主題
objmail.subject = worksheets("郵件內容").cells(1, 2).value
'設定郵件內容(從通訊錄表的「內容」欄位中獲得)
objmail.body = worksheets("郵件內容").cells(2, 2).value
'設定附件(從通訊錄表的「附件」欄位中獲得)
'objmail.attachments.add cells(rowcount, 4)
'自動傳送郵件
objmail.send
'銷毀objmail物件
set objmail = nothing
next
'銷毀objoutlook物件
set objoutlook = nothing
'所有電子郵件傳送完成時提示
msgbox (rowcount - 2) & "封郵件傳送成功!"
end sub
使用Excel巨集來群發郵件或工資條
private sub 全自動傳送郵件 click 要能正確傳送並需要對microseft outlook進行有效配置 on error resume next dim rowcount,endrowno dim objmail as mailitem 取得當前工作表與cells 1,1 相連的資料...
在C 中利用Excel做高階報表
visual studio.net 自2001年2月問世以來,受到越來越多人的喜愛,c 做為主力軍,集vb delphi的簡單和vc的簡鍊與強大於一體,更是讓許多人愛不釋手,紛紛倒向它的懷抱。通常的軟體都要用到資料庫,資料庫中必然要用到報表,在visual studio.net中自帶了乙個水晶報表,...
利用python在excel裡面直接使用sql函式
我們一般在excel裡面是使用資料連線屬性裡面寫sql語句,或者vba裡面利用ado元件執行sql語句。新版的excel裡面帶上了power query的功能也可以使用odbc.datasource 和odbc.query 函式寫sql語句。今天講一下利用python直接在excel裡面使用xlwi...