Outlook 友情助陣！使用 VBA 自動寄送包含附件的 Email 給不同收件者 ✉️ | Excel 54

[@joe1456233111]

感謝老師每堂無私的教導 繼續支持！

[@lesliao5284]

謝謝！願意分享的人值得用行動支持與鼓勵🎉🎉🎉

[@GjongChen]

真的太感謝PAPAYA老師了，沒有程式背景但是有這樣的想法，東拼西湊一直沒成功，沒想到在這裡得到了一條龍的答案。而且結合了老師其他的影片，啟發了更多的想法也做成功了。

[@w87652011]

這功能真的超好用，我之前就寫了這組程式，節省下我每天要寄送的郵件所花的時間! 看到老師PO上來覺得很感動!!

[@sciboyGG]

我自己按部就班也完成了多年的願望，而且不只是有程式碼，還從中學習到了基本觀念，真的很感謝。

[@elphau]

這內容真的是太棒了啦！！ 涵蓋面廣、解說又簡單易明。在影片這麼短的時間裡把所有重要的點都講解了一遍。老師您確定您真的不收錢嗎？善心人最帥了！！！

[@papayaclass]

謝謝您的支持與肯定喔 😊

[@emmachang2654]

太好了，我每週都要大量發出資料，總是一封一封發好累，這個省下了我每週兩個小時工作量

[@kuannina4228]

只能說，老師什麼都會 好萬能 人生肯定暢通順遂~

[@peter0530]

謝謝！

[@cboy888fff]

老师讲的太好了，大陆这边都几乎没有这么好的视频

[@april04yao]

超棒的 每個月都有固定的信件要發出

[@tailanghui-hv3hn]

重温，感谢papaya老师的精彩分享，练起来，尝试不看视频操作，这样才能更好的内化老师教的内容

[@weiyan1251]

老師謝謝 我在您這學到很多 我也沒有什麼能回饋您，只能點讚跟訂閱了

[@rachelwang4116]

這頻道只能用浮海救星來形容，感謝世界上所有無私分享的強者。

[@nigihazelnut]

真是相見恨晚 XD 前兩年老闆要一套能夠自動發送提醒的項目 讓我耗費了兩個月的時間 老師真的是由淺入深 又有一些廠商要失業了

[@hungRD]

我的天!!!!剛好工作要使用到這個功能~~~~太謝謝老師啦~~~~~~

[@jasminchen6829]

謝謝老師無私的分享！

[@aaronhunter918]

老師真佛，別人可是把這些內容拿出來賣錢的😂😂 好幾年前想把這個運用在工作上，真的花了好一陣子的時間，也寫了很多代碼才能夠使用，如果這篇早點出來可能當初就不用走那麼多冤枉路了😆😆

[@dullowl2532]

請問如果沒有outlook，用gmail可以嗎？

[@aaronhunter918]

邏輯上是不行，因為是介接local的outlook，不是Web Mail

[@莊豐松-m3h]

感謝無私分享，受益匪淺

[@97133141]

幫上了大忙，非常的感謝。

[@h6ava888]

請問老師 如果收件者要寄多人或群組 加上副本也要多人收件者 要如何設定呢？ 謝謝

[@hoho-dl9of]

終於有這教程了，感謝 👍🏻

[@katecheng2721]

真的是太實用的資訊了！感謝🙏

[@joechuar2606]

博主您好，非常感谢您的高质量教学视频，我按照您的教学操作已经成功了！！！我还有一个不明白的地方，如果我使用.Display预览邮件的话，生成的邮件内容会正常带上我的邮件默认书签，但是如果我使用.send的话，直接发出去的内容不含有我邮件的默认书签，想请教一下如何解决直接发送不含有默认书签的问题。再次感谢博主。

[@廖玉婷-s4l]

謝謝老師的分享~真的很受用! 自己也照老師的教法設定好了一個自動寄信的模組 另外請問如果要寄送2個附件要怎麼設定?

[@nicolaschen4147]

终于开始教编程了!

[@thomas88926]

