Re: [算表] 特定儲存格範圍複製到多個工作表(VBA)

看板Office作者 (windknife18)時間15年前 (2010/10/05 13:37), 編輯推噓1(100)
留言1則, 1人參與, 最新討論串2/2 (看更多)
Sub marco1() Dim index As Integer, start As Integer Dim rCount As Integer Application.ScreenUpdating = False For index = 2 To ThisWorkbook.Sheets.Count With ThisWorkbook.Sheets(index) ThisWorkbook.Sheets(1).Range("A3:E10").Copy _ Destination:=ThisWorkbook.Sheets(index).Range("A3") End With Next index Application.ScreenUpdating = True MsgBox "Succ!" End Sub ※ 引述《a47512345 (風的追逐)》之銘言: : 軟體:EXCEL : 版本:2007 : 先謝謝上次熱心的L大出手相救,希望你能再相救一次XD : 問題: : 我有以下工作表2001,2002,1712,.....(非規則) : 我想將第一個工作表(2001)的特定儲存格範圍A3:E10 : 複製到其他的工作表的A3:E10上 因為工作表很多的關係 非常費力 : 請問有人能幫我寫一下VBA程式碼嗎~先感謝你的幫助 感謝>"< -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.131.84.79

10/05 15:26, , 1F
10/05 15:26, 1F
文章代碼(AID): #1CghcsKh (Office)
文章代碼(AID): #1CghcsKh (Office)