Hoe voorkom je dat gebruikers een werkblad afdrukken?
In ons dagelijkse werk kan er belangrijke informatie op het werkblad staan, om de verspreiding van interne gegevens te beschermen, staat de afdeling ons niet toe ze af te drukken. En hier zal ik het hebben over hoe u kunt voorkomen dat gebruikers een werkblad afdrukken.
Voorkom dat gebruikers één gespecificeerd werkblad afdrukken met VBA
Voorkom dat gebruikers de hele werkmap afdrukken met VBA
- Hergebruik alles: Voeg de meest gebruikte of complexe formules, grafieken en al het andere toe aan uw favorieten en gebruik ze in de toekomst snel opnieuw.
- Meer dan 20 tekstfuncties: Nummer uit tekststring halen; Extract of verwijder een deel van teksten; Converteer cijfers en valuta's naar Engelse woorden.
- Tools samenvoegen: Meerdere werkmappen en bladen in één; Meerdere cellen / rijen / kolommen samenvoegen zonder gegevens te verliezen; Voeg dubbele rijen en som samen.
- Hulpmiddelen splitsen: Gegevens splitsen in meerdere bladen op basis van waarde; Eén werkmap naar meerdere Excel-, PDF- of CSV-bestanden; Eén kolom naar meerdere kolommen.
- Plakken overslaan Verborgen / gefilterde rijen; Tel en som op achtergrondkleur; Stuur gepersonaliseerde e-mails in bulk naar meerdere ontvangers.
- Superfilter: Maak geavanceerde filterschema's en pas deze toe op elk blad Sorteer per week, dag, frequentie en meer; Filteren door vetgedrukt, formules, commentaar ...
- Meer dan 300 krachtige functies; Werkt met Office 2007-2021 en 365; Ondersteunt alle talen; Eenvoudig te implementeren in uw onderneming of organisatie.
Voorkom dat gebruikers één gespecificeerd werkblad afdrukken met VBA
U kunt de volgende VBA-code toepassen om uw specifieke werkblad te beschermen dat moet worden afgedrukt.
1. Activeer uw werkblad waarvan u de afdrukfunctie wilt uitschakelen.
2. Houd de ALT + F11 toetsen om de te openen Microsoft Visual Basic for Applications-venster.
3. En dan naar links Projectverkenner, Dubbelklik Dit Werkboek om de module te openen en plak de volgende code erin:
VBA-code: voorkom dat gebruikers één gespecificeerd werkblad afdrukken
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
Opmerking: In de bovenstaande code, de Sheet1 is het actieve werkblad dat u niet mag afdrukken.
4. Sla vervolgens deze code op en sluit deze, en als u nu dit specifieke werkblad probeert af te drukken, krijgt u de volgende waarschuwing.
Opmerking:: Met deze code mag het enige specifieke werkblad niet worden afgedrukt, maar andere bladen kunnen zoals gewoonlijk worden afgedrukt.
Voorkom dat gebruikers de hele werkmap afdrukken met VBA
Als u wilt voorkomen dat gebruikers de hele werkmap afdrukken, kan hier ook een code u een plezier doen.
1. Open uw werkmap die anderen niet mogen afdrukken.
2. Houd de ALT + F11 toetsen om de te openen Microsoft Visual Basic for Applications-venster.
3. En dan naar links Projectverkenner, Dubbelklik Dit Werkboek om de module te openen en plak de volgende code erin:
VBA-code: voorkom dat gebruikers één gespecificeerd werkblad afdrukken
Private Sub Workbook_BeforePrint(Cancel As Boolean)
'Update 20140626
Cancel = True
MsgBox "You can't print this workbook"
End Sub
4. Sla vervolgens deze code op en sluit deze, en ga terug naar de werkmap, en als u nu een werkblad of de hele werkmap afdrukt, mogen ze niet worden afgedrukt en krijgt u de volgende waarschuwing:
Gerelateerde artikelen:
Hoe meerdere werkmappen in Excel afdrukken?
Hoe bereik ik in Excel afdrukken?
Hoe snel de huidige pagina in Excel afdrukken?
Hoe lange kolom op één pagina in Excel afdrukken?
De beste tools voor kantoorproductiviteit
Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%
- visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
- Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
- Voeg cellen / rijen / kolommen samen zonder gegevens te verliezen; Gespleten cellen inhoud; Combineer dubbele rijen / kolommen... Voorkom dubbele cellen; Vergelijk Ranges...
- Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
- Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
- Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
- Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
- Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
- Meer dan 300 krachtige functies. Ondersteunt Office / Excel 2007-2021 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in uw onderneming of organisatie. Volledige functies Gratis proefperiode van 30 dagen. 60 dagen geld-terug-garantie.
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