最近工作上剛好遇到要每日向超多一百個人發有不同附件的電郵，這條片真的來得合時，真的省卻了很多時間，謝謝！ 另外都想請教一下，如果我Outlook上有幾個幾件者帳號，用Excel VBA時能否設定由哪個寄件者帳號發出電郵？

[@chuanhsiaoliu4099]

新增宣告 Dim 寄件人 As Object 新增程式 Set 寄件人 = 小信差.Session.Accounts("你的mail") 或者 在儲存個新增 下拉清單 (列如 F2)，清單輸入你的Outlook mail帳號 Set 寄件人 = 小信差.Session.Accounts(Cells(2, 6).Value) With 新郵件 新增以下程式 .SendUsingAccount = 寄件人

[@thomas88926]

@@chuanhsiaoliu4099 謝謝!

[@a727940]

包含了很多程式觀念... 要有一點基礎才會比較好理解

[@clkinfo]

Thank you so much!!! 老師，非常感謝🙏🏻, but可以同一個客戶，附1個以上 檔案嗎？

[@PR1MQYme2092]

非常非常感謝老師的分享!! 非常實用，瞬間省了許多時間^_^ 另外想請教一下，如果同一家公司，有兩個聯絡窗口需放在同一封email裡 程式碼可以如何改寫呢？ 感謝大神的幫忙🙏

[@chunfaichan8678]

非常實用, 謝謝你

[@anotheryangdianfeng]

谢谢老师分享，小白也能听懂

[@teruchris8592]

剛好最近寫完一部分，就差添加個別檔案！ 感謝🙏

[@applework7381]

非常實用, 感謝!

[@Ken-x9p]

老師可以分享用VBA合併列印的技巧嗎

[@yuansi7052]

神一样的教程。 👍👍👍👍👍👍

[@lemonchannel5730]

讲得真好

[@johnli5843]

感謝老師！

[@yuwenshen3964]

漸漸搞不懂是VBA好用還是Power Automate，哪個好用

[@douglashsu8191]

+1

[@ymca122]

解釋很清楚 非常感謝🙏🏻

[@hjngu6216]

谢谢老师！打算试一试这个新用法🤩

[@jeffreylin1446]

老師 您好 最近剛好需要用到這種功能，看到您的影片，但在VBA設定引用項目那邊就失敗了，我的物件庫裡面竟然沒有Outlook的選項？？想問老師或其他網友是怎麼回事及解決方法 系統是MacOS ，M1版 Excel版本是16.66.1，365版本 是大學授權的

[@freezeelf]

您好 最近我也遇到和您一样的问题 请问有什么办法能够解决吗？谢谢

[@90weker29]

dear 老師 請問該程式碼可以加上判斷式嗎? 比如: 1.如果名稱中有"免稅"這兩個字，則 Set 新郵件 = 小信差.CreateItemFromTemplate("F:\電商\excel練習\練習檔\貨款發票開立通知範本-免稅.msg") 2.如果名稱中沒有"免稅"這兩個字則 Set 新郵件 = 小信差.CreateItemFromTemplate("F:\電商\excel練習\練習檔\貨款發票開立通知範本-應稅.msg") 依照名稱不同，寄信時套用不同的信件範本? 謝謝您

[@chuanhsiaoliu4099]

在名單中多一個欄位 先作判別 "應稅" 或 "免稅" 郵件範本要準備2個 ： 貨款發票開立通知範本-應稅.oft 、 貨款發票開立通知範本-免稅.oft If Cells(列數, 7).Value = "應稅" Then Set 新郵件 = 小信差.CreateItemFromTemplate("F:\電商\excel練習\練習檔\貨款發票開立通知範本-應稅.oft") ElseIf Cells(列數, 7).Value = "免稅" Then Set 新郵件 = 小信差.CreateItemFromTemplate("F:\電商\excel練習\練習檔\貨款發票開立通知範本-免稅.oft") End If

[@user-AIRV]

真的太贊了!

[@hj2931]

謝謝老師分享！

[@sophiachen5907]

老師好,可以請老師分享用gmail寄出郵件嗎?因為如果像是薪資資料,用outlook就會有風險.謝謝老師

[@jaylee8956]

