Hvordan åpne arbeidsbok med variabelnavn med Excel VBA

Hugh West

10-08-2023 Makroer & Excel VBA
  • Dele Denne
Hugh West

Naturligvis må vi kanskje åpne filen fra en overordnet Excel-fil ved hjelp av VBA i en annen katalog. Men samtidig har vi ulike typer kriterier også om hvordan vi ønsker å åpne arbeidsboka. Hvis du er nysgjerrig på hvordan du kan åpne en arbeidsbok med variabelnavnet, kan denne artikkelen være nyttig for deg. I denne artikkelen diskuterer vi hvordan du kan åpne en arbeidsbok med variabelnavn ved å bruke VBA i Excel med forseggjorte forklaringer.

Last ned øvelsesarbeidsbok

Last ned denne øvelsesarbeidsboken nedenfor.

Åpne arbeidsbok med variabelnavn ved å bruke VBA.xlsm

Sample.xlsx

4 Easy Måter å åpne arbeidsbok med variabelnavn ved å bruke VBA i Excel

Vi skal bruke datasettet nedenfor for demonstrasjonen. Vi har produktinformasjonen til flere produkter med deres ID. dette er en eksempelfil som vi skal åpne ved å bruke VBA-koden.

1. Bruke arbeidsbok. Åpne egenskapen

Bruke arbeidsboken .Open egenskap, vi kan åpne filer ved å nevne katalogen, eller ikke nevne plasseringen. Vi kan også gjøre den åpnede filen skrivebeskyttet.

1.1 Åpne arbeidsbok som nevner filbane

I den neste metoden skal vi bruke Arbeidsbok.Åpne egenskapen for å åpne filen direkte fra den nevnte filplasseringskatalogen. Uansett hvor filen befinner seg, kan vi åpne filensom er Sub Open_File_with_Add_Property()

⮚ Deretter erklærer vi File_Path variabelen som String type.

5555

⮚ Og sett File_Path -variabelen til plasseringen av filen.

7914

⮚ Vi erklærer wb som ​​en variabel i typen Arbeidsbok .

6650

⮚ Arbeidsboken legges deretter til fra katalogen som er lagret i File_Path -plasseringen ved å bruke egenskapen Workbook.Add .

6399

⮚ Til slutt avslutter vi underprosedyren til denne koden.

Les mer: [Fikset!] Metode Åpne objektarbeidsbøker mislyktes (4 løsninger)

Konklusjon

For å oppsummere, er spørsmålet om hvordan vi kan åpne arbeidsbøker med variabelnavn ved hjelp av VBA besvart her med 4 forskjellige eksempler. VBA Macro -metoden krever tidligere VBA-relatert kunnskap for å forstå fra bunnen av.

For dette problemet er en makroaktivert arbeidsbok tilgjengelig for nedlasting der du kan øve deg på disse metodene.

Still gjerne spørsmål eller tilbakemeldinger gjennom kommentarfeltet. Ethvert forslag til forbedring av Exceldemy -fellesskapet vil være svært verdsatt

enkelt.

Trinn

  • Vi har en fil lagret i dokumentmappen som vi må åpne.
  • Vi vil bruke filen navn som en variabel og åpne deretter filen med en liten VBA-makro.
  • Den eksakte filkatalogen til filen vises nedenfor i egenskapsvinduet.

  • Først, gå til Utvikler -fanen og klikk på Visual Basic . Hvis du ikke har det, må du aktivere Utvikler-fanen . Eller du kan også trykke ' Alt+F11' for å åpne Visual Basic Editor .

  • Deretter vil det være en ny dialogboks, i den dialogboksen klikker du på Sett inn > Modul .

  • Deretter skriver du inn følgende kode i redigeringsvinduet Module : 
9564

  • Lukk deretter Modul vinduet.
  • Deretter går du til Vis -fanen > Makroer .
  • Klikk deretter på Vis Makroer .

  • Etter å ha klikket Vis makroer, velg makroene du opprettet akkurat nå. Navnet her er Open_with_File_Path . Klikk deretter Kjør .

  • Deretter åpnes eksempel filen.

🔎 Oppdeling av koden 

5231

⮚ Først gir vi et navn for under- prosedyre som er Open_with_File_Path .

3011

⮚ Deretter legger vi plasseringen til filen i File_Path variabel 

7505

⮚Deretter erklærer vi vår variabel wrkbk , hvis type er en arbeidsbok.

9367

⮚ Deretter åpner vi filen som heter i katalogvariabelen File_Path og setter filen som wrkbk variabel.

1226

⮚ Til slutt avslutter vi underprosedyren til denne koden.

Les mer: Hvordan Åpne arbeidsbok fra bane ved hjelp av Excel VBA (4 eksempler)

1.2 Åpne arbeidsbok uten å nevne filbane

I neste metode vil vi åpne filen fra den overordnede mappen, hvor hovedfilen er lagret. Filen kan åpnes uten å nevne noe sted i koden. Denne filen må bare være i samme mappe som den overordnede mappen.

