You kan gjelde følgende VBA-kode for å beskytte bestemt arbeidsark som skal skrives ut.
1. Aktiver regnearket som du vil deaktivere sin utskriftsfunksjonen.
To. Hold nede ALT + F11-tastene for å åpne Microsoft Visual Basic for Applications vinduet.
3. Og deretter i venstre Prosjekt Utforsker dobbeltklikker du Thiswork å åpne modulen, og lim inn følgende kode inn i den:
VBA-kode: hindre brukere fra å skrive en spesifisert regneark
Private Sub Workbook_BeforePrint (Cancel As Boolean) 'Oppdater 20140625Dim WsName Som StringWsName = "Ark1" for hver xWs I Application.ActiveWorkbook.Windows (1) .SelectedSheets Hvis xWs.Name = WsName Så MsgBox ("Du kan ikke skrive ut denne regnearket") Cancel = True End IfNextEnd Sub
Note : I koden ovenfor, er Ark1 det aktive regnearket som du ikke har lov til å skrive ut
4.. Deretter lagre og lukke denne koden, og nå når du prøver å skrive ut denne konkrete regnearket, vil du få følgende advarsel
. Merk: Med denne koden, er det eneste konkrete regnearket ikke lov til å skrive ut, men andre ark kan skrives som vanlig.