Excel VBA arbeidsbok åpen

De vanligste operasjonene i hverdagen er å åpne Excel-arbeidsbøker når du jobber med Excel. Du kan ikke jobbe i Excel uten å åpne Excel-arbeidsbøkene eller Excel-filen. Så i denne artikkelen skal vi dekke hvordan vi kan åpne en Excel-arbeidsbok med hjelp av VBA.

Metoder for å åpne Exel-arbeidsbøker i VBA

Det er to metoder for å åpne Excel-arbeidsbøker i VBA, og vi kommer til å dekke begge metodene i denne artikkelen.

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

Metode nr. 1 - Excel VBA Workbooks.open-metoden

Den første metoden i VBA er å bruke den innebygde funksjonen Workbooks.open . Det er 15 valgfrie argumenter i funksjonen “Workbooks.open”, og å dekke alle de 15 argumentene vil ta mye tid. Så vi vil bare prøve å forstå noen av de grunnleggende arbeidsbøkene. Åpne og se hvordan vi kan bruke denne funksjonen i VBA til å åpne arbeidsbøkene.

Så det første trinnet i denne metoden er at du bør kjenne til filnavnet på Excel-arbeidsbøkene. Nedenfor er utsagnet om å åpne arbeidsbøkene. ”Workbooks.open“ File_Name ”

Eller

Arbeidsbøker. Åpne filnavn: = ”File_Name”

"File_Name" er navnet på arbeidsbøkene du vil åpne. Men du må være forsiktig her fordi du må oppgi hele banen der filen er lagret og navnet på filen med filtypen (.XLS, .XLSX, .xlsm, etc). Vi kan ta eksemplet med makroen nedenfor for å forstå denne funksjonen.

Eksempel

Anta at du vil åpne en Excel-fil med navnet "Test File" som er lagret i datamaskinens D-stasjon. Lag en makro i en Excel-makroaktivert arbeidsbok. Følg trinnene nedenfor for å bruke Excel VBA Workbooks.open-metoden.

Trinn 1: Klikk på File.

Trinn 2: Klikk på Alternativer .

Trinn 3: Klikk på Tilpass bånd .

Trinn 4: Forsikre deg om at utviklerfeltet er merket som nedenfor, og klikk ok.

Trinn 5: Når du har utvikler-fanen, klikker du på Visual basic som vist på skjermbildet nedenfor.

Etter at du har klikket på Visual Basics, må du begynne å kode for makroen din.

Trinn 6: Angi koden nedenfor i VBA-modulen.

Kode:

 Sub Open_workbook () Slutt Sub

Denne koden inneholder navnet på arbeidsboken din.

Trinn 7: Angi koden som kan åpne arbeidsboka som er lagret i D-stasjonen på datamaskinen.

Kode:

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

Trinn 8: Kjør koden ved å trykke på F5-tasten eller ved å klikke på Spill-knappen. Etter å ha kjørt makroen, vil du finne at Excel-filen åpnes automatisk. Som du ser i koden over, vil makroen åpne Excel-filen med navnet "Test File.xlsx" som er lagret i D-stasjonen på datamaskinen. Stien som er nevnt over er ganske enkel fordi det ikke er noen mapper og undermapper som kan hente arbeidsbøkene.

Dette blir utfordrende fordi mange ikke husker banen, og hvis banen til filen der den er lagret endres litt, vil ikke makroen fungere. Makroen vil ikke fungere selv om Navnet på filen endres med en enkelt bokstav. Så hvis banen / navnet på filen endres, må du endre VBA-koden til makroen. Dette gjør jobben kjedelig, og den er ikke feilfri i tillegg. Så for å sikre at makroen din kjører perfekt uten å gi deg en feil, bruker vi den andre metoden som er enkel å håndtere og ikke vil gi deg en feil, selv når du ikke husker banenavnet eller til og med når filnavnet endres .

Metode nr. 2 - Få åpent filnavn

Som du vet hvilke utfordringer vi står overfor i den første metoden for endring av sti og filnavnet, unngår denne metoden begge utfordringene. Denne metoden gir muligheten til å bla på datamaskinen din til stedet der filen er lagret, og åpner de bestemte arbeidsbøkene du vil åpne.

Denne metoden fungerer faktisk i to deler.

