標題: [發問] VBA製作薪資條卡關(已爬文參考麻煩抓錯 [打印本頁]

---

作者: chyong911    時間: 2018-7-30 11:15     標題: VBA製作薪資條卡關(已爬文參考麻煩抓錯

各位前輩好，最近在做簡易人事系統算薪資及產生薪資條部分遇到困難，已經爬文並參考此篇，需求差不多，都是自動產生薪資條並另存PDF檔，因此借用版大的VBA自己查過資料後稍做修改，但仍出現錯誤，想麻煩各位前輩能指教小菜鳥~
參考文章：
http://forum.twbts.com/viewthread.php?tid=17217

目前修改到
For Each xR In Range([1-2薪資計算表!D4], [1-2薪資計算表!D65536].End(xlUp))
這一段就錯誤了Orz

下面附上檔案，謝謝~
javascript:;

---

作者: a5007185    時間: 2018-7-30 12:50

本帖最後由 a5007185 於 2018-7-30 12:52 編輯

回復 1# chyong911


你的主要問題在於 Range的定義出現了問題，
Range([1-2薪資計算表!D4], [1-2薪資計算表!D65536].End(xlUp))
改成以下方式就可以正常輸出了~

1. Range("D4:D" & cells(Cells.Rows.Count, 4).End(xlUp).row)

複製代碼

請參考附檔。
[attach]29087[/attach]

---

作者: a5007185    時間: 2018-7-30 12:56

回復 1# chyong911

抱歉，上面的附件有誤，
請以此份為準。

[attach]29088[/attach]

---

作者: chyong911    時間: 2018-7-30 18:07

回復 3# a5007185


    太感謝A大了!!!我已經成功完成，感謝您解決了我嘗試了一整天仍然失敗的痛苦阿QQ

---

作者: a5007185    時間: 2018-7-31 07:44

回復 4# chyong911


    哈哈，我想這是每個人曾經都有過的惡夢~

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)