Sut i atal defnyddwyr rhag argraffu taflen waith?
Yn ein gwaith beunyddiol, efallai y bydd rhywfaint o wybodaeth bwysig yn y daflen waith, er mwyn amddiffyn y data mewnol sydd wedi'i wasgaru, ni fydd yr adran yn caniatáu inni eu hargraffu. Ac yma, byddaf yn siarad am sut i atal defnyddwyr rhag argraffu taflen waith.
Atal defnyddwyr rhag argraffu un daflen waith benodol gyda VBA
Atal defnyddwyr rhag argraffu'r llyfr gwaith cyfan gyda VBA
Atal defnyddwyr rhag argraffu un daflen waith benodol gyda VBA
Gallwch gymhwyso'r cod VBA canlynol i amddiffyn eich taflen waith benodol i'w hargraffu.
1. Ysgogwch eich taflen waith eich bod am analluogi ei nodwedd argraffu.
2. Daliwch i lawr y ALT + F11 allweddi i agor y Ffenestr Microsoft Visual Basic for Applications.
3. Ac yna yn y chwith Archwiliwr Prosiect, cliciwch ddwywaith Llyfr Gwaith hwn i agor y modiwl, a gludo'r cod canlynol iddo:
Cod VBA: atal defnyddwyr rhag argraffu un daflen waith benodol
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
Nodyn: Yn y cod uchod, mae'r Sheet1 yw'r daflen waith weithredol na chaniateir i chi ei hargraffu.
4. Yna arbedwch a chau'r cod hwn, ac yn awr pan geisiwch argraffu'r daflen waith benodol hon, fe gewch y rhybudd canlynol.
Nodyn: Gyda'r cod hwn, ni chaniateir argraffu'r unig daflen waith benodol, ond gellir argraffu taflenni eraill fel arfer.
Atal defnyddwyr rhag argraffu'r llyfr gwaith cyfan gyda VBA
Os oes angen i chi atal defnyddwyr rhag argraffu'r llyfr gwaith cyfan, yma hefyd mae cod yn gallu gwneud ffafr i chi.
1. Agorwch eich llyfr gwaith nad ydych chi'n caniatáu i eraill ei argraffu.
2. Daliwch i lawr y ALT + F11 allweddi i agor y Ffenestr Microsoft Visual Basic for Applications.
3. Ac yna yn y chwith Archwiliwr Prosiect, cliciwch ddwywaith Llyfr Gwaith hwn i agor y modiwl, a gludo'r cod canlynol iddo:
Cod VBA: atal defnyddwyr rhag argraffu un daflen waith benodol
Private Sub Workbook_BeforePrint(Cancel As Boolean)
'Update 20140626
Cancel = True
MsgBox "You can't print this workbook"
End Sub
4. Yna arbedwch a chau'r cod hwn, ac ewch i gefn y llyfr gwaith, ac yn awr pan fyddwch chi'n argraffu un daflen waith neu'r llyfr gwaith cyfan, ni chaniateir eu hargraffu a chewch y rhybudd canlynol:
Erthyglau cysylltiedig:
Sut i argraffu nifer o lyfrau gwaith yn Excel?
Sut i argraffu ystodau yn Excel?
Sut i argraffu'r dudalen gyfredol yn Excel yn gyflym?
Sut i argraffu colofn hir ar un dudalen yn Excel?
Offer Cynhyrchiant Swyddfa Gorau
Supercharge Eich Sgiliau Excel gyda Kutools for Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed o'r blaen. Kutools for Excel Yn cynnig dros 300 o nodweddion uwch i hybu cynhyrchiant ac arbed amser. Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...
Office Tab Yn dod â rhyngwyneb Tabbed i Office, ac yn Gwneud Eich Gwaith yn Haws o lawer
- Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
- Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
- Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