Trinn

  • Vi har en annen fil lagret i samme katalog der den overordnede filen Excel-filen er nå lagret.
  • Filnavnet er 1.

  • Gå først til Utvikler fanen og klikk på Visual Basic . Hvis du ikke har det, må du aktivere Utvikler-fanen . Eller du kan også trykke ' Alt+F11 ' for å åpne Visual Basic Editor .

  • Deretter vil det være en ny dialogboks, i den dialogboksen klikker du på Sett inn > Modul .

  • Deretter skriver du inn følgende kode i Module -redigeringsvinduet: 
6558

  • Lukk deretter Modul vinduet.
  • Deretter går du til Vis -fanen > Makroer .
  • Klikk deretter på VisMakroer .

  • Etter å ha klikket Vis makroer, velg makroene du opprettet akkurat nå. Navnet her er Open_without_File_Path . Klikk deretter Kjør.

  • Etter å ha trykket Kjør , vil du legge merke til at filen med navnet 1 nå er åpen.
  • Og dette er hvordan vi åpner arbeidsboken med variabelnavn ved å bruke VBA i Excel.

🔎 Oversikt over Kode 

8271

⮚ Først gir vi et navn for underprosedyren som er Sub Open_without_File_Path() 

1708

⮚ Vi erklærer wrkbk som en variabel i arbeidsboktype

8809

⮚ Vi åpner filen fra den overordnede katalogen kalt 1.xlsx .

2595

⮚ Til slutt avslutter vi underprosedyren av denne koden.

1.3 Åpne arbeidsbok som skrivebeskyttet

Metoden er ganske lik den første metoden, men her vil vi åpne filen i skrivebeskyttet modus, noe som betyr at vi ikke vil kan endre data eller verdier i Excel-filen.

Trinn

  • Filen vi ønsker å åpne lagres i dokumentmappen.
  • Og dette er filen vi ønsker å åpne som skrivebeskyttet.

  • Gå først til Utvikleren fanen og klikk på Visual Basic . Hvis du ikke har det, må du aktivere Utvikler-fanen . Eller du kan også trykke ' Alt+F11 ' for å åpne Visual Basic Editor.

  • Så kommer det en ny i dialogboksen, klikk på i den dialogboksenSett inn > Modul .

  • Skriv deretter inn Module -redigeringsvinduet følgende kode: 
7359
  • Lukk deretter Modul vinduet.
  • Deretter går du til kategorien Vis > Makroer .
  • Klikk deretter på Vis makroer .

  • Etter å ha klikket på Vis Makroer, velg makroene du opprettet akkurat nå. Navnet her er Open_with_File_Read_Only . Klikk deretter Kjør .

  • Etter å ha klikket Kjør vil vi se at filen nå er åpnet som skrivebeskyttet, som vist i tittellinjen.

🔎 Oversikt over koden 

7179

⮚ Først gir vi et navn for underprosedyren som er Open_with_File_Read_Only() 

8468

⮚ Vi erklærer wrkbk som variabel i arbeidsboktype

5124

⮚ Filen vil da åpnes fra den angitte katalogen, og filen vil bli satt til skrivebeskyttet av det siste argumentet.

4066

⮚ Til slutt avslutter vi underprosedyre for denne koden.

Les mer: Hvordan åpne arbeidsbok som skrivebeskyttet med Excel VBA

2. Bruke meldingsboks

Nesten lik den forrige metoden kan vi åpne filer gjennom VBA-koden her i Excel, men i dette tilfellet vil vi inkludere en liten meldingsboks her.

Trinn

  • Gå først til kategorien Utvikler og klikk på Visual Basic . Hvis du ikke har det, må du aktivereUtviklerfanen . Eller du kan også trykke ' Alt+F11' for å åpne Visual Basic Editor .

  • Deretter vil det være en ny dialogboks, i den dialogboksen klikker du på Sett inn > Modul .

  • Deretter skriver du inn følgende kode i redigeringsvinduet Module : 
1584

  • Lukk deretter Modul vinduet.
  • Deretter går du til Vis -fanen > Makroer .
  • Klikk deretter på Vis Makroer .

  • Etter å ha klikket Vis makroer, velg makroene du opprettet akkurat nå. Navnet her er Open_File_with_Messege_Box . Klikk deretter Kjør .

  • Så fikk vi advarselsboksen, som viser at Filen åpnet vellykket .
  • Klikk så OK .

  • Og så vil vi se at filen er nå åpen.

  • Og så prøver vi å endre koden litt.
  • Vi endrer filnavnet til Sample10 , og det er faktisk ingen fil som heter Sample10 i dokumentmappen.

  • Så vi Kjør koden på nytt, og det er en meldingsboks som sier Åpning av filen mislyktes .
  • Klikk OK etter dette.

🔎 Oppdeling av koden 

3618

⮚ Først gir vi et navn for underprosedyren som er Open_with_File_Read_Only() 

9041

⮚ Vierklær wrkbk som en variabel i arbeidsboken type 

5117
4026

