☰

Excel 2013에서 복사 및 붙여넣기

tag-icon • tag-icon copy-paste
Excel 2013에서 복사 및 붙여넣기

시트 2의 셀 H47을 시트 500에 복사한 다음 시트 2 H47의 경우 A2인 시트 1에 붙여넣는 방법은 무엇입니까? Sheet3 H47의 경우 A3; Sheet4 H47의 경우 A4; Sheet5 H47용 A5.... Sheet500 H47용 A500

답변1

귀하의 질문을 이해하면 VBA에서 다음을 수행할 수 있습니다.

Sub CopyToManySheets
Dim copyRng as Range
Set copyRng = Range ("Sheet2!$H$47")
copyRng.select
Selection.copy
Dim index as integer
For index = 1 to 500
If Not (IsError (Range ("Sheet" & index & "!A" & index))) Then
Range ("Sheet" & index & "!A" & index).Select
Selection.Paste
Else
End if
Next
Set copyRng = Nothing
Exit Sub

관련 정보