테이블로 작업 할 때 테이블의 각 기존 행 사이에 빈 행을 삽입하려는 경우가있을 수 있습니다. 이를 수행하는 몇 가지 쉬운 방법이 있습니다. 매크로를 사용하지 않으려면 다음 단계를 따르십시오.

  1. 목록이나 표의 아무 곳에 나 빈 열을 삽입합니다.

  2. 새 열의 첫 번째 테이블 셀에 값 1을, 두 번째 셀에 값 2를 넣으십시오.

  3. 2 단계에서 입력 한 두 개의 셀을 선택하고 채우기 핸들을 사용하여 표의 마지막 셀로 드래그합니다. 이제 연속 된 숫자로 채워진 열이 있어야합니다 (1부터 테이블에 행이 여러 개 있음). 이러한 채워진 셀은 여전히 ​​선택해야합니다.

  4. Ctrl + C를 누릅니다. 그러면 셀이 클립 보드에 복사됩니다.

  5. 마지막 셀 바로 아래의 새 열에 복사 한 셀을 붙여 넣습니다.

이제 3 단계에서 만든 것과 동일한 연속 번호로 채워진 테이블 아래에 다른 셀 범위가 있어야합니다.

  1. 원래 표에서 아무 셀이나 선택합니다.

  2. 데이터 메뉴에서 정렬을 선택하십시오. Excel은 5 단계에서 추가 한 행을 포함하여 테이블을 선택하고 정렬 대화 상자를 표시합니다. (그림 1 참조)

  3. 숫자가 포함 된 새 열을 기준으로 오름차순으로 정렬하도록 지정합니다.

  4. 확인을 클릭하십시오. 테이블이 리조트입니다.

  5. 1 단계에서 추가 한 열을 삭제하십시오.

위의 단계는 Excel이 정렬을 수행하는 방식 때문에 작동합니다.

어떤 이유로 서로 옆에 두 개의 빈 행이있는 경우 (즉, 정렬이 제대로 작동하지 않음) 프로세스를 약간 수정할 수 있습니다. 2 단계에서 맨 위 두 셀에 숫자 1과 3을 입력합니다. 이로 인해 새 열에 홀수가 채워집니다. 4 단계와 5 단계를 수행하는 대신 동일한 영역을 짝수 셀로 간단히 채울 수 있습니다 (첫 번째 셀을 2로 채우고 두 번째 셀을 4로 채 웁니다). 그런 다음 6-9 단계에서 정렬하면 결과 테이블에 적절한 순서로 인터리브 된 행이 있습니다.

매크로 사용에 불리하지 않으면 빈 행을 삽입하는 것이 더 쉽습니다. 영향을 줄 행을 선택한 다음이 매크로를 실행하기 만하면됩니다.

Sub AddBlankRows()

Dim J As Integer     Dim MySelection As Range

If TypeName(Selection) <> "Range" Then Exit Sub     Set MySelection = Selection     Application.ScreenUpdating = False     For J = MySelection.Rows.Count To 1 Step —1         MySelection.Rows(J).EntireRow.Insert     Next J     Application.ScreenUpdating = True End Sub

물론, 행을 추가하는 유일한 목적이 정보를 “공백”하는 것이라면 테이블에있는 각 행의 높이를 높이는 것만으로도 동일한 결과를 얻을 수 있습니다. 데이터 테이블에 추가 정보를 삽입하기 위해 이러한 행이 필요한 경우에만 물리적으로 빈 행을 추가해야합니다.

_ 참고 : _

이 페이지 (또는 ExcelTips 사이트의 다른 페이지)에 설명 된 매크로를 사용하는 방법을 알고 싶다면 유용한 정보가 포함 된 특별 페이지를 준비했습니다.

link : / excelribbon-ExcelTipsMacros [새 브라우저 탭에서 특별 페이지를 열려면 여기를 클릭하세요].

_ExcelTips_는 비용 효율적인 Microsoft Excel 교육을위한 소스입니다.

이 팁 (3011)은 Microsoft Excel 97, 2000, 2002 및 2003에 적용됩니다. 여기에서 Excel (Excel 2007 이상)의 리본 인터페이스에 대한이 팁의 버전을 찾을 수 있습니다.

link : / excelribbon-Easily_Adding_Blank_Rows [쉽게 빈 행 추가].