1樓：宋語雙羨麗
這一句有問題：setrng=sheets(3).range(cells(1+i,1),cells(3+i,4))在你的語句裡，range()的母物件是sheets(3)，而cells()的母物件是當前活動工作表，當sheets(3)不是活動表裡，cells()和range()的母物件交叉混亂了，在vba裡是非法
2樓：不想起名字了
在你的**中 i 沒有定義。
看下面這一段
if n mod 2 = 0 then
i = 1 + worksheetfunction.roundup(n / 2, 0) + worksheetfunction.rounddown((m - 1) / 5, 0) * 4
j = m mod 5
if j = 0 then
j = 5
end if
end if
sheets("sheet5").cells(m, n) = sheets("sheet1").cells(i, j)
迴圈中第一次執行此段**時，當 m mod 2 不等於0時 ，程式並沒有給 i任何值，也就是說這時 i 還是一個 空值時
接下來來執行 sheets("sheet5").cells(m, n) = sheets("sheet1").cells(i, j)
就會出現錯誤
困為 i 沒有值。
應用程式錯誤，應用程式錯誤
這是記憶體讀取錯誤，你先把ie瀏覽器解除安裝了，再用超級兔子的記憶體整理工具整理一下記憶體，再重灌ie瀏覽器，建議 個比較新版本的，或是第三方瀏覽器 如世界之窗瀏覽器 開始 執行 輸入cmd 開啟dos 輸入chkdsk 回車 等待完成，應該能搞定的。應用程式錯誤 30 執行 輸入cmd 回車在命令...
孢子應用程式錯誤，孢子應用程式錯誤
這種情況中毒的可能性很少 我這說的都是解決方法加一點理論，如果你想學理論可以看一下長篇大論，軟體方面就是程式衝突，記憶體被分配為一個個地址，這個地址用到的時候軟體衝突導致記憶體寫不進，就會出 現這種情況。如果你最近裝了什麼新軟體 謝了試試，還有可能是系統有問題了，硬體方面那就是記憶體有問題了，這個地...
vc應用程式錯誤
一般出現這個現象有方面的，一是硬體，即記憶體方面有問題，二是軟體，這就有多方面的問題了。1 微軟ie緩衝溢位漏洞引起 2 記憶體或虛擬記憶體地址使用衝突造成 程式的執行需要分配一定的記憶體地址給程式使用，當程式結束時釋放留出空間讓給新的程式使用，win是多工的系統 有時前程式未結束 又有新的任務開始...