[問題] Excel VBA 寄信給對應的收件人

看板Office作者 (Johnson)時間10年前 (2016/04/30 16:16), 10年前編輯推噓0(0014)
留言14則, 2人參與, 最新討論串1/1
(若是和其他不同軟體互動之問題 請記得一併填寫) 軟體:excel 2010 小弟想寫一個vba將固定的格式內容寄信給對應的人 原始檔長這樣 https://imgur.com/WMgFAnF
收件人都在在F欄 要把表頭加上第一列的內容寄給第一列的收件人(AAA@gamil.com) 像這樣https://imgur.com/hk4IvVd
(左圖就是AAA收到的內容) 然後表頭不動 只加上第二列的內容寄給第二列的收件人(BBB@gmail.com) 像這樣https://imgur.com/3NI44Ka
(左圖就是BBB收到的內容) 執行巨集後 一直依此類推執行到最後一列 該如何寫呢?感謝各位神人 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 36.226.171.203 ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1462004182.A.A78.html ※ 編輯: kiss970621 (36.226.171.203), 04/30/2016 16:18:44

04/30 17:32, , 1F
04/30 17:32, 1F

05/01 01:28, , 2F
.To = r.Offset(, 5) 這部分有點不懂 5是移動到F欄位
05/01 01:28, 2F

05/01 01:29, , 3F
那逗號前面的數值應該填多少?
05/01 01:29, 3F

05/01 01:39, , 4F
不管填多少執行都會跑出 執行階段錯誤
05/01 01:39, 4F

05/01 01:40, , 5F
'-2147417851(80010105)':
05/01 01:40, 5F

05/01 01:40, , 6F
'To'方法('MailItem'物件) 失敗
05/01 01:40, 6F

05/01 01:41, , 7F
麻煩s大解惑><
05/01 01:41, 7F

05/01 01:44, , 8F
0或省略表示列的部分無移動
05/01 01:44, 8F

05/01 01:49, , 9F
執行到 .To = r.Offset(, 5)就會跑出如上說的錯誤
05/01 01:49, 9F

05/01 01:50, , 10F
我有哪個地方沒有調整到嗎?><
05/01 01:50, 10F

05/01 01:58, , 11F
作業系統為win10嗎?是的話請參考http://goo.gl/Fw8KKw
05/01 01:58, 11F

05/01 02:04, , 12F
解決方式應為https://imgur.com/2IIoadk
05/01 02:04, 12F

05/01 02:05, , 13F
因無win10,原po試試看是否可解決
05/01 02:05, 13F

05/01 11:13, , 14F
成功了!!!!soyoso大太神了....小弟感激不盡
05/01 11:13, 14F
文章代碼(AID): #1N96dMfu (Office)
文章代碼(AID): #1N96dMfu (Office)