Afdrukken Alleen niet-lege werkbladen

Clinton heeft een werkmap met meer dan 200 werkbladen die krijgen bevolkt door verschillende mensen in zijn bedrijf in de loop van de maand. Aan het einde van de maand moet hij deze werkbladen drukken. Niet alle werkbladen bevatten gegevens en Clinton wil alleen de werkbladen die gegevens bevatten, zodat hij niet verspillen papier af te drukken. Hij vraagt ​​zich af of er misschien een macro die hij kan gebruiken om alleen de werkbladen die een waarde in cel G41 hebben afgedrukt.

Het antwoord is dat dergelijke macro vrij gemakkelijk kan worden geschreven. Het zou alleen nodig om erachter te komen hoeveel werkbladen er, check cel G41 op elk van hen, en vervolgens afdrukken alleen als er iets in die cel. De volgende macro voert net deze operaties.

Sub PrintMost ()
Dim wkn Zoals werkblad
Voor Elke wkn In ActiveWorkbook.Worksheets
Als Niet IsEmpty (wks.Range ("G41")) Then
wks.PrintOut
End If
Volgende
Stel wkn = Nothing
End Sub

De macro kan eenvoudig worden aangepast om andere bewerkingen, zoals de vraag of een bepaald werkblad moet worden afgedrukt of vragen hoeveel exemplaren moeten worden afgedrukt voeren.

ExcelTips is uw bron voor kosteneffectieve Microsoft Excel training. Deze tip (3502) is van toepassing op Microsoft Excel 97, 2000, 2002 en 2003. U kunt een versie van deze tip voor de ribbon-interface van Excel (Excel 2007 en later) hier vinden: Afdrukken Alleen niet-lege werkbladen.