Re: [算表] 特定儲存格範圍複製到多個工作表(VBA)
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
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 2 篇):
Office 近期熱門文章
PTT數位生活區 即時熱門文章