Cara Membuka Buku Kerja dengan Nama Variabel dengan Excel VBA

Hugh West

10-08-2023 Makro &; Excel VBA
  • Bagikan Ini
Hugh West

Secara alami, kita mungkin perlu membuka file dari file Excel induk menggunakan VBA di direktori yang berbeda. Tetapi pada saat yang sama, kami memiliki berbagai jenis kriteria juga tentang bagaimana kami ingin membuka buku kerja. Jika Anda penasaran untuk mengetahui bagaimana Anda dapat membuka buku kerja dengan nama variabel, maka artikel ini mungkin berguna bagi Anda. Pada artikel ini, kami membahas bagaimana Anda dapat membuka buku kerja dengan nama variabelmenggunakan VBA di Excel dengan penjelasan yang rumit.

Unduh Buku Kerja Praktik

Unduh buku kerja latihan ini di bawah ini.

Buka Buku Kerja dengan Nama Variabel Menggunakan VBA.xlsm

Contoh.xlsx

4 Cara Mudah untuk Membuka Buku Kerja dengan Nama Variabel Menggunakan VBA di Excel

Kami memiliki informasi produk dari beberapa produk dengan Id mereka. ini adalah contoh file yang akan kita buka menggunakan kode VBA.

1. Menggunakan Workbook.Open Property

Menggunakan Buku Kerja.Open kita bisa membuka file dengan menyebutkan direktori, atau tidak menyebutkan lokasinya. Kita juga bisa membuat file yang dibuka menjadi read-only.

1.1 Buka Buku Kerja Menyebutkan Jalur File

Dalam metode berikutnya, kita akan menggunakan Buku Kerja.Open Property untuk membuka file langsung dari direktori lokasi file yang disebutkan. Tidak peduli di mana file tersebut berada, kita dapat membuka file tersebut dengan mudah.

Langkah-langkah

  • Kita memiliki file yang tersimpan dalam folder dokumen yang perlu kita buka.
  • Kita akan menggunakan nama file sebagai variabel dan kemudian membuka file menggunakan makro VBA kecil.
  • Direktori file yang tepat dari file ditunjukkan di bawah ini pada jendela properties.

  • Pertama, pergi ke Pengembang tab dan klik pada Visual Basic Jika Anda tidak memiliki itu, Anda harus mengaktifkan tab Developer Atau Anda juga bisa menekan ' Alt+F11' untuk membuka Editor Visual Basic .

  • Kemudian akan ada kotak dialog baru, dalam kotak dialog itu, klik pada Sisipkan > Modul .

  • Selanjutnya, di dalam Modul jendela editor, ketikkan kode berikut ini: 
 Sub Buka_dengan_File_Path() Dim Buka_File As String: File_path = "C:\Usersers\User\OneDrive\Documents\Sample" Dim wrkbk As Workbook Set wrkbk = Workbooks.Open(Nama_file:=File_path) End Sub

  • Kemudian tutup Modul jendela.
  • Setelah itu, pergi ke Lihat tab> Makro .
  • Kemudian klik pada Lihat Makro .

  • Setelah mengklik Lihat Makro, pilih makro yang baru saja Anda buat. Nama di sini adalah Open_with_File_Path Kemudian klik Lari .

  • Setelah itu Sampel file akan terbuka.

🔎 Perincian Kode 

 Sub Buka_dengan_File_Path()

⮚ Pertama, kita memberikan nama untuk sub-prosedur yaitu Open_with_File_Path . 

 Dim Open_File As String: File_path = "C:\Usersers\User\OneDrive\Documents\Sample"

⮚ Kemudian, kita menaruh lokasi file di dalam File_Path variabel 

 Dim wrkbk Sebagai Buku Kerja

⮚ Kemudian, kita mendeklarasikan variabel kita wrkbk yang jenisnya adalah buku kerja. 

 Set wrkbk = Workbooks.Open(Filename:=File_path)

⮚ Kemudian, kita membuka file yang dinamai di dalam File_Path variabel direktori dan mengatur file sebagai wrkbk variabel. 

 Akhiri Sub

