Note: The other languages of the website are Google-translated. Back to English

Excel에서 한 페이지에 긴 열을 인쇄하는 방법은 무엇입니까?

한 열에 200 행 정도의 긴 데이터 목록이 있고 이제 인쇄해야하지만 인쇄 할 때 왼쪽에 한 열만 있고 많은 공백이있는 약 5 페이지의 용지를 사용한다고 가정합니다. 우편. 한마디로 열 수 있지만 Excel에는이 기능이 없습니다. 용지를 절약하기 위해 긴 목록 데이터를 한 페이지에 어떻게 인쇄합니까?

수식을 사용하여 한 페이지에 긴 열 인쇄

VBA 코드로 한 페이지에 긴 열 인쇄

Excel 용 Kutools로 한 페이지에 긴 열 인쇄

Office 탭 Office에서 탭 편집 및 찾아보기를 활성화하고 작업을 훨씬 쉽게 ...
Excel 용 Kutools는 대부분의 문제를 해결하고 생산성을 80 % 향상시킵니다.
  • 무엇이든 재사용 : 가장 많이 사용되거나 복잡한 수식, 차트 및 기타 항목을 즐겨 찾기에 추가하고 나중에 빠르게 재사용 할 수 있습니다.
  • 20 개 이상의 텍스트 기능 : 텍스트 문자열에서 숫자 추출; 텍스트의 일부 추출 또는 제거 숫자와 통화를 영어 단어로 변환합니다.
  • 병합 도구: 여러 통합 문서와 시트를 하나로; 데이터 손실없이 여러 셀 / 행 / 열 병합; 중복 행과 합계를 병합합니다.
  • 분할 도구: 값을 기준으로 데이터를 여러 시트로 분할합니다. 하나의 통합 문서에서 여러 Excel, PDF 또는 CSV 파일로; 한 열에서 여러 열로.
  • 붙여 넣기 건너 뛰기 숨겨진 / 필터링 된 행; 수와 합계 배경색 별; 개인화 된 이메일을 여러 수신자에게 대량으로 보냅니다.
  • 슈퍼 필터 : 고급 필터 구성표를 만들고 모든 시트에 적용하십시오. 종류 주, 일, 빈도 등으로; 필터 굵게, 수식, 주석으로 ...
  • 300 개 이상의 강력한 기능; Office 2007-2019 및 365에서 작동합니다. 모든 언어를 지원합니다. 기업 또는 조직에 쉽게 배포 할 수 있습니다.

화살표 블루 오른쪽 거품 수식을 사용하여 한 페이지에 긴 열 인쇄


이 문제를 해결하기위한 긴 공식을 소개하겠습니다. 다음과 같이하십시오.

1. 활성 통합 문서의 새 워크 시트에 공식을 입력합니다. =IF(OFFSET(Sheet1!$A$1,(COLUMN()-1)*45+ROW()-1,0)="","",OFFSET(Sheet1!$A$1,(COLUMN()-1)*45+ROW()-1,0)) 셀 A1로.

노트: Sheet1 열려는 긴 목록이있는 워크 시트입니다.

45 열에 데이터를 나열하려는 행 번호입니다.

모두 변수이며 필요에 따라 변경할 수 있습니다.

2. 그런 다음 A1 셀을 선택하고 채우기 핸들을 45 행까지 드래그 한 다음 데이터가 표시 될 때까지 채우기 핸들을 오른쪽으로 드래그합니다. 그리고 긴 열은 새 워크 시트의 한 페이지에 맞도록 여러 열로 분할되었습니다. 스크린 샷보기 :

문서 인쇄 긴 열1


화살표 블루 오른쪽 거품 VBA 코드로 한 페이지에 긴 열 인쇄

다음 VBA 코드는 데이터를 인쇄하고 용지를 절약 할 수 있도록 긴 데이터 목록을 여러 열로 나누는데도 도움이됩니다.

1. 누르고 ALT + F11 키가 열립니다. 응용 프로그램 용 Microsoft Visual Basic 창.

2. 딸깍 하는 소리 끼워 넣다 > 모듈을 클릭하고 모듈 창에 다음 코드를 붙여 넣습니다.

