The regneark klasse i VBA er et kraftig verktøy som kan brukes til å opprette, manipulere og fjerne ark i alle Excel- arbeidsbok . Hvert regneark objektet har en egenskap kalt "Name ", som refererer til etikettene på arkfaner nær bunnen i Excel-vinduet . Med dette i bakhodet , kan du opprette en makro eller VBA script som " looper " gjennom hvert ark i en arbeidsbok , og lister navnene deres i en gitt celle område . Instruksjoner
en
Start Microsoft Excel og åpne arbeidsboken .
2
Trykk "Alt + F8 " for å åpne Makroer vinduet. Skriv " GetSheetNames " i "Macro navnet " boksen og klikk deretter på " Create ".
3
Skriv inn følgende kode i VBA editor.
Gå GetSheetNames ( )
Dim wSheet Som regneark
Hver wSheet I regneark
On Error Resume Next
ActiveCell.Value = wSheet.Name
< p > ActiveCell.Offset ( 1 , 0 ) . Velg
Neste wSheet
End Sub
4
Lukk VBA editor for å gå tilbake til arbeidsboken.
5
Merk en celle i regnearket . Trykk " Alt + I " og deretter " C " for å opprette en tom kolonne.
6
Klikk på den første tomme cellen i den nye kolonnen .
7
Trykk "Alt + F8 "for å åpne Makroer vinduet igjen . Velg " GetSheetNames " og klikk på " Run . "