⮚ Akhirnya, kita akhiri sub-prosedur dari kode ini.

Baca selengkapnya: Cara Membuka Buku Kerja dari Path Menggunakan Excel VBA (4 Contoh)

1.2 Membuka Buku Kerja Tanpa Menyebutkan Jalur File

Pada metode berikutnya, kita akan membuka file dari folder induk, tempat file utama disimpan. File dapat dibuka tanpa menyebutkan lokasi apapun dalam kode. File ini hanya harus berada di folder yang sama dengan folder induk.

Langkah-langkah

  • Kita memiliki file berbeda yang disimpan di direktori yang sama di mana file Excel induk sekarang disimpan.
  • Nama file adalah 1.

  • Pertama, pergi ke Pengembang tab dan klik pada Visual Basic Jika Anda tidak memiliki itu, Anda harus mengaktifkan tab Developer Atau Anda juga bisa menekan ' Alt+F11 ' untuk membuka Editor Visual Basic .

  • Kemudian akan ada kotak dialog baru, dalam kotak dialog itu, klik pada Sisipkan > Modul .

  • Selanjutnya, di dalam Modul jendela editor, ketikkan kode berikut ini: 
 Sub Buka_tanpa_File_Path() Dim wrkbk As Workbook Set wrkbk = Workbooks.Open(Nama_file:="1.xlsx") End Sub

  • Kemudian tutup Modul jendela.
  • Setelah itu, pergi ke Lihat tab> Makro .
  • Kemudian klik pada Lihat Makro .

  • Setelah mengklik View Macros, pilih macro yang baru saja Anda buat. Namanya di sini adalah Open_without_File_Path Kemudian klik Run.

  • Setelah menekan Lari Anda akan melihat bahwa file bernama 1 sekarang terbuka.
  • Dan beginilah cara kami membuka buku kerja dengan nama variabel menggunakan VBA di Excel.

🔎 Perincian Kode 

 Sub Buka_tanpa_File_Path()

⮚ Pertama, kita memberikan nama untuk sub-prosedur yaitu Sub Buka_tanpa_File_Path() 

 Dim wrkbk Sebagai Buku Kerja

⮚ Kami menyatakan wrkbk sebagai variabel dalam jenis Buku Kerja 

 Set wrkbk = Workbooks.Open(Filename:="1.xlsx")

⮚ Kita membuka file dari direktori induk bernama 1.xlsx . 

 Akhiri Sub

⮚ Akhirnya, kita akhiri sub-prosedur dari kode ini.

1.3 Membuka Buku Kerja sebagai Read Only

Metodenya sangat mirip dengan metode pertama, tetapi di sini kita akan membuka file dalam mode read-only, yang berarti kita tidak dapat mengubah data atau nilai apa pun dalam file Excel.

Langkah-langkah

  • File yang ingin kita buka disimpan di folder dokumen.
  • Dan ini adalah file yang ingin kita buka sebagai read-only.

  • Pertama, pergi ke Pengembang tab dan klik pada Visual Basic Jika Anda tidak memiliki itu, Anda harus mengaktifkan tab Developer Atau Anda juga bisa menekan ' Alt+F11 ' untuk membuka Visual Basic Editor.

  • Kemudian akan ada kotak dialog baru, dalam kotak dialog itu, klik pada Sisipkan > Modul .

  • Selanjutnya, di dalam Modul jendela editor, ketikkan kode berikut ini: 
 Sub Open_with_File_Read_Only() Dim wrkbk As Workbook Set wrkbk = Workbooks.Open("C:\Users\User\OneDrive\Documents\Sample", ReadOnly:=True) End Sub
  • Kemudian tutup Modul jendela.
  • Setelah itu, pergi ke Lihat tab> Makro .
  • Kemudian klik pada Lihat Makro .

  • Setelah mengklik View Macros, pilih macro yang baru saja Anda buat. Namanya di sini adalah Buka_dengan_File_Baca_Saja Kemudian klik Lari .

  • Setelah mengklik Lari kita akan melihat bahwa file sekarang dibuka sebagai read-only, seperti yang ditunjukkan pada title bar.