Sub SingleToMultiColumn()
    Dim rng As Range
    Dim iCols As Integer
    Dim lRows As Long
    Dim iCol As Integer
    Dim lRow As Long
    Dim lRowSource As Long
    Dim x As Long
    Dim wks As Worksheet
    Set rng = Application.InputBox _
      (prompt:="Select the range to convert", _
      Type:=8)
    iCols = InputBox("How many columns do you want?")
    lRowSource = rng.Rows.Count
    lRows = lRowSource / iCols
    If lRows * iCols <> lRowSource Then lRows = lRows + 1
    Set wks = Worksheets.Add
    lRow = 1
    x = 1
    For iCol = 1 To iCols
        Do While x <= lRows And lRow <= lRowSource
            Cells(x, iCol) = rng.Cells(lRow, 1)
            x = x + 1
            lRow = lRow + 1
        Loop
        x = 1
    Next
End Sub

3. 그런 다음 F5 키를 눌러이 코드를 실행하고 팝업 대화 상자에서 나누려는 목록 데이터를 선택합니다. 스크린 샷을 참조하십시오.

문서 인쇄 긴 열2

4. 딸깍 하는 소리 OK를 클릭하고 나눌 열 수를 입력합니다. 스크린 샷보기 :

문서 인쇄 긴 열3

5. 클릭 OK, 긴 열이 새 워크 시트에서 XNUMX 개의 열로 나뉩니다. 스크린 샷보기 :

문서 인쇄 긴 열4 -2 문서 인쇄 긴 열5

화살표 블루 오른쪽 거품 Excel 용 Kutools로 한 페이지에 긴 열 인쇄

긴 수식과 VBA 코드 모두 어려울 수 있습니다. 여기서는이 문제를 해결하는 쉽고 편리한 방법을 소개합니다. Excel 용 Kutools여러 열 인쇄 함수는 긴 열을 여러 열로 빠르게 분할하여 합리적으로 인쇄 할 수 있도록 도와줍니다.

Excel 용 Kutools 300 개 이상의 편리한 Excel 도구가 포함되어 있습니다. 30 일 동안 제한없이 무료로 사용해보세요. 그것을 지금.

Excel 용 Kutools를 설치 한 경우 다음 단계를 수행 할 수 있습니다.

1. 딸깍 하는 소리 Enterprise > 여러 열 인쇄, 스크린 샷 참조 :

문서 인쇄 긴 열6

2. 에서 여러 열 인쇄 대화 상자 :

  • 첫 번째를 클릭 문서 버튼 버튼을 눌러 범위 제목을 선택한 다음 두 번째 문서 버튼버튼을 눌러 분할 할 열을 선택합니다.
  • 그런 다음 페이지 당 넣을 행 수를 지정하십시오. 인쇄 된 페이지 당 행을 클릭하고 아래 한 페이지에 원하는 열 수를 입력하십시오. 세그먼트 수. 스크린 샷보기 :

문서 인쇄 긴 열7

3. 그런 다음 OK, 긴 목록 데이터는 한 페이지에서 XNUMX 개의 열로 나뉩니다. 스크린 샷보기 :

문서 인쇄 긴 열8 -2 문서 인쇄 긴 열9

배송 시 요청 사항:

1. 제목은 모든 열 앞에 추가됩니다.

2. 확인하면 활성 시트로 링크 만들기 옵션을 선택하면 새 워크 시트 데이터를 원본 데이터에 연결할 수 있습니다.

이 기능에 대해 더 알고 싶다면 여러 열 인쇄.


최고의 사무 생산성 도구

