Excel VBA-projektmappe åben

De mest almindelige operationer i det daglige liv er at åbne en Excel-arbejdsbøger, når du arbejder med Excel. Du kan ikke arbejde i Excel uden at åbne Excel-arbejdsbøger eller Excel-filen. Så i denne artikel skal vi dække, hvordan vi kan åbne en Excel-arbejdsbøger ved hjælp af VBA.

Metoder til at åbne Exel-arbejdsbøger i VBA

Der er to metoder til at åbne Excel-arbejdsbøger i VBA, og vi vil dække begge metoder i denne artikel.

Du kan downloade denne VBA Workbook Open Excel Template her - VBA Workbook Open Excel Template

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

Den første metode i VBA er at bruge den indbyggede funktion Workbooks.open . Der er 15 valgfrie argumenter i funktionen “Arbejdsbøger.open”, og det vil tage meget tid at dække alle de 15 argumenter. Så vi vil bare prøve at forstå nogle af de grundlæggende i Workbooks.open og se, hvordan vi kan bruge denne funktion i VBA til at åbne Workbooks.

Så det første trin i denne metode er, at du skal kende filnavnet på Excel-projektmapper. Nedenfor er udsagnet om at åbne projektmapper. ”Arbejdsbøger.åben“ File_Name ”

Eller

Arbejdsbøger. Åbn filnavn: = ”File_Name”

"File_Name" er navnet på de arbejdsbøger, du vil åbne. Men du skal være forsigtig her, fordi du skal angive den fulde sti, hvor filen gemmes, og navnet på filen med filtypenavnet (.XLS, .XLSX, .xlsm, osv.). Vi kan tage eksemplet med nedenstående makro for at forstå denne funktion.

Eksempel

Antag, at du vil åbne en excel-fil med navnet "Testfil", der gemmes i computerens D-drev. Opret en makro i en Excel-makroaktiveret arbejdsbog. Følg nedenstående trin for at bruge Excel VBA Workbooks.open-metoden.

Trin 1: Klik på File.

Trin 2: Klik på Indstillinger .

Trin 3: Klik på Tilpas bånd .

Trin 4: Sørg for, at feltet Udvikler er markeret som nedenfor, og klik på ok.

Trin 5: Når du har udvikler-fanen, skal du klikke på Visual basic som vist i nedenstående skærmbillede.

Når du har klikket på Visual Basics, skal du starte kodning for din makro.

Trin 6: Indtast nedenstående kode i VBA-modulet.

Kode:

 Sub Open_workbook () End Sub

Denne kode indeholder navnet på din projektmappe.

Trin 7: Indtast koden, der kan åbne projektmappen, der er gemt i computerens D-drev.

Kode:

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

Trin 8: Kør koden ved at trykke på F5-tasten eller ved at klikke på Play-knappen. Når du har kørt makroen, finder du, at excel-filen åbnes automatisk. Som du kan se i ovenstående kode, åbner makroen Excel-filen med navnet “Test File.xlsx”, der gemmes i D-drevet på computeren. Stien nævnt ovenfor er ganske enkel, fordi der ikke er nogen mapper og undermapper, der kan hente arbejdsbøgerne.

Dette bliver udfordrende, fordi mange mennesker ikke kan huske stien, og hvis stien til filen, hvor den gemmes ændres en smule, fungerer makroen ikke. Makroen fungerer ikke, selvom filens navn ændres med et enkelt bogstav. Så hvis stien / navnet på filen ændres, skal du ændre VBA-koden på makroen. Dette gør jobet kedeligt, og det er heller ikke fejlfrit. Så for at sikre, at din makro kører perfekt uden at give dig en fejl, bruger vi den anden metode, der er let at håndtere og ikke giver dig en fejl, selv når du ikke kan huske stienavnet eller endda når filnavnet ændres .

Metode nr. 2 - Få åbent filnavn