老师，完全按照您的方法试了一下，出现“运行时错误438，对象不支持该属性或方法”，按调试按钮，“Set 新邮件 = 小信差.CreateltemFromTemplate("C:\Users\Administrator\Desktop\***.oft")该条出现黄色背景。 老师，这是什么原因呢？

[@hunglungtseng2771]

謝謝老師分享，請問在key好mail後，要如何執行"檢查名稱"這功能?

[@張欣-u8u]

老師您好發！ 請問老師那邊有實體教學嗎？

[@AutomaticTrashCan]

如果outlook跳出安全警告還要點允許N分鐘應該如何bypass?

[@rainlingo8388]

谢谢分享。请问老师可以教如何加入文件密码然后再发送文件吗？

[@hapybii]

+1

[@snowsnow9314]

Papaya就是我的神🫶🏻

[@賴美蓉-b1p]

這好強喔！！！！！

[@璇兒-t9n]

相見恨晚啊！可惜公司不是用正版軟體，不知道能不能順利操作😂

[@skystar3459]

老師 您好，請問如果檔案是在公用網路主機,要如何附加檔案,還是OUTLOOK還要做特殊設定?

[@qaz940qaz]

想請問一下 vlookup 函數跟 INDEX+MATCH 對我而言功能都是一樣的 這兩個函數究竟有什麼不同, 跟他適用的環境呢 ? 原先是使用 VLOOKUP函數 後來認識了 I+M的函數, 發現回傳資料更直接 我不用管你是第幾欄, 直接指定回傳資料, 也不用框一個大範圍然後慢慢數 現在也都用這個函數在寫 但我實在不明白, 對我而言是相同功能的函數 他實際上有哪些不同呢 ??

[@richardlin9297]

老師想請教一下 我用OFFICE 365 一個EXCEL資料庫(都是一維數據) ，然後在另一個週報中用POWER QUERY對這表做了查詢，並做成周報，但我要傳給我的主管開會使用(裡面有樞紐等等之類的)，但原始一維數據資料要怎麽做成雲端的POWER QUERY，因為純傳檔案，都會顯示無法讀取。 希望能把原始的資料做成本機與線上的同步，以後我就是更新原始數據，週報數據就會自動更新。 另外主管電腦是MAC 已經安裝365了。

[@0117coco]

您好 想請問若是有好幾列資料要一次寄送給同一位寄件者 此VBA語法適用嗎?　應如何定義列數資料某一欄位值相同(如統編)則寄送給同一位寄件者? 謝謝

[@ymca122]

老師我想問如果我同一封郵件同時間要send給2個人 程式要改成怎樣呢？

[@douglashsu8191]

看不太懂這個問題耶~ 影片中好像已經示範可以是同時間要send給6個人了!?

[@shuyutsai6912]

在email欄位中用";"把不同email分開即可，可以加很多個email....

[@sophiachen5907]

請問老師,只能用outlook不能用gmail嗎?

[@me.account9690]

大哥 我打算聯繫你的 就我想學那個滾輪式的ppt 就 可以用滑鼠的滾輪 或著鍵盤上下建 去滑動 然後enter 選擇 去指定頁面

[@marcohuangyo]

請問老師, 我在附加檔案的部份執行一直出錯. .Attachments.Add Cells(列數, 5).Value 這行出錯..不知是那裡有問題

[@natsumealice]

我也是這一條一直出問題 快發瘋

[@ericachen2702]

我也是 一直無法寄附件😢

[@natsumealice]

@@ericachen2702 我後來是用土炮的方法弄的，在後面加上：(這是範例後面CELLS內容跟附檔名要自己改) .Attachments.Add "D:\你的路徑\" & Cells(列數, 6) & ".png"

[@CyrusLee-o1x]

請問有沒有方法，不是以附件形式?

[@edwardkclee]

老師、想問如果傳送很多附件給不同人士、應該如何處理？可否以各人員的folder内有很多附件發送？

[@JL49394]

想學直接用gmail寄信!!!

[@sunnychia4147]

老師 不知道為什麼 它現在有限制語法，無法像老師這樣寫，沒有這些選項

[@JOY036]

