[算表] vba的 sheet的資料存入其他sheet內

看板Office作者 (歷史洪流)時間13年前 (2012/11/15 15:49), 編輯推噓0(006)
留言6則, 3人參與, 最新討論串1/1
軟體: excel 版本: 2007 我想在sheet1修改完的資料後 存入其他的sheet中 所以我建了以下的程式碼 Dim mon As String Dim sName As String mon = Range("B1").Value For I = 1 To 2 'Worksheets.Count If Range("A" & I + 2).Value > "0" Then sName = Range("A" & I + 2).Value Worksheets(sName).Range("B" & mon + 3 & ":" & "J" & mon + 3).Value = ActiveSheet.Range("C" & i + 2 & ":" & "J" & i + 2).Value End If Next 在執行到迴圈內的activesheet值存入worksheets時 錯誤就發生了 查了好久 還是找不到問題 -- ▲▲▲ PTT2 TSFANCLUB ███ ◥◥◥ □︵□ 讓我們收服彼此吧 洨 ~● ╯ ◥ 世界名著 洨王子 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 211.72.239.115

11/15 16:23, , 1F
...mon+3).value的value改copy
11/15 16:23, 1F

11/15 16:23, , 2F
...&i+2).value的.value刪掉,試試
11/15 16:23, 2F

11/15 16:33, , 3F
Range("B1").Value不是數字,造成mon+3會出錯??
11/15 16:33, 3F

11/15 16:34, , 4F
放在A3、A4的資料不是工作表名稱???
11/15 16:34, 4F

11/15 16:35, , 5F
把錯誤訊息po出來吧= =||
11/15 16:35, 5F

11/19 13:26, , 6F
i的大小寫是否有錯?
11/19 13:26, 6F
文章代碼(AID): #1Gf9w3vs (Office)
文章代碼(AID): #1Gf9w3vs (Office)