[問題] Excel sheets複製到其它活頁簿 VBA
軟體: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
06/11 19:38, 1F
→
06/12 16:23, , 2F
06/12 16:23, 2F
Office 近期熱門文章
PTT數位生活區 即時熱門文章