Excel VBA -työkirja avoinna

Tavallisimpia päivittäisiä toimia on avata excel-työkirjat, kun työskentelet Excelin kanssa. Et voi työskennellä Excelissä avaamatta Excel-työkirjoja tai Excel-tiedostoa. Joten tässä artikkelissa aiomme tarkastella kuinka voimme avata Excel-työkirjat VBA: n avulla.

Menetelmät Exel-työkirjojen avaamiseksi VBA: lla

Excel-työkirjojen avaamiseksi VBA: lla on kaksi tapaa, ja käsittelemme molempia menetelmiä tässä artikkelissa.

Voit ladata tämän VBA-työkirjan avoimen Excel-mallin täältä - VBA-työkirjan avoimen Excel-mallin

Menetelmä nro 1 - Excel VBA Workbooks.open Method

Ensimmäinen menetelmä VBA: ssa on käyttää sisäänrakennettua Workbooks.open- toimintoa. Workbooks.open-toiminnossa on 15 valinnaista argumenttia, ja kaikkien 15 argumentin peittäminen vie paljon aikaa. Joten yritämme vain ymmärtää joitain Workbooks.open-perusteita ja nähdä kuinka voimme käyttää tätä toimintoa VBA: ssa työkirjojen avaamiseen.

Joten tämän menetelmän ensimmäinen askel on, että sinun pitäisi tietää Excel-työkirjojen tiedostonimi. Alla on ilmoitus työkirjojen avaamisesta. ”Workbooks.open“ File_Name ”

Tai

Workbooks.Open Filename: = ”File_Name”

”Tiedoston_nimi” on avattavien työkirjojen nimi. Mutta tässä on oltava varovainen, koska sinun on annettava koko polku, johon tiedosto tallennetaan, ja tiedoston nimi tiedostotunnisteella (.XLS, .XLSX, .xlsm jne.). Voimme ottaa esimerkin alla olevasta makrosta ymmärtääksesi tätä toimintoa.

esimerkki

Oletetaan, että haluat avata Excel-tiedoston nimellä “Test File”, joka on tallennettu tietokoneen D-asemaan. Luo makro Excel-makrotietokantaan. Noudata alla olevia vaiheita käyttääksesi Excel VBA Workbooks.open -menetelmää.

Vaihe 1: Napsauta Tiedosto.

Vaihe 2: Napsauta Asetukset .

Vaihe 3: Napsauta Customize Ribbon .

Vaihe 4: Varmista, että Kehittäjä-kenttä on merkitty alla ja napsauta ok.

Vaihe 5: Kun sinulla on kehittäjä-välilehti, napsauta Visual basic seuraavan kuvakaappauksen osoittamalla tavalla.

Kun olet napsauttanut Visuaaliset perusteet, sinun on aloitettava koodaus makroosi.

Vaihe 6: Kirjoita alla oleva koodi VBA-moduuliin.

Koodi:

 Sub Avoin työkirja () End Sub 

Tämä koodi antaa työkirjan nimen.

Vaihe 7: Kirjoita koodi, joka voi avata tietokoneen D-asemaan tallennetun työkirjan.

Koodi:

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

Vaihe 8: Suorita koodi painamalla F5-näppäintä tai napsauttamalla Play-painiketta. Kun olet suorittanut makron, huomaat, että excel-tiedosto avataan automaattisesti. Kuten yllä olevasta koodista näet, makro avaa Excel-tiedoston nimellä Test Test.xlsx, joka tallennetaan tietokoneen D-asemaan. Edellä mainittu polku on melko yksinkertainen, koska työkirjoja ei ole kansioissa ja alikansioissa.

Tästä tulee haastavaa, koska monet ihmiset eivät muista polkua ja jos tiedoston polku, johon se tallennetaan, muuttuu vähän, makro ei toimi. Makro ei toimi, vaikka tiedoston nimi muuttuisi yhdellä kirjaimella. Joten jos tiedoston polku / nimi muuttuu, sinun on vaihdettava makron VBA-koodi. Tämä tekee työstä tylsiä, eikä se ole myöskään virheetön. Joten varmistaaksemme, että makro toimii täydellisesti antamatta sinulle virhettä, käytämme toista menetelmää, jota on helppo käsitellä ja joka ei anna sinulle virhettä, vaikka et muista polkua tai vaikka tiedoston nimi muuttuisi .

Tapa 2 - Hanki avoin tiedostonimi

Koska tiedät haasteet, joita kohtaamme ensimmäisessä polunmuutosmenetelmässä ja tiedostonimessä, tällä menetelmällä vältetään molemmat haasteet. Tämä menetelmä antaa mahdollisuuden selata tietokoneellasi sijaintiin, johon tiedosto tallennetaan, ja avaa kyseisen työkirjan, jonka haluat avata.

Tämä menetelmä todella toimii kahdessa osassa.

