VBA GetOpenFileName - Hvordan bruker GetOpenFileName i Excel VBA?

Innholdsfortegnelse:

Anonim

Excel VBA GetOpenFileName

Det er mange måter å åpne hvilken som helst fil. Men det er også flere måter å åpne den samme filen også. I VBA har vi forskjellige funksjoner som vi kan åpne hvilken som helst fil. Vi kan åpne filen ved å sette banen til filen i VBA-kode, vi kan til og med registrere denne prosessen også. Men den beste måten å åpne en hvilken som helst fil i VBA er ved hjelp av VBA GetOpenFileName- applikasjonen. Som navnet sier, er det rent applikasjon når du åpner en hvilken som helst fil i VBA.

I andre funksjoner eller applikasjoner som fungerer etter samme prinsipp, kan det hende vi må kopiere filen til filen atskilt med tilbakeslag, og holde mappenavn og nøyaktige mellomrom mellom tilbakeslag. Det kan også hende at vi må angi det eksakte filnavnet sammen med utvidelsen som vi ønsker å åpne. Men i VBA GetOpenFileName, trenger vi bare å velge filen fra stedet. Det vil gi ruten der vi kan bla gjennom filen der den er lagret, og utvidelsen av filen vil også fikses.

Syntaks for GetOpenFilename i VBA

La oss se nedenfor formelen for GetOpenFilename i Excel VBA.

Nedenfor er argumentet til VBA GetOpenFileName-applikasjonen.

  • FileFilter - I dette kan vi definere hva slags fil vi ønsker å se. Hvis vi for eksempel nevner “Excel-filer, *. Xlsx”, vil den finne og vise alle excel-filene i .xlsx-format. Hvis vi nevner "PDF-filer, *. Pdf", vil den bare finne og vise alle pdf-filene.
  • FilterIndex - På denne måten kan vi la en bruker begrense seg for å velge filtype. Vi kan spesifisere antall filer vi trenger å vise.
  • Tittel - Den viser filen som er valgt fil, i dialogbokstittelen.
  • ButtonText - Det er bare for MacBook-brukere.
  • MultiSelect - Hvis vi velger flere filer, vil det være SANN, ellers vil det være FALSE som uansett er en standardverdi.

Hvordan åpne fil ved hjelp av GetOpenFileName i Excel VBA?

Nedenfor er de forskjellige eksemplene for å åpne en fil ved å bruke GetOpenFileName-applikasjonen i Excel VBA.

Du kan laste ned denne VBA GetOpenFileName Excel-malen her - VBA GetOpenFileName Excel Template

Excel VBA GetOpenFileName - Eksempel 1

I dette eksemplet vil vi se hvordan du åpner en Excel-fil først. Følg trinnene nedenfor for å bruke GetOpenFileName i Excel VBA:

Trinn 1: Gå til Sett inn-menyen og klikk på Modul for å åpne den.

Trinn 2: Skriv underkategorien til VBA Getopenfilename eller velg et hvilket som helst annet navn som du velger å definere underkategori.

Kode:

 Sub OpenFile () Slutt Sub

Trinn 3: Definer nå en variabel og gi den en streng som vist nedenfor. Velge en streng fordi vi vil velge eller velge filnavnet.

Kode:

 Sub OpenFile () Dim A As String End Sub

Trinn 4: Nå i definert variabel En bruk applikasjon som vist nedenfor.

Trinn 5: Søk nå og velg GetOpenFileName fra den aktiverte listen over applikasjoner som vist nedenfor.

Trinn 6: Bruk nå MsgBox slik at vi får plasseringen av filen som vi velger.

Kode:

 Sub OpenFile () Dim A As String A = Application.GetOpenFilename () MsgBox A End Sub

Trinn 7: Sett sammen koden ved å trykke på F5-funksjonstasten og kjør den ved å klikke på Spill-knappen. Bla gjennom filen vi vil velge. Her har vi fulgt banen og valgt excel-filen som heter Test File som vanligvis er i .xlsx- format. Klikk på Åpne.