Den første delen av denne metoden er Application.GetOpenFileName. Denne delen lar deg bla gjennom datamaskinen din og velge banen der filen din er lagret. Den første delen åpner ikke filen du vil åpne.

Den andre delen er å åpne filen du fortsatt trenger å være avhengig av den første metoden (VBA Workbooks.open-metoden). Det er 5 argumenter i Application.GetOpenFileName, men vil bare se på det grunnleggende som om vi gjorde det i den første metoden. La oss prøve å forstå denne metoden ved hjelp av et eksempel.

Eksempel

Anta at du vil åpne "Test File" som er lagret i D-stasjonen på datamaskinen, så trenger du bare å følge trinnene nedenfor.

Trinn 1: Følg trinn 1 som er nevnt i det første eksemplet for å åpne Visual Basic Editor eller Open Visual Basic Editor fra Developer Tab.

Trinn 2: Angi koden nedenfor som inneholder navnet på makroen din.

Kode:

 Sub Open_workbook_example2 () Slutt Sub

Trinn 3: Angi koden nedenfor. Denne uttalelsen erklærer filnavnet som variabel fordi vi her ikke spesifiserer noen bane eller filnavn fordi det kan endres fra tid til annen.

Kode:

 Sub Open_workbook_example2 () Dim Myfile_Name Som Variant End Sub

Trinn 4: Angi koden nedenfor. Denne uttalelsen åpner dialogboksen nedenfor, og du kan bla gjennom mappene for å gå til banen der filen er lagret. Den vil også vise Excel-filen mens du surfer fordi vi har satt et filter for Excel-filene.

Kode:

 Sub Open_workbook_example2 () Dim Myfile_Name As Variant Myfile_Name = Application.GetOpenFilename (FileFilter: = "Excel Files (*. Xl *), *. Xl *)") Slutt Sub

Trinn 5: Angi koden nedenfor. Denne uttalelsen er Hvis deretter-setning som brukes når filen. Navn ikke er lik falsk, åpne den valgte Excel-filen.

Kode:

 Sub Open_workbook_example2 () Dim Myfile_Name Som Variant Myfile_Name = Application.GetOpenFilename (FileFilter: = "Excel Files (*. Xl *), *. Xl *)") Hvis Myfile_Name False Så Workbooks.Open Filename: = Myfile_Name End Sub

Trinn 6: Angi koden nedenfor. Denne uttalelsen lukker tilstanden Hvis deretter i makroen.

Kode:

 Sub Open_workbook_example2 () Dim Myfile_Name Som Variant Myfile_Name = Application.GetOpenFilename (FileFilter: = "Excel Files (*. Xl *), *. Xl *)") Hvis Myfile_Name False Så Workbooks.Open Filename: = Myfile_Name End If End Sub Sub

Trinn 7: Kjør nå koden ved å trykke på F5-tasten eller ved å klikke på Play-knappen. Du vil se dialogboksen for å bla gjennom filen vil åpne. Bla gjennom til skrivebordet der filen er lagret. Nå vil du kunne se filen i D Drive. Velg filen og klikk åpen.

Som vi nettopp så i eksemplet, trenger vi ikke å bekymre oss for filnavnet og banenavnet der filen er lagret. Vi kan enkelt navigere til mappen der filen vår er lagret og velge filen vi vil åpne. Så vi kan lett konkludere med at denne metoden er mye mer effektiv sammenlignet med den første metoden.

Ting å huske

  • Forsikre deg om at banenavnet og filnavnet er riktig mens du bruker den første metoden. Makroen fungerer ikke når det er endring med bokstav eller mellomrom i banen eller Filnavn.
  • Forsikre deg om at filtrene som er nevnt i koden i den andre metoden, er riktige. Det er mange formater av Excel som kanskje ikke er synlige på grunn av et filter.
  • Forsikre deg om at deklarasjonen og koden som brukes i VBA er riktig for å unngå feil.

Anbefalte artikler

Dette er en guide til VBA Workbook Open. Her diskuterer vi to forskjellige metoder for å åpne arbeidsbok ved hjelp av Excel VBA-kode sammen med praktiske eksempler og nedlastbar Excel-mal. Du kan også se på følgende artikler for å lære mer -

  1. Komplett guide til VBA arbeidsbok
  2. HYPERLINK Formel i Excel
  3. Åpne filer med VBA FileDialog
  4. Eksempler på Excel-regneark

Kategori:

VBA