🔎 Perincian Kode 

 Sub Buka_dengan_File_Baca_Hanya()

⮚ Pertama, kita memberikan nama untuk sub-prosedur yaitu Buka_dengan_File_Baca_Hanya() 

 Dim wrkbk Sebagai Buku Kerja

⮚ Kami menyatakan wrkbk sebagai variabel dalam jenis Buku Kerja 

 Set wrkbk = Workbooks.Open("C:\Users\User\OneDrive\Documents\Sample", ReadOnly:=True)

⮚ File kemudian akan terbuka dari direktori yang ditunjuk, dan file akan diatur hanya-baca oleh argumen terakhir. 

 Akhiri Sub

⮚ Akhirnya, kita akhiri sub-prosedur dari kode ini.

Baca selengkapnya: Cara Membuka Buku Kerja sebagai Hanya-Baca dengan Excel VBA

2. Menggunakan Kotak Pesan

Hampir mirip dengan metode sebelumnya, kita dapat membuka file melalui kode VBA di sini di Excel, tetapi dalam kasus ini, kita akan memasukkan kotak pesan kecil di sini.

Langkah-langkah

  • Pertama, pergi ke Pengembang tab dan klik pada Visual Basic Jika Anda tidak memiliki itu, Anda harus mengaktifkan tab Developer Atau Anda juga bisa menekan ' Alt+F11' untuk membuka Editor Visual Basic .

  • Kemudian akan ada kotak dialog baru, dalam kotak dialog itu, klik pada Sisipkan > Modul .

  • Selanjutnya, di dalam Modul jendela editor, ketikkan kode berikut ini: 
 Sub Buka_File_dengan_Messege_Box() Dim path As String: path = "C:\Users\User\OneDrive\Documents\Sample.xlsx" If Dir(path) "" Then Workbooks.Open (path) MsgBox "File Berhasil Dibuka" Else MsgBox "Pembukaan File Gagal" End If End Sub

  • Kemudian tutup Modul jendela.
  • Setelah itu, pergi ke Lihat tab> Makro .
  • Kemudian klik pada Lihat Makro .

  • Setelah mengklik Lihat Makro, pilih makro yang baru saja Anda buat. Nama di sini adalah Buka_File_dengan_Messege_Box Kemudian klik Lari .

  • Kemudian kami mendapat kotak peringatan, yang menunjukkan bahwa File Berhasil Dibuka .
  • Kemudian klik OK .

  • Dan kemudian kita akan melihat bahwa file tersebut sekarang terbuka.

  • Dan kemudian kami mencoba mengubah kode sedikit.
  • Kita ubah nama file menjadi Sampel10 , dan sebenarnya tidak ada file bernama Sampel10 dalam folder dokumen.

  • Kemudian kita Lari kode lagi, dan ada kotak pesan yang mengatakan Pembukaan File Gagal .
  • Klik OK setelah ini.

🔎 Perincian Kode 

 Sub Buka_File_dengan_Messege_Box()

⮚ Pertama, kita memberikan nama untuk sub-prosedur yaitu Buka_dengan_File_Baca_Hanya() 

 Dim path Sebagai String:

⮚ Kami menyatakan wrkbk sebagai variabel dalam jenis Buku Kerja 

 If Dir(path) "" Then Workbooks.Open (path) 
 MsgBox "File Berhasil Dibuka" Else

⮚ Baris ini akan memeriksa apakah file bernama Sample tersedia di direktori atau tidak, Jika file ada di sana, maka ia akan membuka file dan pada saat yang sama akan menampilkan pesan. 

 MsgBox "Pembukaan File Gagal"

⮚ Jika tidak ada file bernama Sampel dalam direktori, maka pesan ini akan disampaikan. 

 Akhiri Jika

⮚ Akhirnya, kita akhiri sub-prosedur dari kode ini. 

 Akhiri Sub

