Excel에서 다음 문제를 해결하려고합니다. 시트 1과 시트 2의 두 시트로 작업하고 있습니다. 시트 1에는 데이터 열 (예 : A5에서 A20)이 있습니다. 해당 열의 모든 행을 열 A, Sheet2의 모든 n 번째 행에 붙여 넣거나 참조해야합니다. 이 작업을 수행하는 가장 좋은 방법은 무엇입니까?
내가 달성하려는 것의 예 :
A(n) from sheet 1 -> A(x) sheet 2<br>
A(n+1) from sheet 1 -> A(x+7)5 sheet 2 <br>
A(n+2) from sheet 1 -> A(x+14) sheet 2<br>
A(n+b) from shee 1 -> A (x+b*7) sheet 2<br>
etc...
답변
이 매크로를 AnotherSheet를 실제 이름으로 바꾸어보십시오.
Sub MyMacro()
' Part 1 - first move the range to another sheet
Range("A5:A20").Select
Selection.Copy
Sheets("**AnotherSheet**").Select
ActiveSheet.Paste
' Part 2 - move the cell to right place
Dim r As Range
For Each r In Selection
r.Cut
r.Offset(r.Row * 7).Select
Selection.Insert
Next r
End Sub
답변
VBA가 없으면 이런 식으로 작동합니다-
=IF(MOD(ROW(A1),3)<>1,"",INDEX(Sheet1!A:A,MOD(ROW(A1),3)+INT(ROW(A1)/3)))를 교체 3와 함께 nth당신이 원하는 행과 시트 2에 걸쳐 내려 및 드래그, 또는 무엇이든 시트 이름입니다.