Excel VBA arbeidsbok

Excel-fil kalles arbeidsbok, og hver arbeidsbok har ark eller sider som kalles arbeidsark. Regneark er området der vi skriver og lager en datatabell. Og arbeidsbok inneholder N-tall av slike arbeidsark som kan ha forskjellige data. I VBA kan vi bruke Workbook-funksjonen uten en gang å gjøre noe i Excel-arbeidsbok. Vi får tilgang til disse funksjonene som er tilgjengelige i Excel i VBA med kommandolinjen “ Application . Arbeidsbøker ”.

Å bruke likhetstegn (“=”) i excel aktiverer alle innsettingsfunksjonene i excel. Og å bruke “ WorksheetFunction with a dot (.) ” Aktiverer og lar excel-funksjonene brukes som vist nedenfor.

Hvordan bruke arbeidsbokobjektet i Excel VBA?

Nedenfor er de forskjellige eksemplene for å bruke arbeidsbokobjektet i Excel VBA.

Du kan laste ned denne VBA Workbook Excel Template her - VBA Workbook Excel Template

VBA arbeidsbok - eksempel # 1

I dette eksemplet vil vi se hvordan du åpner en arbeidsbok ved hjelp av VBA Workbook-objekt.

Følg trinnene nedenfor for dette:

Trinn 1: Gå til VBA-vinduet og åpne en ny modul ved hjelp av listen Sett inn menyliste som vist nedenfor.

Ved å klikke på Module-alternativet i Sett inn-menyen, vil vi få en modul der vi vil skrive koden.

Trinn 2: Begynn nå å skrive underkategori av funksjonen VBA arbeidsbok i hvilket som helst navn du ønsker eller bedre, hold funksjonsnavnet i samme navn som det blir utført som vist nedenfor.

Kode:

 Sub VBAWorkbook1 () Slutt Sub

Trinn 3: Bruk WorkBooks- funksjonen i koden. Dette gjør at enhver arbeidsbok kan brukes i. For å åpne den, bruk Åpne- kommandoen etter å ha satt en prikk (.) Som vist nedenfor.

Selve Open-funksjonen har så mange alternativer og måter å åpne en hvilken som helst arbeidsbok som vist i syntaksen nedenfor.

Nå for å åpne en arbeidsbok trenger vi plasseringen av filen. Her har vi allerede lagret en Excel-arbeidsbok i navnet " Test File " et sted i en lokal stasjon som er tilgjengelig.

Trinn 4: Per syntaks som er vist ovenfor, trenger vi Filename som String som betyr tegn. Så vi har kopiert og limt inn et sted nedenfor i inverterte kommaer. Det er her vi kan plassere hvilken som helst beliggenhet eller filadresse der vi har oppbevart den.

Kode:

 Sub VBAWorkbook1 () Workbooks.Open Filename: = "D: \ Test File.xlsx" End Sub

Trinn 5: Nå vil vi vise navnet på filen som åpnes ved hjelp av Workbook.Open-kommandoen. Vi bruker MsgBox med ActiveWorkbook.Name . Dette viser vi navnet på arbeidsboknavnet som er åpnet og aktivt nå.

Kode:

 Sub VBAWorkbook1 () Workbooks.Open Filename: = "D: \ Test File.xlsx" MsgBox (ActiveWorkbook.Name & "Are Openened Now.") Slutt Sub

Trinn 6: Sett sammen den komplette koden trinn for trinn, og kjør den ved å klikke på Spill-knappen.

Vi vil se filen som heter " Test File " er nå åpen, og vi fikk en popup-melding som sier at "Test File Er Openened Now" .

VBA arbeidsbok - eksempel # 2

Dette er et annet eksempel der vi vil se hvordan du bruker VBA WorkBook-objekt for å bruke det til en hvilken som helst Excel-arbeidsbok. Følg trinnene nedenfor for dette:

Trinn 1: Begynn å skrive underkategori i hvilket som helst navn eller for beste praksis bør i navnet på den utførte funksjonen.

Kode:

 Sub VBAWorkbook2 () Slutt Sub

Trinn 2: Følg fremgangsmåten som vi har sett i eksempel-1 for å åpne en lagret “Test File” -fil på et hvilket som helst sted. Det anbefales alltid å lagre filen som er tilgjengelig. Denne kommandoen åpner vi filen fra den nevnte adressen.

Kode:

 Sub VBAWorkbook2 () Workbooks.Open Filename: = "D: \ Test File.xlsx" End Sub

Trinn 3: Nå vil vi bruke filnavn sammen med arbeidsbokfunksjonen og lage eller legge til litt tekst i den. For dette velger vi arket der vi vil sette inn teksten ved å bruke Kommandoark (1) . Nummer 1 inne i braketten brukes til en sekvens på arket, ikke for navnet på arket og for å velge området fra celle A1 til A5 som vist nedenfor.