⮚ Akhirnya, kita akhiri sub-prosedur dari kode ini.

Baca selengkapnya: Cara Membuka Buku Kerja dan Menjalankan Makro Menggunakan VBA (4 Contoh)

3. Penggunaan Kotak Dialog untuk Membuka File

Mengekstrak direktori lokasi file dan mengimpornya setiap kali dalam kode VBA cukup merepotkan. Untuk mengatasi masalah ini, kami akan menunjukkan bagaimana Anda dapat menggunakan kotak dialog untuk memilih file dari direktori mana pun.

Langkah-langkah

  • Sekarang kita akan membuka file menggunakan kotak dialog file explorer.
  • Pertama, pergi ke Pengembang tab dan klik pada Visual Basic Jika Anda tidak memiliki itu, Anda harus mengaktifkan tab Developer Atau Anda juga bisa menekan ' Alt+F11' untuk membuka Editor Visual Basic .

  • Kemudian akan ada kotak dialog baru, dalam kotak dialog itu, klik pada Sisipkan > Modul .

  • Selanjutnya, di dalam Modul jendela editor, ketikkan kode berikut ini: 
 Sub Buka_File_dengan_Dialog_Box() Dim Dbox As FileDialog Dim File_Path As String Dim wrkbk As Workbook Set Dbox = Application.FileDialog(msoFileDialogFilePicker) Dbox.Title = "Pilih dan Buka " & FileType Dbox.Filters.Clear Dbox.Show If Dbox.SelectedItems.Count = 1 Then File_Path = Dbox.SelectedItems(1) End If Set wrkbk = Workbooks.Open(Nama_file:=File_Path) End Sub
  • Kemudian tutup Modul jendela.
  • Setelah itu, pergi ke Lihat tab> Makro .
  • Kemudian klik pada Lihat Makro .

  • Setelah mengklik Lihat Makro, pilih makro yang baru saja Anda buat. Nama di sini adalah Buka_File_dengan_Dialog_Box Kemudian klik Lari .

  • Dan kemudian jendela baru terbuka. Pada kotak dialog file explorer dan pilih Sampel dan klik OK .

  • Kemudian file bernama Sampel dibuka.
  • Dan beginilah cara kami membuka buku kerja dengan nama variabel menggunakan VBA di Excel.

🔎 Perincian Kode 

 Sub Buka_File_dengan_Dialog_Box()

⮚ Pertama, kita memberikan nama untuk sub-prosedur yaitu Sub Buka_File_dengan_Dialog_Box() 

 Dim Dbox Sebagai FileDialog

⮚ Kami menyatakan Dbox sebagai variabel dalam FileDialog jenis 

 Dim File_Path Sebagai String

⮚ Kami menyatakan File_Path sebagai variabel di dalam File_Path Sebagai String jenis 

 Set Dbox = Application.FileDialog(msoFileDialogFilePicker) Dbox.Title = "Pilih dan Buka " & Jenis File

⮚ Akan ada kotak dialog dari baris pertama. Baris berikutnya menunjukkan nama kotak dialog dan jenis file.

⮚ Dbox.Title akan mengatur judul kotak dialog. dan Jenis File mengatur jenis file. 

 Dbox.Filters.Clear

⮚ The Dbox.Filters.Clear akan menghapus filter sebelumnya yang diterapkan di kotak diaog 

 Dbox.Show

⮚ The Dbox.Show akan membuat kotak dialog muncul pada file.

⮚ Baris ini akan menentukan apakah pengguna memilih lebih dari satu file atau tidak. Jika pengguna memilih lebih dari satu file, seluruh prosedur akan berhenti. 

 Akhiri Sub

⮚ Akhirnya, kita akhiri sub-prosedur dari kode ini.

Baca selengkapnya: Cara Membuka Folder dan Memilih File Menggunakan Excel VBA (4 Contoh)

4. Menggunakan Workbook.Add Property