⮚ Denne linjen vil sjekke om filen med navnet Sample er tilgjengelig i katalogen eller ikke. Hvis filen er der, vil den åpne filen og vil samtidig vise meldingen.

4218

⮚ Hvis det ikke er noen fil med navnet Sample i katalogen, vil denne meldingen bli levert.

3766

⮚ Til slutt avslutter vi underprosedyren til denne koden.

8294

⮚ Til slutt avslutter vi underprosedyren til denne koden.

Les mer: Hvordan åpne arbeidsbok og kjøre makro ved hjelp av VBA (4 eksempler)

3. Bruk av dialogboks for å åpne fil

Trekke ut filplasseringskatalogen og importere dem hver gang i VBA-koden er ganske tungvint. For å løse problemet vil vi vise hvordan du kan bruke en dialogboks til å velge fil fra en hvilken som helst katalog.

Trinn

  • Nå åpner vi filen ved hjelp av filutforsker-dialogboksen.
  • Gå først til Utvikler -fanen og klikk på Visual Basic . Hvis du ikke har det, må du aktivere Utvikler-fanen . Eller du kan også trykke ' Alt+F11' for å åpne Visual Basic Editor .

  • Deretter vil det være en ny dialogboks, i den dialogboksen klikker du på Sett inn > Modul .

  • Deretter skriver du inn følgende kode i Module -redigeringsvinduet: 
8307
  • Lukk deretter modulen vinduet.
  • Deretter går du til kategorien Vis > Makroer .
  • Klikk deretter på Vis makroer .

  • Etter å ha klikket Vis makroer, velg makroene du opprettet akkurat nå. Navnet her er Open_File_with_Dialog_Box . Klikk deretter Kjør .

  • Og så åpnes et nytt vindu. I filutforsker-dialogboksen og velg Sample og klikk OK .

  • Deretter heter filen Eksempel åpnet.
  • Og dette er hvordan vi åpner arbeidsboken med variabelnavn ved å bruke VBA i Excel.

🔎 Nedbryting av koden 

5398

⮚ Først gir vi et navn for underprosedyren som er Sub Open_File_with_Dialog_Box() 

6142

⮚ Vi erklærer Dbox som ​​en variabel i FileDialog type

3273

⮚ Vi erklærer File_Path som ​​en variabel i File_Path Som String type 

7956

⮚ Det vil være en dialogboks fra den første linjen. Den neste linjen angir dialogboksens navn og filtype.

⮚ Dbox.Title vil angi tittelen på dialogboksen. og FileType angi filtypen.

4011

⮚ Dbox.Filters.Clear tømmer alle tidligere filter brukt i dialogboksen

1116

⮚ Dbox.Show vil få dialogboksen til å vises på filen.

⮚ Denne linjen vil avgjøre om brukeren valgte mer enn én fil eller ikke. Hvis brukeren velger mer ennén fil, ville hele prosedyren stoppe.

4228

⮚ Til slutt avslutter vi underprosedyren til denne koden.

Les mer: Hvordan åpner du Mappe og velg fil ved å bruke Excel VBA (4 eksempler)

4. Bruke Workbook.Add Property

I motsetning til de tidligere metodene vil vi lage en ny Excel-fil i en forhåndsbestemt katalog og så åpner vi den ved å bruke arbeidsboken. Legg til egenskap.

Trinn

  • Gå først til Utvikler -fanen og klikk på Visual Basic . Hvis du ikke har det, må du aktivere Utvikler-fanen . Eller du kan også trykke ' Alt+F11' for å åpne Visual Basic Editor .

  • Deretter vil det være en ny dialogboks, i den dialogboksen klikker du på Sett inn > Modul .

Deretter skriver du inn følgende kode i redigeringsvinduet Module :

3839
  • Lukk deretter vinduet Modul .
  • Etter at det, gå til Vis -fanen > Makroer .
  • Klikk deretter på Vis makroer .

  • Etter å ha klikket Vis makroer, velg makroene du opprettet akkurat nå. Navnet her er Open_File_with_Add_Property . Klikk deretter Kjør .

  • Etter å ha klikket Kjør, vil du legge merke til at en ny fil er nå opprettet og åpnet.

🔎 Oppdeling av koden

⮚ Først gir vi et navn for underprosedyren

Forrige innlegg Hvordan lage et skjema med rullegardinliste i Excel
Neste innlegg Jevn rulling med musehjul i Excel (en detaljert analyse)

Hugh West er en svært erfaren Excel-trener og analytiker med over 10 års erfaring i bransjen. Han har en bachelorgrad i regnskap og finans og en mastergrad i bedriftsøkonomi. Hugh har en lidenskap for undervisning og har utviklet en unik undervisningstilnærming som er enkel å følge og forstå. Hans ekspertkunnskap om Excel har hjulpet tusenvis av studenter og fagfolk over hele verden med å forbedre sine ferdigheter og utmerke seg i karrieren. Gjennom bloggen sin deler Hugh sin kunnskap med verden, og tilbyr gratis Excel-opplæringer og nettbasert opplæring for å hjelpe enkeltpersoner og bedrifter å nå sitt fulle potensial.