Kode:

 Sub VBAWorkbook2 () Workbooks.Open Filename: = "D: \ Test File.xlsx" Workbooks ("Test File.xlsx"). Sheets (1) .Range ("A1: A5") = "Test" End Sub

Trinn 4: Bruk nå samme format for å velge arbeidsbok. Vi brukte "Test File", så vi bruker den her etterfulgt av prikk (.) Og lagrer. Dette vil lagre filen.

Kode:

 Sub VBAWorkbook2 () Workbooks.Open Filename: = "D: \ Test File.xlsx" Workbooks ("Test File.xlsx"). Sheets (1) .Range ("A1: A5") = "Test" Workbooks ("Test File.xlsx "). Lagre sluttund

Trinn 5: Nå bruker vi arbeidsbøker-funksjonen med navnet fulgt av en prikk (.) Og Lukk for å lukke den valgte arbeidsboken som vist nedenfor.

Kode:

 Sub VBAWorkbook2 () Workbooks.Open Filename: = "D: \ Test File.xlsx" Workbooks ("Test File.xlsx"). Sheets (1) .Range ("A1: A5") = "Test" Workbooks ("Test File.xlsx "). Lagre arbeidsbøker (" Test File.xlsx "). Lukk End Sub

Trinn 6: Sett sammen koden og kjør den. Vi ser at teksten som vi brukte i koden “Test”, nå er kopiert i all rekkecellen A1 til A5.

Og vi vil få en advarsel som vist nedenfor.

Klikk på OK-knappen for å lagre filen og lukke den.

VBA arbeidsbok - eksempel # 3

La oss se et annet eksempel der vi vil bruke VBA Workbook-objekt. I dette eksemplet vil vi se hvordan du kan beskytte en arbeidsbok ved hjelp av et passord. Dette er ganske nyttig når vi har viktige data i et ark eller en arbeidsbok og vi må beskytte dem også når vi kjører den komplette koden. Så å beskytte arbeidsboken etter jobb blir en trengende jobb for å unngå å miste data.

Følg trinnene nedenfor for dette:

Trinn 1: I en modul, begynn å skrive underkategori i navnet på funksjonen som brukes som vist nedenfor.

Kode:

 Sub VBAWorkbook3 () Slutt Sub

Trinn 2: Bruk nå ActiveWorkbook- kommandoen til å velge arbeidsmappen som er åpnet, fulgt av prikk (.), Og søk og velg Beskytt kommando fra listen som vist nedenfor.

Trinn 3: Etter å ha valgt Protect- kommando, ser vi syntaksen som skal brukes for å tillate beskyttelsen i arbeidsboken som vist nedenfor.

Kode:

 Sub VBAWorkbook3 () ActiveWorkbook.Protect End Sub

Trinn 4: Velg nå passordet fra syntaks og velg et passord og for Struktur og vindu tillater det som SANT.

Kode:

 Sub VBAWorkbook3 () ActiveWorkbook.Protect Password: = "TestPassword", struktur: = True, Windows: = True End Sub

Trinn 5: Sett sammen den og kjør etter den. Vi ser at vår nåværende arbeidsbok blir låst, noe som kan sees i gjennomgangsmenyen i alternativet Beskytt arbeidsbok som vist nedenfor. For å låse den opp, klikk på alternativet Beskytt arbeidsbok .

Trinn 5: Og skriv inn passordet " TestPassword " som vi valgte i koden vår, og klikk på Ok .

Vårt nåværende ark blir igjen låst opp.

Fordeler med Excel VBA arbeidsbok

  • VBA Workbook lar oss jobbe i Workbook uten å gjøre noe i arket.
  • Vi kan utføre alle oppgaver ved hjelp av VBA Workbook-objekt for dette, vi trenger bare å velge eller aktivere arket gjennom kode.

Ting å huske

  • Husk alltid å sette sammen den komplette koden eller linje for linje for å unngå en feil.
  • Filen har enorme data og flere kodelinjer, bruk alltid Close VBA Workbook for å unngå å miste data.
  • For de som er nybegynnere på VBA Coding, anbefales det ikke å bruke kompleks kodingstruktur. I stedet for å prøve med små sett med kode og implementere de virkelige livsscenariene.

Anbefalte artikler

Dette er en guide til VBA arbeidsbok. Her diskuterer vi hvordan du bruker Workbook-objekt i Excel VBA sammen med noen praktiske eksempler og nedlastbar Excel-mal. Du kan også gå gjennom andre foreslåtte artikler -

  1. Guide to VBA Object
  2. Beskytt Excel-arbeidsbok
  3. VBA rekkeceller
  4. Del Excel arbeidsbok

Kategori:

VBA