Berlawanan dengan metode-metode sebelumnya, kita akan membuat file Excel baru dalam direktori yang telah ditentukan dan kemudian kita akan membukanya menggunakan perintah Buku Kerja. Tambahkan properti.

Langkah-langkah

  • Pertama, pergi ke Pengembang tab dan klik pada Visual Basic Jika Anda tidak memiliki itu, Anda harus mengaktifkan tab Developer Atau Anda juga bisa menekan ' Alt+F11' untuk membuka Editor Visual Basic .

  • Kemudian akan ada kotak dialog baru, dalam kotak dialog itu, klik pada Sisipkan > Modul .

Selanjutnya, di dalam Modul jendela editor, ketikkan kode berikut ini: 

 Sub Open_File_with_Add_Property() Dim File_Path As String: File_Path = "C:\Users\User\OneDrive\Documents\Sample.xlsx" Dim wb As Workbook Set wb = Workbooks.Add(File_Path) End Sub
  • Kemudian tutup Modul jendela.
  • Setelah itu, pergi ke Lihat tab> Makro .
  • Kemudian klik pada Lihat Makro .

  • Setelah mengklik Lihat Makro, pilih makro yang baru saja Anda buat. Nama di sini adalah Buka_File_dengan_Tambah_Properti Kemudian klik Lari .

  • Setelah mengklik Lari, Anda akan melihat bahwa file baru sekarang dibuat dan dibuka.

🔎 Perincian Kode

⮚ Pertama, kita memberikan nama untuk sub-prosedur yaitu Sub Buka_File_dengan_Tambah_Properti()

⮚ Kemudian kita menyatakan File_Path variabel sebagai String Tipe. 

 Dim File_Path As String: File_Path = "C:\Usersers\User\OneDrive\Documents\Sample.xlsx"

⮚ Dan mengatur File_Path ke lokasi berkas. 

 Dim wb Sebagai Buku Kerja

⮚ Kami menyatakan wb sebagai variabel di dalam Buku Kerja Tipe. 

 Set wb = Workbooks.Add(File_Path)

⮚ Buku kerja kemudian ditambahkan dari direktori yang tersimpan di dalam File_Path lokasi menggunakan Buku Kerja.Add properti. 

 Akhiri Sub

⮚ Akhirnya, kita akhiri sub-prosedur dari kode ini.

Baca selengkapnya: [Diperbaiki!] Metode Buka Buku Kerja Objek Gagal (4 Solusi)

Kesimpulan

Singkatnya, masalah bagaimana kita bisa membuka buku kerja dengan nama variabel menggunakan VBA dijawab di sini dengan 4 contoh berbeda. Makro VBA Metode ini membutuhkan Terkait VBA pengetahuan untuk memahami dari awal.

Untuk masalah ini, buku kerja yang mendukung makro tersedia untuk diunduh, di mana Anda bisa mempraktikkan metode-metode ini.

Jangan ragu untuk mengajukan pertanyaan atau umpan balik melalui bagian komentar. Saran apa pun untuk kemajuan Exceldemy masyarakat akan sangat dihargai

Postingan sebelumnya Cara Membuat Formulir dengan Daftar Drop Down di Excel
Postingan berikutnya Pengguliran Halus dengan Roda Mouse di Excel (Analisis Mendetail)

Hugh West adalah pelatih dan analis Excel yang sangat berpengalaman dengan pengalaman lebih dari 10 tahun di industri ini. Beliau meraih gelar Sarjana di bidang Akuntansi dan Keuangan dan gelar Master di bidang Administrasi Bisnis. Hugh memiliki hasrat untuk mengajar dan telah mengembangkan pendekatan pengajaran unik yang mudah diikuti dan dipahami. Pengetahuan ahlinya tentang Excel telah membantu ribuan siswa dan profesional di seluruh dunia meningkatkan keterampilan dan unggul dalam karier mereka. Melalui blognya, Hugh membagikan pengetahuannya kepada dunia, menawarkan tutorial Excel gratis dan pelatihan online untuk membantu individu dan bisnis mencapai potensi penuh mereka.