엑셀 여러줄 추가하기 / 여러행 추가 / 두줄 간격으로 빈행 추가하기
본문 바로가기

Interests [관심사]/Other Infor

엑셀 여러줄 추가하기 / 여러행 추가 / 두줄 간격으로 빈행 추가하기

엑셀을 하다보면 두줄 간격으로 혹은 세줄 네줄 간격으로 빈 행을 추가해야하는 경우가 생깁니다

데이터가 많지 않다면 손으로 행추가를 하면 그만이지만 데이터 양이 많다면 어떻게 하는게 좋을까요 !!!


텍스트파일은 맨 아래에 있어요 !!!


엑셀 여러행 추가하는 방법, 두줄 혹은 세줄 네줄 간격으로 빈 행을 추가하는 방법을 알려드리겠습니다.


우선 데이터를 가지고 와봅시다.



Alt + F11을 눌러서 VBA Editor 창을 열어줍니다.

(Microsoft Visual Basic for Applications)


좌측 상단 창을보면 Module 이라고 적힌 모듈들이 있습니다.

혹시 없거나 사용하시던 모듈이 있으시다면 삽입 - 모듈 을 통해서 새로운 모듈 추가가 가능합니다.



그리고 보기와같이 코드를 넣어줍니다.

(첨부파일에 넣어놓았습니다.)



... To 1 Step - 1 부분의 1을 2로 고쳐주면 두 줄을 건너띄고 행을 추가하게 됩니다. 아래에서 또 설명드릴게요.


그리고 F5 혹은 상단의 녹색 삼각형 아이콘을 클릭하여 실행합니다.



1이라고 입력했을 떄 모습입니다.



이제 두 줄씩 띄워볼까요?

2를 입력하면 2줄씩 행이 추가됩니다.



이제 두 줄을 건너뛰고 행을 추가해볼까 합니다.

그렇다면 매크로 소스코드를 수정해야 하는데요 ~


  For i = Cells(Rows.Count, 1).End(3).Row To 1 Step -2


위와같이 Step - 1 을 Step - 2 로 고쳐주세요.

그리고 행을 2행을 입력해주면???



으잉? 두줄씩 띄워지긴 했지만 맨 위에는 한행만 건너뛰게되었네요 ~

이럴때는

데이터 아래에 한 줄을 더 추가해주세요! 

총 개수가 홀수가 되게끔요! (의미없는 값으로)



그리고 다시 2줄을 실행시킵니다.



짜잔~ 이제 2개가 한 세트가되어서 두줄 씩 띄어지게 되었네요 ^^

맨 마지막의 의미없는 데이터는 지워줍니다.


엑셀 여러 행 추가하기 어렵지않아요 !!!!



엑셀 자동 행삽입 매크로.txt