Excel - 행에서 열로 데이터를 이동하는 매크로

발행물

나는 하나의 열에 데이터를 가지고 있으며이를 예를 들어, 공백 구분 기호로 3 개의 행마다 행으로 바꾸고 싶습니다. 데이터 열은 매번 데이터 양에 따라 다릅니다.

 ABCDEFGHIJ 등 

으로

 ABCDEFGHIJ 등 

해결책

데이터가 A1에 열 머리말이있는 A2와 함께 있다고 가정합니다.

이 매크로 사용해보기

• 결과는 C에서 E 열에 표시됩니다.

 (m) 3 삭제 rng = 범위 (범위 ( "a2"), 범위 ( "a2")) 끝 (( "c : xlDown)) Set c = Range ( "a2") MsgBox c.Address 범위 (c, c.Offset (m - 1, 0)) 셀 복사 (Rows.Count, "c"). End (xlUp) .Offset (1, 0) .PasteSpecial Transpose : = True Set c = c.Offset (m, 0) Loop End Sub 

이 팁을 주신 Venkat1926에게 감사드립니다.