[問題] Excel sheets複製到其它活頁簿 VBA

看板Office作者 (超級喜歡"石原里美")時間13年前 (2013/06/11 19:04), 編輯推噓0(002)
留言2則, 2人參與, 最新討論串1/1
軟體:Excel 版本:2010 用VBA寫出 把一個活頁簿中某個sheets 複製到 另一個活頁簿中 Sub uscfjh() Dim ab As String Workbooks.Add ab = ActiveWorkbook.Name Windows("活頁簿").Activate Sheets("sdhbsd").Copy After:=Workbooks(ab).Sheets(Sheets.Count) 我用上述的語法試作可以成功 但是我改變工作表名稱 換成我要應用資料後 Sub uscfjh() Dim ab As String Workbooks.Add ab = ActiveWorkbook.Name Sheets.Add After:=Sheets(Sheets.Count) Windows("你好").Activate Sheets("我很好").Copy After:=Workbooks(ab).Sheets(Sheets.Count) End Sub 卻一直出現執行錯誤9 陣列索引超出範圍 在最後一行程式碼 想問 這是什麼原因? -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.125.96.151

06/11 19:38, , 1F
Workbooks(ab).Sheets(Workbooks(ab).Sheets.Count)
06/11 19:38, 1F

06/12 16:23, , 2F
可以了 感謝你
06/12 16:23, 2F
文章代碼(AID): #1HjmHAr_ (Office)
文章代碼(AID): #1HjmHAr_ (Office)