엑셀 하나의 출력폼으로 여러 데이터 인쇄시 선택한 구간만 인쇄하는 방법

반응형

 

---

 

지난 포스팅에서 엑셀 하나의 출력폼으로 여러 데이터 발행수량 지정하여 인쇄하는 방법을 알아 보았습니다.

https://blog.naver.com/devchief76/222496766816

엑셀 하나의 출력폼으로 여러 데이터 발행수량 지정하여 인쇄하는 방법 - 매크로,바코드폰트 사

 

이번에는 작업 목록중 일부 구간만 선택하여 인쇄하는 방법을 알아보겠습니다.

이 방법은 연속된 구간만 적용되는 방법입니다.

 

---

 

기존 리스트 A 열에 번호열을 추가하고 시작과 끝을 입력하는 곳을 F열과 G 열에 만들었습니다.

---

 

 

 

보기 -> 매크로 -> 매크로보기 를 클릭하거나 인쇄버튼에서 마우스 오른쪽 버튼 클릭하여 매크로지정을 클릭합니다.

 

---

 

매크로를 선택하고 편집을 클릭합니다.

 

---

 

 

// 수정된 코드
Sub 모서리가둥근직사각형1_Click ( )

Dim i As Integer
Set 자료 = Sheets("자료")
Set 폼 = Sheets("폼")
For i = 자료.Cells(2, "f") + 1 To 자료.Cells(2, "g") + 1
     폼.Cells(1, "a") = 자료.Cells(i, "b")
     폼.Cells(2, "a") = 자료.Cells(i, "c")
     폼.PrintOut copies:=자료.Cells(i, "d")
Next

End Sub

For 문의 시작 값은 F2셀을 참조하고 종료 값은 G2 셀을 참조하게 변경해주면 됩니다.

 

---

​

인쇄 버튼을 클릭하면 시작번호 3번부터 종료번호 5번 까지 지정한 내용만 인쇄됩니다.

참 쉽죠~

---

 

매크로test2.xls

0.04MB

설명에 사용한 엑셀 파일 입니다.

 

---