Excel VBA Navn Arbeidsark
I VBA trenger ikke spesielle ferdigheter å nevne et regneark. Vi trenger bare å referere til hvilket arknavn vi endrer ved å skrive inn det eksisterende arknavnet. Hvis vi for eksempel vil endre arket med navnet “Salg”, må vi ringe arket med navnet ved hjelp av regnearkobjektet.
Regneark (“Salg”)
Etter å ha nevnt arknavnet, må vi velge “Navn” -egenskapen for å endre regnearknavnet.
Arbeidsark (“Salg”). Navn
Nå må vi sette Name-egenskapen til navnet i henhold til vårt ønske. Anta at du vil endre "Salg" til "Salgsark", så sett likhetstegn etter "NAME" -egenskapen og skriv inn det nye navnet i dobbel anførselstegn.
Arbeidsark (“Salg”). Navn = “Salgsark”
Slik kan vi endre regnearknavnet ved hjelp av Navne-egenskapen.
Eksempler på navn på regneark ved bruk av VBA
Eksempel 1
Endre eller gi nytt navn til arket ved hjelp av variabler.
Se for eksempel på eksemplet nedenfor.
Kode:
Sub Name_Example1 () Dim Ws As Worksheet Set Ws = Worksheets ("Sales") Ws.Name = "Sales Sheet" End Sub
I den ovennevnte først har jeg erklært variabelen som regneark.
Dim Ws Som regneark
Deretter har jeg satt referansen til variabelen som "Salg" ved hjelp av regnearkobjektet.
Sett Ws = Arbeidsark ("Salg")
Nå inneholder variabelen "Ws" referansen til regnearket "Salg".
Nå bruker jeg "Ws" -variabelen, og jeg har omdøpt regnearket til "Salgsark".
Denne koden vil endre navnet "Salg" til "Salgsark".
Viktig merknad å huske
Vi har nettopp sett hvordan vi kan endre navnet på Excel-regnearket fra ett navn til et annet. Imidlertid, hvis vi kjører koden igjen, vil vi få en feil i abonnement utenfor rekkevidde.
En av nøklene til å få en ekspert i VBA-makroer er å håndtere feil. Før vi håndterer feil, må vi vite hvorfor vi får denne feilen.
Årsaken til at vi får denne feilen fordi vi i forrige trinn i seg selv allerede har endret regnearket med navnet "Salg" til "Salgsark".
Vi har ikke noe ark som heter "Salg". Vi får dette abonnementet utenfor rekkevidde.
Eksempel 2
Få alle regnearknavnene i enkeltark .
Anta at du har mange regneark i arbeidsboken din, og at du vil få navnet på alle disse regnearkene i et av regnearkene. Dette kan gjøres ved å bruke VBA-koding.
Se for eksempel på bildet nedenfor.
Vi har så mange ark her.
Av alle disse arkene trenger vi navnet på hvert ark i arket som heter "Indeksark". Jeg har skrevet koden nedenfor for deg.
Kode:
Under All_Sheet_Names () Dim Ws som regneark Dim LR så lenge for hvert Ws i ActiveWorkbook.Worksheets LR = Worksheets ("Index Sheet"). Celler (Rows.Count, 1) .End (xlUp) .Row + 1 'Denne LR varaible for å finne de sist brukte radcellene (LR, 1). Velg ActiveCell.Value = Ws.Name Neste Ws End Sub
Kopier nå denne koden til modulen din.
Kjør nå koden ved å kalle et av regnearkene som "Indeksark". Denne koden vil gi alle regnearknavnene i "Indeksark".
På denne måten, ved å bruke “NAME” -egenskapen til regnearket i VBA, kan vi leke med navnet på regnearkene. Vi kan gi nytt navn, trekke ut, og vi kan velge det spesifikke regnearket og gjøre mange andre ting som kan gjøres ved å bruke "Navn" -egenskapen.
Ting å huske
- NAME i VBA er eiendom.
- Ved å bruke dette navnet kan vi gi nytt navn til regnearket, og vi kan også trekke ut arknavn.
- Vi kan endre hvilket som helst navn på regnearket i den angitte arbeidsboken hvis du henviser til andre arbeidsbøker enn den kodeskrevne arbeidsboken.
- Hvis regnearknavnet ikke stemmer overens, vil vi få abonnement utenfor rekkevidden.