Tämän menetelmän ensimmäinen osa on Application.GetOpenFileName. Tämän osan avulla voit selata tietokonettasi ja valita polun, johon tiedosto tallennetaan. Ensimmäinen osa ei avaa tiedostoa, jonka haluat avata.

Toinen osa on avata tiedosto, jonka sinun on edelleen oltava riippuvainen ensimmäisestä menetelmästä (VBA Workbooks.open Method). Sovelluksessa on 5 argumenttia.GetOpenFileName, mutta tarkastellaan vain perusasioita, kuten teimme sen ensimmäisessä menetelmässä. Yritämme nyt ymmärtää tätä menetelmää esimerkin avulla.

esimerkki

Oletetaan, että haluat avata tietokoneen D-asemaan tallennetun testitiedoston, sinun on vain noudatettava seuraavia vaiheita.

Vaihe 1: Noudata ensimmäisessä esimerkissä mainittua vaihetta 1 avataksesi Visual Basic Editor tai Open Visual Basic Editor Developer -välilehdeltä.

Vaihe 2: Kirjoita alla oleva koodi, joka antaa makroosi nimen.

Koodi:

 Sub Open_workbook_example2 () Sub Sub 

Vaihe 3: Kirjoita alla oleva koodi. Lause julistaa tiedostonimen muuttuvaksi, koska emme tässä määrittele polkua tai tiedostonimeä, koska se voi muuttua ajoittain.

Koodi:

 Sub Open_workbook_example2 () Dim Myfile_Name Variant End Sub Sub 

Vaihe 4: Kirjoita alla oleva koodi. Tämä lausunto avaa alla olevan valintaikkunan ja voit selata kansioita siirtyäksesi polulle, johon tiedosto tallennetaan. Lisäksi se näyttää Excel-tiedoston selaamisen aikana, koska olemme laittaneet suodattimen Excel-tiedostoille.

Koodi:

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

Vaihe 5: Kirjoita alla oleva koodi. Tämä lause on Jos sitten -lause, jota käytetään, kun tiedosto .Name ei ole sama kuin väärä, avaa valittu Excel-tiedosto.

Koodi:

 Sub Open_workbook_example2 () Dim Myfile_Name Variant Myfile_Name = Application.GetOpenFilename (FileFilter: = "Excel Files (*. Xl *), *. Xl *)") Jos Myfile_Name vääriä, sitten Workbooks.Open Filename: = Myfile_Name End Sub Sub 

Vaihe 6: Kirjoita alla oleva koodi. Tämä lausunto sulkee makron If-ehdon.

Koodi:

 Sub Open_workbook_example2 () Dim Myfile_Name Variant Myfile_Name = Application.GetOpenFilename (FileFilter: = "Excel Files (*. Xl *), *. Xl *)") Jos Myfile_Name vääriä, sitten Workbooks.Open Filename: = Myfile_Name End if End Sub 

Vaihe 7: Suorita nyt koodi painamalla F5-näppäintä tai napsauttamalla Play-painiketta. Näyttöön tulee valintaikkuna tiedoston selaamiseksi. Selaa työpöydälle, johon tiedosto tallennetaan. Nyt voit nähdä tiedoston D-asemassa. Valitse tiedosto ja napsauta Avaa.

Nyt kuten näimme juuri esimerkissämme, meidän ei tarvitse huolehtia tiedostonimestä ja polun nimestä, johon tiedosto tallennetaan. Olemme helposti siirtymässä kansioon, johon tiedostomme on tallennettu, ja valitse tiedosto, jonka haluamme avata. Joten voimme helposti päätellä, että tämä menetelmä on paljon tehokkaampi kuin ensimmäinen menetelmä.

Muistettavat asiat

  • Varmista, että polku ja tiedostonimi ovat oikein, kun käytät ensimmäistä menetelmää. Makro ei toimi, kun polussa tai tiedostonimessä on muutos kirjaimella tai välilyönnillä.
  • Varmista, että toisen menetelmän koodissa mainitut suodattimet ovat oikeat. On monia Excel-muotoja, jotka eivät ehkä ole näkyviä suodattimen takia.
  • Varmista, että VBA: ssa käytetty ilmoitus ja koodi ovat oikein virheiden välttämiseksi.

Suositellut artikkelit

Tämä on VBA Workbook Open -oppaan opas. Tässä keskustellaan kahdesta erilaisesta menetelmästä työkirjan avaamiseen käyttämällä Excel VBA -koodia sekä käytännön esimerkkejä ja ladattavaa Excel-mallia. Voit myös katsoa seuraavia artikkeleita saadaksesi lisätietoja -

  1. Täydellinen opas VBA-työkirjaan
  2. HYPERLINK-kaava Excelissä
  3. Avaa tiedostot VBA FileDialog -sovelluksella
  4. Esimerkkejä Excel-laskentataulukosta

Luokka: