엑셀 시트내 인쇄 버튼 만들기 VBA

질문보기분류: 엑셀엑셀 시트내 인쇄 버튼 만들기 VBA
엑셀꿀벌 스탭 asked 6 개월 ago

엑셀 시트내 인쇄 버튼 만들기 VBA

시트에 인쇄 버튼을 만들려고 하는데요

특정 시트를 인쇄 할수 있도록 하려 합니다

메크로 기능을 이용해야하는데 전혀 모르겠습니다

처음부터 차근차근 알려주실수 있을까요?

3 Answers
엑셀꿀벌 스탭 answered 6 개월 ago

1. 엑셀에서 파일탭 클릭->옵션->리본 사용자 지정->”개발도구” 체크 후 확인

2. 개발도구 탭->삽입->단추(양식컨트롤) 클릭하여 버튼 삽입

3. Alt + F11 클릭하여 VBA Editor 활성화

4. VBA Editor 에서 삽입 -> 모듈 클릭

5. 아래 코드를 모듈에 삽입

Sub Macro1()
  Application.Dialogs(xlDialogPrint).Show
End Sub

6. 아까 만들었던 단추 마우스 우 클릭

7. 매크로 지정

8. 점검 -> 완료

엑셀꿀벌 스탭 answered 6 개월 ago
Sheet 이름 별로 프린트 하는 방법

Dim sh As Worksheet
For Each sh In ActiveWorkbook.Worksheets
        If (sh.Name = "Sheet2") Then
           sh.PrintOut
        End If
        If (sh.Name = "Sheet3") Then
           sh.PrintOut
        End If
Next sh
엑셀꿀벌 스탭 answered 6 개월 ago
PrintOut 메서드 옵션 설정

From - 시작 페이지 설정
To - 마지막 페이지 설정
Copies - 몇 장 프린트 할 건지 설정
ActivePrinter - 활성화된 프린터의 이름 설정

활용 예
Worksheets. ("sheet1").PrintOut From:=2, To:=3

활용 예 2
Worksheets. ("sheet1").PrintOut From:=2, To:=3, Copies:=3
wpChatIcon