Een werkblad Lijst afdrukken

In complexe werkmappen dat veel werkbladen bevatten, is het niet ongebruikelijk om een ​​lijst van de verschillende werkbladen nodig. Zodra u de lijst, kunt u het afdrukken of het gebruiken op een andere manier, bijvoorbeeld om een ​​inhoudsopgave te creëren voor uw werkmap. De volgende macro, GetSheets, haalt al snel de namen van de werkbladen in de huidige werkmap. Het plaatst ze in het huidige werkblad, beginnend bij cel A1 en vervolgens naar beneden te werken.

Sub GetSheets ()
Dim j As Integer
Dim NumSheets As Integer

NumSheets = Sheets.Count
J = 1 To NumSheets
Cellen (j, 1) = Sheets (j) .Name
Volgende j
End Sub

Deze macro zal overschrijven alles in een cel die het nodig heeft in de huidige werkmap, dus moet je ervoor zorgen dat je niet iets in kolom A van het werkblad nodig. Als u niet wilt om iets te overschrijven, zorg ervoor dat u een nieuw werkblad te maken en vervolgens de macro uit dat werkblad.

Zodra de lijst met werkbladen wordt gemaakt, kunt u deze te formatteren zoals gewenst, en print het uit.

ExcelTips is uw bron voor kosteneffectieve Microsoft Excel training. Deze tip (2216) 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) vindt u hier: Afdrukken van een werkblad List.