Den vil vise banen til den filen som vi har valgt tidligere i en meldingsboks som vist nedenfor.

Trinn 8: Nå som per syntaks vil vi bruke Filefilter i beslaget til GetOpenFilename-applikasjonen. Som vi vet er den ment for å velge filtypen vi vil åpne den. Så vi vil sette “Excel Files” for det som vist nedenfor.

Kode:

 Sub OpenFile () Dim A As String A = Application.GetOpenFilename (Filefilter: = "Excel Files") MsgBox A End Sub

Trinn 9: Legg nå utvidelsen av Excel-filen som vi har valgt tidligere. Det var “ .xlsx ”, så vi vil beholde det også i FileFilter.

Kode:

 Sub OpenFile () Dim A As String A = Application.GetOpenFilename (Filefilter: = "Excel Files, * .xlsx") MsgBox A End Sub

Trinn 10: Nå kjører vi den komplette koden igjen. I søkemappen får vi bare Excel-filer som er tilgjengelige i den mappen som vi har bladd tidligere.

Og hvis vi prøver å se noe annet filformat eller filtype i Excel-filer, vil det igjen bare vise Excel-filer.

Excel VBA GetOpenFileName - Eksempel nr. 2

På samme måte kan vi se åpne filnavnet med filtypen “ .pdf ”. Følg trinnene nedenfor for å bruke GetOpenFileName i Excel VBA:

Trinn 1: Skriv igjen koden som vi har sett i eksempel-1.

Kode:

 Sub OpenFile1 () Dim A As String A = Application.GetOpenFilename () MsgBox A End Sub

Trinn 2: Den tar oss til det samme vinduet, ellers blar du til den samme mappen. Nå velger du noen av PDF-filer og klikker på Åpne.

Det vil gi oss banen til den valgte filen.

Trinn 3: Nå for å få den valgte PDF-filen, i FileFilter-syntaks, skriv "PDF Files" i stedet for "Excel Files" og velg utvidelsen av PDF som er " .pdf " som vist nedenfor.

Kode:

 Sub OpenFile1 () Dim A As String A = Application.GetOpenFilename (Filefilter: = "PDF-filer, * .pdf") MsgBox A End Sub

Trinn 4: Sett sammen koden igjen og kjør etter den. Vi vil få nettlesermappen til å åpne filene. I det vil vi bare få filene med filtypen “ .pdf ” som vist nedenfor.

Og hvis du prøver å filtrere andre filformater, vil det igjen tillate oss å se bare PDF-filer som vist nedenfor.

Og hvis vi ikke velger noen fil og går ut av vinduet, vil den gi en standardmelding som er usann .

Fordeler med Excel VBA GetOpenFileName

  • VBA GetOpenFileName hjelper oss med å åpne filen direkte uten å lime inn banen til filen i VBA-kode.
  • Vi trenger ikke å endre banen til filene flere ganger.
  • Bla gjennom og velge filene gjennom dette er så enkelt som å gå til den mappen for å åpne dem.

Ulemper med Excel VBA GetOpenFileName

  • Vi må endre utvidelsen av en fil som vi ønsker å åpne hvis det er en endring i den.

Ting å huske

  • Endre filtypen når du trenger å åpne en annen versjon av filen.
  • Meldingsboks med en melding som FALSE er standardmeldingen som kommer hver gang vi ikke velger noen fil som skal åpnes.
  • En slik prosess kan ikke opprettes ved hjelp av Record Macro-funksjonen.
  • Husk å lagre filen som et makroaktivert Excel-format. Så den skrevne VBA-koden vil bli bevart.

Anbefalte artikler

Dette er en guide til VBA GetOpenFileName. Her diskuterer vi hvordan du åpner en fil ved å bruke GetOpenFileName-applikasjonen i Excel ved hjelp av VBA-kode sammen med noen praktiske eksempler og nedlastbar Excel-mal. Du kan også gå gjennom andre foreslåtte artikler -

  1. VBA Finn og erstatt (eksempler)
  2. Gruppearkeark i Excel
  3. VBA arbeidsbok
  4. Cellehenvisninger i Excel