Excel 용 Kutools는 대부분의 문제를 해결하고 생산성을 80 % 향상시킵니다.

  • 재사용: 빠르게 삽입 복잡한 공식, 차트 그리고 이전에 사용한 모든 것; 셀 암호화 암호로; 메일 링리스트 생성 이메일 보내기 ...
  • 슈퍼 포뮬러 바 (여러 줄의 텍스트와 수식을 쉽게 편집 할 수 있습니다.) 레이아웃 읽기 (많은 수의 셀을 쉽게 읽고 편집합니다.) 필터링 된 범위에 붙여 넣기...
  • 셀 / 행 / 열 병합 데이터 손실없이; 셀 내용 분할; 중복 행 / 열 결합... 중복 셀 방지; 범위 비교...
  • 중복 또는 고유 선택 행; 빈 행 선택 (모든 셀이 비어 있음); 슈퍼 찾기 및 퍼지 찾기 많은 통합 문서에서; 무작위 선택 ...
  • 정확한 사본 수식 참조를 변경하지 않고 여러 셀; 참조 자동 생성 여러 시트에; 글 머리 기호 삽입, 확인란 등 ...
  • 텍스트 추출, 텍스트 추가, 위치 별 제거, 공간 제거; 페이징 부분합을 만들고 인쇄합니다. 셀 내용과 주석 간 변환...
  • 슈퍼 필터 (다른 시트에 필터 구성표 저장 및 적용) 고급 정렬 월 / 주 / 일, 빈도 등 특수 필터 굵은 기울임 꼴로 ...
  • 통합 문서와 워크 시트 결합; 키 열을 기반으로 테이블 병합; 데이터를 여러 시트로 분할; xls, xlsx 및 PDF 일괄 변환...
  • 300 개 이상의 강력한 기능. Office / Excel 2007-2019 및 365를 지원합니다. 모든 언어를 지원합니다. 기업 또는 조직에 쉽게 배포 할 수 있습니다. 전체 기능 30 일 무료 평가판. 60 일 환불 보장.
kte 탭 201905

Office Tab은 Office에 탭 인터페이스를 제공하여 작업을 훨씬 쉽게 만듭니다.

  • Word, Excel, PowerPoint에서 탭 편집 및 읽기 사용, Publisher, Access, Visio 및 Project.
  • 새 창이 아닌 동일한 창의 새 탭에서 여러 문서를 열고 만듭니다.
  • 생산성을 50 % 향상시키고 매일 수백 번의 마우스 클릭을 줄입니다!
officetab 하단
코멘트 (10)
아직 평가가 없습니다. 가장 먼저 평가하세요!
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요, 두 번째 옵션 "VBA 코드로 한 페이지에 긴 열 인쇄"와 관련된 질문이 있습니다. 범위에 둘 이상의 열이 있는 경우 동일한 코드를 어떻게 사용할 수 있습니까? "$A$2:$C$118"의 범위를 말하면 어떻게 하면 될까요? 감사해요.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
정보 감사합니다! 매우 유용하고 사용하기 쉬웠습니다. 컴퓨터 기술이 부족한 사람에게도 (저는 첫 번째 방법을 사용했습니다)
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
몇 시간 동안 인터넷을 검색한 후 나는 이것을 우연히 발견했습니다. 내가 찾던 바로 그 것이다. 수고하셨습니다. 시간을 내주셔서 감사합니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
친애하는 각하 이 작업에 감사드립니다. 이 VBA 코드는 제 작업에 매우 유용합니다. 몇 초 만에 작업을 완료하게 되어 기쁩니다. 감사합니다. ....
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
간단한 수식 =OFFSET(Sheet1!$A$1,(ROW()-2)*5+COLUMN(),0)을 사용하여 데이터가 5개 ​​열에서 수평으로 흐르도록 할 수 있습니다. 그런 다음 페이지 크기를 선택하고 각 페이지의 첫 번째 행을 인쇄하는 등의 작업을 할 수 있습니다. 단순하고 깔끔하며 VBA 없음
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
이 수식을 수정하여 3개 대신 1개의 열로 작업하는 방법이 있습니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
나도 이와 같은 솔루션에 관심이 있을 것입니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
이 공식은 어디로 가나요? 여러 행 레이아웃의 한 페이지에 여러 열이 있는 여러 행을 인쇄하려고 합니다. 이것과 유사:

존 스미스 1주차
존 스미스 2주차
존 스미스 총계


IJ까지 100개 이상의 행이 있습니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
고맙습니다! 수식은 원활하게 작동했습니다!
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
또는 표를 복사하여 원하는 만큼의 열이 있는 워드 문서에 붙여넣을 수 있습니다.
아직 코멘트가 없습니다
여러분의 의견을 남겨
게스트로 게시
×
이 게시물 평가 :
0   등장 인물
추천 위치