※ 引述《fumizuki (矇面加菲獅)》之銘言：
: ※ 引述《kaohfun (KJF)》之銘言：
: : 想請問一下有沒有可以增加與刪除sheet的語法，
: : 順便想請問一下在excel內有沒有sheet數的上限呢(我想要有1000個sheet...)
: : 謝謝~
: ThisWorkBook.Sheets.Add Sheet1 '加入到 Sheet1 之前
: ThisWorkBook.Sheets.Add ,Sheet1 '加入到 Sheet1 之後
: Sheet1.Copy Sheet1 '複製到 Sheet1 之前
: Sheet1.Copy Sheet2 '複製到 Sheet1 之後
請問一下
我想要用copy這個指令卻一直沒辦法成功
我如果先用巨集錄製我要做的動作以後會得到以下程式碼
Sheets("Sheet1").Select
Sheets("Sheet1").Copy Before:=Sheets(1)
但是如果我把這一段程式碼寫到程式裡面
或是直接執行我錄製的巨集卻一點反應都沒有
逐行debug發現執行完那一行copy程式碼就會自動結束
請問這是哪裡出了問題呢？
謝謝回答^^
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.112.5.6