1樓：
你最好在**開頭加上option explicit強制顯式宣告模組中的所有變數。
上面**的第七行rownuml = rownum1 - 2是不是拼寫錯了。rownuml變成負數的話，自然報錯。
2樓：匿名使用者
問題的關鍵應該是：
起始設定 rownuml =l 中的這個 l 沒有定義起始值，所以 do 迴圈中的迴圈條件 sheets("調整分錄").cells(rownuml, l) = "" 中如果 l = 0 ，出現報錯就很正常了！
建議樓主明確定義 rownuml =l 中的 l 值！
3樓：匿名使用者
出現問題的原因大概就是拼寫錯誤，現在修改如下
option explicit '這個**強制要求變數必須定義，可以進行基本的拼寫檢查
sub 除錯()
dim rownum as integer
dim rownum1 as integer
dim i as integer
rownum1 = 1 '注意l和數字1的拼寫是否有錯
do while rownum1 < 10000
if sheets("調整分錄").cells(rownum1, 1) = "" then
sheets("調整分錄").cells(rownum1, 1) = rownum1 - 2
rownum1 = rownum1 - 2
exit do
else
rownum1 = rownum1 + 1
end if
loop
for i = 1 to rownum1
rownum = 6
do while rownum < 51
if sheets("調整分錄").cells(i + 1, 2) = sheets("彙總資產負債表").cells(rownum, 1) then
sheets("彙總資產負債表").cells(rownum, 7) = sheets("調整分錄").cells(i + 1, 3) + sheets("彙總資產負債表").
cells(rownum, 7)
end if
if sheets("調整分錄").cells(i + 1, 4) = sheets("彙總資產負債表").cells(rownum, 1) then
sheets("彙總資產負債表").cells(rownum, 8) = sheets("調整分錄").cells(i + 1, 5) + sheets("彙總資產負債表").
cells(rownum, 8)
end if
rownum = rownum + 1
loop
next i
end sub
excel vba執行時出現1004錯誤，如何修改？
4樓：匿名使用者
i = range("b65536").end(xlup).row - 9 '在已使用區域最末一行新增
修改成i = range("b65536").end(xlup).row +1
5樓：匿名使用者
把dim定義全部放到sub 插入最末行()前面
6樓：匿名使用者
-9刪除後，沒有問題
excelvba執行時錯誤1004 此名稱已被使用 怎麼修改一下
7樓：zzllrr小樂
這是因為重新命名時，名字重名了。
遇到重名時，忽略繼續執行即可。
sub 按a列資料批量修改表名稱()
dim i%
for i = 2 to sheets.counton error resume next
sheets(i).name = cells(i + 1, 1).text
next
end sub
excel vba**現執行時錯誤"1004「：應用程式定義或物件定義錯誤，怎麼解決
8樓：匿名使用者
.range("a2").resize(m, 5)這個是重新定義區域用的，不能值接給它賦值的
9樓：
.range("a2").resize(ubound(crr), 5) = crr
好像可以這樣
急！excel vba**現執行時錯誤"1004「：應用程式定義或物件定義錯誤，該怎麼辦啊？ 10
10樓：匿名使用者
從丟擲異常來看sheet沒有正常被定義到，請確認你的sheet名是否正確，斷點打到sheet名獲取**，看是否能正確獲得！
11樓：匿名使用者
sheetindex是多少？指定的sheet存在嗎？
excel vba 執行時錯誤2147352571無法設定value屬性
執行到 綜合面板.show 才有的錯誤 你就得把 這個窗體的load事件 發出來看看 如何檢視excel的程式語言 excel的程式設計是通過 巨集 來實現的，基於自動化方法，也叫 巨集程式設計 請教如果想對office軟體 主要是excel word 進行程式設計，用什麼程式語言好呢？推薦用vba...
keil uvision 執行時出現的錯誤error use
可能是你把keil安裝在了別的盤例如d 盤，這時你需要修改下儲存路徑，project options for target user run user programs after build rebuild的run 1 把那個c 改成你d 就ok了，再重新小編一下，這樣obj檔案就會有.bin檔案...
visual basic 執行時錯誤
因為我平時也經常用巨集處理資料,所以,個人認為出現這種情況要能有以下幾種原因 檔案的位置,檔名,excel標籤頁的名字 如sheet1,sheet2或是其它名字 是否符合巨集的規範。檔案裡有資料格式與巨集規定的不一致，比如a1單元格中應該是 數值型 的，卻寫了文字字元。或是其它地方複製過來，有空格 ...