請問可以加上有Logo的簽名嗎? 要如何製作?

[@王怡媺-x5n]

卡關了，只有附檔沒有內文 在.send那邊出錯，一直說要指定收件者😭

[@kkc19970826]

老師, 有辦法在郵件裡根據Excel欄位裡的圖片位址插入不同的圖片嗎? 謝謝!

[@ifchang]

您好 outlook 無法另存成郵件項目 想請問存成 html 的話 應該如何變形呢? 不好意思謝謝您

[@wongjason4043]

老師 我發現用.Send的話內文格式會亂掉 用.Display不會

[@张淑佳-g9u]

人不忘初始心,不能忘本啊! 沒有激動之心,沒有感動的心, 就會沒有感恩心。

[@fcdxsdxsza]

如果要每個月1號自動發送要怎麼改呢?

[@MrGuahgu]

請問Macbook版本也可以使用嗎

[@laozuo99]

Good!❤

[@lai5478]

如果當初學JAVA時,教果個有你半水平就好!

[@cheoksoi8055]

按了F5 但不行,显示編輯錯誤,使用者自訂型態尚未定義'

[@jasoncheng9238]

工具->設定引用項目->把Microsoft Outlook相關打勾

[@soulchao7819]

老師, 程式在家中的電腦可以執行, 但因為公司outlook不能用html, 預設為文字, 以致於程式會在.htmlbody那就不執行了 錯誤訊息為 應用程式或物件定義上的錯誤, 請問應如何改呢(查google的都没有結果)?

[@何嘉韻-s2e]

我也有在公司不能使用的困擾,想知道答案

[@chanolivia8920]

為什麼會一直出現"使用者自訂型態尚未定義"? 要怎麼解決?

[@rubyt0312]

我要把木瓜老師娶回家!

[@lewisphan7733]

PAPAYA 你好想问下如果想在excel表格中删除特定符号，该怎么做？eg +-之类的

[@honeymoniya]

老師你好，想請問若不同姓名有不同數量的附件，如王小明有2個附件，林阿杰只有1個附件，這樣VBA的行數是要多加什麼條件呢？

[@evenyang9741]

這個有解答嗎？

[@vironicawu8048]

平常在做分析報告時常需繪製"魚骨圖",但搜詢網路並沒有"魚骨圖"的教學,請您指導,感恩!

[@papayaclass]

嗨，魚骨圖只能自己拉線慢慢畫了，因為 Excel 沒有這項功能 😉 操作的方式你可以參考下面這篇文章喔 www.edrawmind.com/article/how-to-create-a-fishbone-diagram-in-excel.html

[@vironicawu8048]

@@papayaclass 謝謝您!

[@DonHung-n5z]

Cool

[@johnnyclee1676]

請問為什麼我的工具 參考內沒有看到Microsoft Outlook Object Library?

[@papayaclass]

嗯 ~~~~ 應該是會有才對喔，要不要再仔細找找看呢 😉

[@sakurayi1986]

貌似不是列数应该是行数

[@tonytsuihulk]

👍💪🏻

[@0723錄影]

不能套用 失敗了

[@白勝伊]

練習檔內沒有資料

[@papayaclass]

嗨，不好意思因為檔案下載造成您的困擾， 如果您發現檔案解壓縮後是空的話， 您可以考慮安裝 7-Zip 這個免費的解壓縮工具， 這樣解壓縮後應該就會正常了喔 🔹 7-Zip 下載連結：www.developershome.com/7-zip/ 🔹 解壓縮操作方式：share.cleanshot.com/yGN18Q

[@Max-ki9hz]

抄送呢？

[@MaxCang]

第一

[@frankews]

你亂教喔， vba也可以不透過OUTLOOK 寄信喔～ 你要會語法

[@pangmichael]

你好, 這功能好用到不得了, 雖然完成檔案能正常運作, 但在最後仍會有錯誤提示! 希望能請教如何修正🙏🙏不勝感激 Run-time error '-2147352567 (80020009)': Cannot add the attachmemt; no data source was provided.

[@tse-chiunwang2009]

謝謝！

[@李麗華-u1n]

謝謝！