PTT數位生活區 / Office

[問題] VBA求解

看板Office作者時間4月前 (2023/12/29 16:55), 4月前編輯推噓4(4推 0噓 14→)
留言18則, 5人參與, 1年前最新討論串1/1
(若是和其他不同軟體互動之問題 請記得一併填寫) 軟體:Excel 版本:2016 當我執行少數文件時不會跳出問題，但我執行較多文件時會跳出問題，請問如兩張下圖這 個錯 誤要如何解呢？…謝謝！ https://i.imgur.com/y8U8QKH.jpg
https://i.imgur.com/dNE5fCK.jpg
完整程式碼如下 https://drive.google.com/file/d/1J7B-Bl2bTv-kfYAag9ua3SgU_aZqxbxw/view?usp=sha ring -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 42.73.125.87 (臺灣) ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1703840135.A.428.html ※ 編輯: h02158 (42.73.125.87 臺灣), 12/29/2023 17:06:27 ※ 編輯: h02158 (42.73.125.87 臺灣), 12/29/2023 17:15:58
推
12/29 19:43, 4月前 , 1F
第一個狀況，需要指定WB不然再切換WB會發生這狀況
12/29 19:43, 1F
推
12/30 06:45, 4月前 , 2F
1.前面是不是有切換檔案之類的動作？select之前要先切回檔
12/30 06:45, 2F
→
12/30 06:45, 4月前 , 3F
案和工作表。2.新版本不確定，舊版本最後一列是65536。
12/30 06:45, 3F
推
12/31 22:23, 4月前 , 4F
第二點可以用cells(rows.count,1) 來避免新舊版本欄
12/31 22:23, 4F
→
12/31 22:23, 4月前 , 5F
位最大值 不同問題
12/31 22:23, 5F
→
01/01 02:04, 1年前 , 6F
cells(rows.count,2)
01/01 02:04, 6F
→
01/01 02:06, 1年前 , 7F
1的問題 可能n爆了 或者n是0 變成a0
01/01 02:06, 7F
→
01/02 11:20, 1年前 , 8F
ch大,因為VBA是之前離職的員工寫的，我對VBA了解尚淺，只
01/02 11:20, 8F
→
01/02 11:20, 1年前 , 9F
能做小修改，能告訴我第二狀況要把cells(rows.count,1)這
01/02 11:20, 9F
→
01/02 11:20, 1年前 , 10F
個加在哪或是在哪個地方修改嗎？
01/02 11:20, 10F
→
01/02 11:22, 1年前 , 11F
sa大，都是在同一個檔案做動作，只是會在不同工作表切來
01/02 11:22, 11F
→
01/02 11:22, 1年前 , 12F
切去
01/02 11:22, 12F
→
01/02 11:24, 1年前 , 13F
wa大，cells(rows.count,2)這個要加在哪或在哪裡修改呢？
01/02 11:24, 13F
推
01/02 13:34, 1年前 , 14F
把Range("B1048576")改成Cells(Rows.Count, 2)
01/02 13:34, 14F
→
01/02 13:55, 1年前 , 15F
謝謝n大，但我改完還是溢位 https://i.imgur.com/si6Ii9S.
01/02 13:55, 15F
→
01/02 13:55, 1年前 , 16F
jpg
01/02 13:55, 16F
→
01/02 13:55, 1年前 , 17F
01/02 13:55, 17F
※ 編輯: h02158 (42.73.143.45 臺灣), 01/02/2024 14:00:52 ※ 編輯: h02158 (42.73.143.45 臺灣), 01/02/2024 14:01:34 ※ 編輯: h02158 (42.73.143.45 臺灣), 01/03/2024 11:13:12
→
01/03 11:40, 1年前 , 18F
Dim k5 As Long 不要用integer
01/03 11:40, 18F
‣ 更多 h02158 的文章
文章代碼(AID): #1bZec7Ge (Office)
Office 近期熱門文章
更多 近期熱門文章 >>
PTT數位生活區 即時熱門文章
更多 即時熱門文章 >>
‣ 更多 h02158 的文章
文章代碼(AID): #1bZec7Ge (Office)