Som du kender de udfordringer, vi står overfor i den første metode til ændring af stien og filnavnet, undgår denne metode begge udfordringerne. Denne metode giver mulighed for at gennemse på din computer til det sted, hvor din fil er gemt, og åbner de bestemte arbejdsbøger, som du vil åbne.

Denne metode fungerer faktisk i to dele.

Den første del af denne metode er Application.GetOpenFileName. Denne del giver dig mulighed for at gennemse din computer og vælge den sti, hvor din fil er gemt. Den første del åbner ikke den fil, du vil åbne.

Den anden del er at åbne den fil, som du stadig skal være afhængig af den første metode (VBA Workbooks.open-metoden). Der er 5 argumenter i Application.GetOpenFileName, men vil kun se på det grundlæggende, som om vi gjorde det i den første metode. Lad os nu prøve at forstå denne metode ved hjælp af et eksempel.

Eksempel

Antag, at du vil åbne den "Testfil", der er gemt i D-drevet på computeren, så skal du bare følge nedenstående trin.

Trin 1: Følg trin 1 nævnt i det første eksempel for at åbne Visual Basic Editor eller Open Visual Basic Editor fra fanen Udvikler.

Trin 2: Indtast nedenstående kode, der indeholder navnet på din makro.

Kode:

 Sub Open_workbook_example2 () End Sub

Trin 3: Indtast nedenstående kode. Denne erklæring erklærer filnavnet som variabel, fordi vi her ikke specificerer nogen sti eller filnavn, fordi det kan ændre sig fra tid til anden.

Kode:

 Sub Open_workbook_example2 () Dim Myfile_Name Som Variant End Sub

Trin 4: Indtast nedenstående kode. Denne erklæring åbner dialogboksen nedenfor, og du kan gennemse mapperne for at gå til den sti, hvor filen gemmes. Den vil også vise Excel-filen, mens du gennemser, fordi vi har sat et filter til Excel-filerne.

Kode:

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

Trin 5: Indtast nedenstående kode. Denne erklæring er Hvis derefter-sætning, der bruges, når filen. Navn ikke er lig med falsk, skal du åbne den valgte Excel-fil.

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

Trin 6: Indtast nedenstående kode. Denne erklæring lukker tilstanden If derefter 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 Hvis End Sub Sub

Trin 7: Kør nu koden ved at trykke på F5-tasten eller ved at klikke på Play-knappen. Du vil se dialogboksen for at gennemse filen åbnes. Gennemse til skrivebordet, hvor din fil gemmes. Nu vil du være i stand til at se filen på D-drevet. Vælg filen, og klik på åben.

Som vi lige så i vores eksempel, behøver vi ikke at bekymre os om filnavnet og stienavnet, hvor filen gemmes. Vi kan nemt navigere til den mappe, hvor vores fil er gemt, og vælge den fil, som vi vil åbne. Så vi kan let konkludere, at denne metode er meget mere effektiv sammenlignet med den første metode.

Ting at huske

  • Sørg for, at stienavnet og filnavnet er korrekt, mens du bruger den første metode. Makroen fungerer ikke, når der er en ændring efter bogstav eller mellemrum i stien eller Filnavnet.
  • Sørg for, at de filtre, der er nævnt i koden i 2. metode, er korrekte. Der er mange formater af Excel, som muligvis ikke er synlige på grund af et filter.
  • Sørg for, at deklarationen og koden, der bruges i VBA, er rigtige for at undgå fejl.

Anbefalede artikler

Dette er en guide til VBA Workbook Open. Her diskuterer vi to forskellige metoder til at åbne arbejdsbogen ved hjælp af Excel VBA-kode sammen med praktiske eksempler og downloadbar excel-skabelon. Du kan også se på de følgende artikler for at lære mere -

  1. Komplet guide til VBA-arbejdsbog
  2. HYPERLINK formel i Excel
  3. Åbn filer med VBA FileDialog
  4. Eksempler på Excel-regneark

Kategori:

VBA