Как да попречим на потребителите да отпечатват работен лист?
В ежедневната ни работа може да има важна информация в работния лист, за да защитим разпространените вътрешни данни, отделът няма да ни позволи да ги отпечатаме. И тук ще говоря за това как да попреча на потребителите да отпечатват работен лист.
Предотвратете потребителите да отпечатват един определен работен лист с VBA
Предотвратете потребителите да отпечатват цялата работна книга с VBA
Предотвратете потребителите да отпечатват един определен работен лист с VBA
Можете да приложите следния VBA код, за да защитите конкретния си работен лист, който ще бъде отпечатан.
1. Активирайте своя работен лист, за който искате да деактивирате функцията за печат.
2. Задръжте натиснат ALT + F11 за да отворите Прозорец на Microsoft Visual Basic за приложения.
3. И след това вляво Project Explorer, кликнете два пъти Тази работна книга за да отворите модула и поставете следния код в него:
VBA код: не позволява на потребителите да отпечатват един определен работен лист
Private Sub Workbook_BeforePrint(Cancel As Boolean)
'Update 20140625
Dim WsName As String
WsName = "Sheet1"
For Each xWs In Application.ActiveWorkbook.Windows(1).SelectedSheets
If xWs.Name = WsName Then
MsgBox ("You can not print this worksheet")
Cancel = True
End If
Next
End Sub
Забележка: В горния код, Sheet1 е активният работен лист, който нямате право да отпечатвате.
4. След това запазете и затворете този код и сега, когато се опитате да отпечатате този конкретен работен лист, ще получите следното предупреждение.
Забележка: С този код единственият конкретен работен лист не е разрешен за отпечатване, но други листове могат да бъдат отпечатани както обикновено.
Предотвратете потребителите да отпечатват цялата работна книга с VBA
Ако трябва да попречите на потребителите да отпечатват цялата работна книга, тук също има код, който може да ви направи услуга.
1. Отворете работната си книга, която не позволявате на други да отпечатват.
2. Задръжте натиснат ALT + F11 за да отворите Прозорец на Microsoft Visual Basic за приложения.
3. И след това вляво Project Explorer, кликнете два пъти Тази работна книга за да отворите модула и поставете следния код в него:
VBA код: не позволява на потребителите да отпечатват един определен работен лист
Private Sub Workbook_BeforePrint(Cancel As Boolean)
'Update 20140626
Cancel = True
MsgBox "You can't print this workbook"
End Sub
4. След това запазете и затворете този код и отидете обратно на работната книга и сега, когато отпечатате един работен лист или цялата работна книга, те няма да бъдат разрешени да бъдат отпечатани и ще получите следното предупреждение:
Още по темата:
Как да отпечатате няколко работни книги в Excel?
Как да отпечатате диапазони в Excel?
Как бързо да отпечатате текущата страница в Excel?
Как да отпечатате дълга колона на една страница в Excel?
Най-добрите инструменти за продуктивност в офиса
Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време. Щракнете тук, за да получите функцията, от която се нуждаете най-много...
Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
