- 帖子
- 11
- 主題
- 5
- 精華
- 0
- 積分
- 21
- 點名
- 0
- 作業系統
- Win7
- 軟體版本
- Office 2010
- 閱讀權限
- 10
- 性別
- 男
- 註冊時間
- 2012-5-28
- 最後登錄
- 2014-2-10
|
[發問] EXCEL VBA由OFFICE 03轉去2010就有問題
本帖最後由 kennet 於 2012-5-28 12:19 編輯
之前用03版本時還好好的, 但公司電腦一轉用2010版本時行那個VBA便出現問題了
"執行階段錯誤1004": 應該程式或物件定義上的錯誤- ' Delete 小計
- Sheets("Summary").Select
- x = 4
- Do Until word = "小計"
- word = Right(Cells(x, 5), 2)
- x = x + 1
- Loop
- Cells(x - 1, 5).Delete
- x1 = 4
- Do Until word1 = "小計"
- word1 = Right(Cells(x1, 4), 2)
- x1 = x1 + 1
- Loop
- Cells(x1 - 1, 4).Delete
- x2 = 4
- Do Until word2 = "小計"
- word2 = Right(Cells(x2, 3), 2)
- x2 = x2 + 1
- Loop
- Cells(x2 - 1, 3).Delete
- x3 = 4
- Do Until word3 = "小計"
- word3 = Right(Cells(x3, 2), 2)
- x3 = x3 + 1
- Loop
- Cells(x3 - 1, 2).Delete
- x4 = 4
- Do Until word4 = "小計"
- word4 = Right(Cells(x4, 1), 2)
- x4 = x4 + 1
- Loop
- Cells(x4 - 1, 1).Delete
|
|
發表於 2012-5-28 10:20
| 
發表於 2012-5-28 10:51
| 