[算表] 迴圈計數與範圍設定的搭配

看板Office作者 (Blue night)時間3年前 (2021/04/13 22:50), 編輯推噓0(002)
留言2則, 2人參與, 2年前最新討論串1/1
軟體:EXCEL 版本:2010 如下VBA碼 能否將 "工1" 透過迴圈進行複製 Sub n() '......(以上省略) Set 工1 = Range(Cells(12, "B"), Cells(最末列, "B")) Set 工2 = Range(Cells(12, "C"), Cells(最末列, "C")) Set 工3 = Range(Cells(12, "D"), Cells(最末列, "D")) Sheets(某工作表).Select For i = 1 To 3 XXX = "工" & i '第一次指定為工1 ...以此類推 XXX.Copy: Cells(2, i).Select: ActiveSheet.Paste '↑XXX.Copy將出現錯誤 Next End Sub 謝謝 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 223.140.213.184 (臺灣) ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1618325422.A.AB0.html

04/14 00:37, 3年前 , 1F
放到array裡面,再迴圈array應該可行
04/14 00:37, 1F

04/14 20:15, 2年前 , 2F
謝謝
04/14 20:15, 2F
文章代碼(AID): #1WTQ-kgm (Office)