Arbetsbladet klassen i VBA är ett kraftfullt verktyg som kan användas för att skapa , manipulera och ta bort blad i alla Excel- arbetsbok . Varje kalkylblad objekt har en egenskap som kallas " Name ", som hänvisar till de etiketter tabellflikarna nära botten i Excel-fönstret . Med detta i åtanke , kan du skapa ett makro eller VBA skript som " loopar " genom varje blad i en arbetsbok och listar deras namn i ett givet cellområde . Instruktioner
1
Starta Microsoft Excel och öppna arbetsboken .
2
Tryck " Alt + F8 " för att öppna Makron fönstret . Typ " GetSheetNames " i " Macro name" och sedan klicka på " Skapa ".
3
Skriv följande kod i VBA editorn .
Sub GetSheetNames ( ) katalog
Dim wSheet Som Arbetsblad
För varje wSheet I kalkylblad
On Error Resume Next
ActiveCell.Value = wSheet.Name
ActiveCell.Offset ( 1 , 0 ) . Välj
Nästa wSheet
End Sub
4
Stäng VBA editorn för att återgå till din arbetsbok .
5
Markera en cell i ett kalkylblad . Tryck på " Alt + I " och sedan " C " för att skapa en tom kolumn .
6
Klicka på den första tomma cellen i den nya kolumnen .
7
Tryck " Alt + F8 " för att öppna Makron fönstret igen . Välj " GetSheetNames " och klicka sedan på " Kör . " Addera