티스토리 뷰
엑셀의 인쇄를 제한하기 위해서는 BeforePrint Cancel=True 제한되어야 하는데 잘 작동되지 않는다.
해당 엑셒 파일을 종료하여 인쇄를 차단할 수 있다.
Workbook.BeforePrint event (Excel)
https://docs.microsoft.com/en-us/office/vba/api/excel.workbook.beforeprint
Option Explicit
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim intResponse As Integer
intResponse = MsgBox("이문서는 [대외비]입니다." & Chr(10) _
& Chr(10) & Chr(10) & "인쇄 금지되어 있으며, 인쇄 시도로 파일 종료합니다.", _
vbOKOnly + vbInformation, " YcITeam - [대외비]입니다.")
Cancel = True
ThisWorkbook.Close savechanges:=False
End Sub
'소프트웨어' 카테고리의 다른 글
| [Outlook] 프로필(profile) 로드중 멈춤 (0) | 2022.09.28 |
|---|---|
| [Outlook/OWA] 공유사서함 추가하기 (0) | 2020.07.08 |
| [Excel] 작업표시줄에 최근 항목이 표시되지 않을때 (1) | 2020.07.06 |
| [Outlook] 아웃룩 캐시모드(Cached Mode) 메일 동기화 시간 강제 조정 (0) | 2020.07.06 |
| [PDF] 인쇄 제한 풀기 (0) | 2019.10.24 |
댓글