KutoolsforOffice — Un'unica soluzione, cinque potenti strumenti.Ottenere di più con meno sforzo.

Come impedire agli utenti di stampare un foglio di lavoro?

AutoreXiaoyang Data di modifica

Nel nostro lavoro quotidiano, potrebbero esserci alcune informazioni importanti nel foglio di lavoro; per proteggere i dati interni dalla diffusione, il reparto non ci consentirà di stamparli. In questa guida illustrerò come impedire agli utenti di stampare un foglio di lavoro.

Impedire agli utenti di stampare un foglio di lavoro specifico con VBA

Impedire agli utenti di stampare l'intera cartella di lavoro con VBA


freccia blu a destra con fumetto Impedire agli utenti di stampare un foglio di lavoro specifico con VBA

È possibile utilizzare il seguente codice VBA per proteggere un foglio di lavoro specifico dalla stampa.

1. Attiva il foglio di lavoro per cui vuoi disabilitare la funzione di stampa.

2. Tenere premuti i tasti ALT + F11 per aprire la finestra di Microsoft Visual Basic for Applications.

3. Nel riquadro a sinistra Esplora progetti, fai doppio clic su ThisWorkbook per aprire il modulo e incollare il seguente codice:

Codice VBA: impedire agli utenti di stampare un foglio di lavoro specifico

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

impedisci stampa foglio codice vba

Nota: Nel codice precedente, Foglio1 è il foglio di lavoro attivo, che non può essere stampato.

4. Salva e chiudi questo codice; d'ora in poi, ogni volta che proverai a stampare il foglio specifico, apparirà il seguente avviso.

impedisci stampa foglio messaggio di avviso

Nota: con questo codice puoi stampare tutti i fogli, tranne quello specifico indicato.


freccia blu a destra con fumetto Impedire agli utenti di stampare l'intera cartella di lavoro con VBA

Se si desidera impedire agli utenti di stampare l’intera cartella di lavoro, ecco un altro codice utile a tal fine.

1. Apri la cartella di lavoro che non vuoi consentire ad altri di stampare.

2. Tenere premuti i tasti ALT + F11 per aprire la finestra di Microsoft Visual Basic for Applications.

3. Quindi, nel riquadro a sinistra Esplora progetti, fare doppio clic su ThisWorkbookper aprire il modulo e incollare il seguente codice:

Codice VBA: impedire agli utenti di stampare un foglio di lavoro specifico

Private Sub Workbook_BeforePrint(Cancel As Boolean)
'Update 20140626
Cancel = True
MsgBox "You can't print this workbook"
End Sub

impedisci stampa cartella di lavoro codice vba

4. Quindi salva e chiudi questo codice, torna alla cartella di lavoro e, da questo momento, ogni tentativo di stampare un foglio o l’intera cartella di lavoro verrà bloccato, mostrando il seguente avviso:

impedisci stampa cartella di lavoro messaggio di avviso


Articoli correlati:

Come stampare più cartelle di lavoro in Excel?

Cos’è l’Intervallo di Stampa in Excel?

Come stampare rapidamente la pagina corrente in Excel?

Come stampare una colonna lunga su una sola pagina in Excel?

Migliori Strumenti per la Produttività in Office

🤖KUTOOLS AI Assistente: Rivoluziona Analisi dei dati in base a:Esecuzione Intelligente   |  Genera Codice|  Crea formule personalizzate  |  Analizza Dati e Genera Grafici|  Richiama Funzioni avanzate
Funzionalità Popolari:Trova, Evidenzia o Contrassegna Duplicati   |  Elimina righe vuote   |  Combinare Colonne o Celle senza Perdere Dati   |   Arrotondamento senza usare la formula...
Super RICERCA.VERT:VLookup con Criteri Multipli  |  VLookup con Valori Multipli  |   VLookup tra Fogli Multipli   |   Corrispondenza approssimativa....
Elenco a discesa avanzato:Crea Rapidamente un Elenco a Discesa   |  Elenco a Discesa Dipendente   |  Elenco a Discesa con Selezione Multipla....
Gestione Colonne:Aggiungi un Numero Specifico di Colonne|Sposta Colonne|Attiva/Disattiva lo Stato di Visibilità delle Colonne Nascoste|Confronta Intervalli e Colonne...
Funzionalità in Evidenza:Attenzione della griglia   |  Visualizzazione Design   |Barra delle formule avanzata   | Gestione Cartelle di Lavoro e Fogli   |  Biblioteca di risorse(Testo Automatico)|  Selettore di Date   |  Unisci fogli di lavoro  |  Crittografa/Decrittografa celle   | Invia Email da Lista   |  Super Filtri   |   Filtro speciale(Filtra celle con testo in grassetto/corsivo/barrato...) ...
Principali Set di Strumenti 15:12 Strumentiper il Testo(Aggiungi testo,Elimina Caratteri Specifici, ...)|   50+Tipidi Grafico(Diagramma di Gantt, ...)|   40+ Formule Pratiche(Calcola l'età in base alla data di nascita, ...)|   19 Strumentidi Inserimento(Inserisci Codice QR,Inserisci Immagine dal Percorso, ...)|   12 Strumentidi Conversione(Converti in parole,Conversione del tasso di cambio, ...)|   7 StrumentiUnisci e Dividi(Unione avanzata righe,Dividi celle, ...)|... e molto altro
Usa Kutools nella tua lingua preferita – supporta inglese, spagnolo, tedesco, francese, cinese e 40+ altre!

Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un’efficienza mai vista prima.Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità di cui hai più bisogno...


Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede all’interno della stessa finestra, invece che in finestre separate.
  • Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!

Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.

Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.

ExcelWordOutlookTabsPowerPoint
  • Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
  • Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
  • Funziona meglio insieme— produttività ottimizzata tra le app di Office
  • Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
  • Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi