Excel VBA: Simpan dan Tutup Buku Kerja (5 Contoh yang Sesuai)

  • Berkongsi Ini
Hugh West

Dalam artikel ini, kami akan menunjukkan kepada anda 5 kaedah menggunakan Excel VBA untuk menyimpan dan menutup Buku Kerja . Memandangkan masa sangat berharga, kita boleh menjimatkan banyak masa dengan melangkau tugas biasa menggunakan Excel VBA . Selain itu, Kami telah mengambil set data yang terdiri daripada 3 lajur : “ Nama ”, “ Lahir ”, dan “ Kerja Terkini ”. Set data ini mewakili 6 tahun lahir orang dan maklumat filem terkini mereka.

Muat Turun Buku Kerja Amalan

VBA untuk Simpan dan Tutup Buku Kerja.xlsm

5 Contoh untuk Simpan dan Tutup Buku Kerja Menggunakan VBA dalam Excel

1. Simpan dan Tutup Buku Kerja Aktif dengan Menggunakan Excel VBA

Untuk kaedah pertama, kami akan simpan dan tutup Buku Kerja Aktif menggunakan Makro VBA . Kami akan memaparkan tetingkap Modul VBA , taip kod kami dan kemudian laksanakan kod untuk mencapai matlamat kami. Tanpa berlengah lagi, mari kita beralih ke prosedur langkah demi langkah.

Langkah:

Sebelum ini, menaip kod kami, kami perlu memaparkan Modul VBA . Untuk melakukannya –

  • Pertama, daripada tab Pembangun >>> pilih Visual Basic .

Sebagai alternatif, anda boleh menekan ALT + F11 untuk melakukan ini juga. “ Microsoft Visual Basic untuk Aplikasi ” akan muncul selepas ini.

  • Kedua, daripada Sisipkan >>> pilih Modul .

Di sini, kami akan menaip kamikod.

  • Ketiga, taip kod berikut di dalam Modul .
3472

Pecahan Kod VBA

  • Pertama, kami memanggil Sub Prosedur Simpan_dan_Tutup_Buku Kerja_Aktif .
  • Kemudian, kami merujuk kepada Buku Kerja semasa kami sebagai Buku Kerja Aktif .
  • Selepas itu, menggunakan kaedah Tutup kami menutup fail kami.
  • Akhir sekali, kami telah menetapkan SaveChanges kepada True , yang akan menyimpan Buku Kerja kami selepas menutup .

Sekarang, kami akan melaksanakan kod kami.

  • Pertama, Simpan ini Modul .
  • Kedua, klik di dalam kod kami.
  • Akhir sekali, tekan butang Jalankan .

Jika kami pergi ke Aplikasi Excel kami, kami akan melihat Buku Kerja kami ditutup. Oleh itu, kami telah berjaya menyimpan dan menutup Buku Kerja menggunakan Excel VBA .

Baca Lagi: Cara Menyimpan Makro untuk Semua Buku Kerja dalam Excel (dengan Langkah Mudah)

2. Excel VBA untuk Menyimpan dan Menutup Buku Kerja Tertentu

Untuk kaedah kedua, kami akan menggunakan simpan dan tutup khusus Buku Kerja menggunakan kod VBA yang lain. Di sini, kami telah membuka dua Buku Kerja dan kami akan simpan dan tutup yang pertama Buku Kerja dari sebelah kiri.

Langkah:

  • Pertama, seperti yang ditunjukkan dalam kaedah 1 , tampilkan VBAModul .
  • Kedua, taip kod ini di dalam Modul itu.
3148

Pecahan Kod VBA

  • Pertama, kami memanggil Sub Prosedur Simpan_dan_Tutup_Buku Kerja_Khusus .
  • Kemudian, kami merujuk kepada Buku Kerja pertama kami di dalam objek Buku Kerja .
  • Selepas itu, menggunakan kaedah Tutup kami menutup fail kami.
  • Akhir sekali, kami telah menetapkan SaveChanges kepada True , yang akan menyimpan Buku Kerja kami semasa tutup .
  • Ketiga, seperti yang ditunjukkan dalam kaedah 1 , jalankan kod.

Selepas ini, kita akan melihat bahawa yang pertama Buku Kerja telah ditutup dan hanya Buku Kerja kedua dibuka . Oleh itu, kami telah menunjukkan kepada anda satu lagi kaedah menyimpan dan menutup a Buku Kerja .

Baca Lagi: Excel VBA: Simpan Helaian sebagai Buku Kerja Baharu tanpa Membuka

3. Simpan dan Tutup Buku Kerja Khusus dalam Folder Khusus

Untuk kaedah ketiga , kita akan simpan dan menutup Buku Kerja khusus dalam folder menggunakan Excel VBA .

Langkah:

  • Pertama, seperti yang ditunjukkan dalam kaedah 1 , tunjukkan Modul VBA .
  • Kedua, taip kod ini di dalam Modul itu.
8805

Pecahan Kod VBA

  • Pertama, kami memanggil SubProsedur Save_and_Close_Workbook_in_Specific_Folder .
  • Selepas itu, menggunakan kaedah SaveAs kami menyimpan fail kami di lokasi tertentu.
  • Kemudian, kami mengekalkan nama fail yang sama seperti Buku Kerja asal.
  • Akhir sekali, kami menutup Buku Kerja kami.
  • Ketiga, seperti yang ditunjukkan dalam kaedah 1 , laksanakan kod.

Selepas ini, ia akan menyimpan kami 1>Buku kerja di dalam lokasi folder yang ditentukan kami dan tutup nya. Oleh itu, kami telah menunjukkan kepada anda kaedah lain menyimpan dan menutup Buku Kerja dalam folder khusus menggunakan VBA .

Baca Lagi: Makro VBA Excel untuk Menyimpan PDF dalam Folder Tertentu (7 Contoh Ideal)

Bacaan Serupa

  • Excel VBA: Simpan Buku Kerja tanpa Prompt (dengan Langkah Mudah)
  • [Tetap!] Mengapa Excel Tidak Menyimpan Pemformatan Saya ? (7 Sebab Kemungkinan)
  • Cara Menyimpan Excel sebagai Landskap PDF (Dengan Langkah Pantas)
  • VBA Excel untuk Simpan sebagai Fail Menggunakan Laluan daripada Sel (Dengan Langkah Pantas)
  • [Tetap!] Fail CSV Excel Tidak Menyimpan Perubahan (6 Penyelesaian Kemungkinan)

4. Memasukkan Butang ke Simpan dan Tutup Buku Kerja dalam Excel

Untuk kaedah keempat, kami akan mencipta butang VBA untuk menutup dan menyimpan Buku Kerja dalam Excel.

Langkah:

  • Pertama, seperti yang ditunjukkan dalam kaedah 1 , tunjukkan VBAModul .
  • Kedua, taip kod ini di dalam Modul itu.
7722

Pecahan Kod VBA

  • Pertama, kami memanggil Sub Prosedur Button_Click_Save_and_Close_Workbook .
  • Selepas itu, menggunakan kaedah Simpan kami simpan Buku Kerja kami
  • Akhir sekali, kami tutup Buku Kerja kami menggunakan Keluar kaedah.

Sekarang, kami akan memasukkan butang VBA di sini.

  • Pertama, daripada Pembangun tab >>> Sisipkan >>> pilih Butang (Kawalan Borang) .

  • Kemudian, kursor tetikus akan menukar dan menyeret kotak di dalam Buku Kerja .

Selepas itu, kotak dialog Tugaskan Makro akan muncul.

  • Kemudian, pilih “ Button_Click_Save_and_Close_Workbook ”.
  • Selepas itu, tekan OK .

Kemudian, kita akan melihat Butang 1 dalam Buku Kerja .

  • Akhir sekali, klik pada butang.

Ini akan menyimpan dan menutup Buku Kerja kami.

Baca Lagi: Kod VBA untuk Butang Simpan dalam Excel (4 Varian)

5. Simpan dan Tutup Semua Buku Kerja Terbuka Menggunakan Excel VBA

Dalam kaedah terakhir ini, kami akan menyimpan dan menutup semua Buku Kerja yang dibuka. Kali ini, kami mempunyai dua Buku Kerja yang sama seperti dalam kaedah 3 , namun, kali ini, kami akan simpan dan tutup kedua-duanya Buku kerja . Di sini, kami akan menggunakan Untuk Gelung Seterusnya untuk melihat Buku Kerja kami.

Langkah:

  • Pertama, seperti yang ditunjukkan dalam kaedah 1 , tunjukkan Modul VBA .
  • Kedua, taip kod ini di dalam Modul .
1783

Pecahan Kod VBA

  • Pertama , kami memanggil Sub Prosedur CloseAndSaveOpenWorkbooks .
  • Kemudian, kami menggunakan Untuk Gelung Seterusnya untuk mengitar semua Buku Kerja .
  • Selepas itu, menggunakan kaedah Simpan kami simpan fail kami.
  • Kemudian, kami tutup semua Buku Kerja kecuali Buku Kerja semasa kami.
  • Akhir sekali, kami telah menutup Buku Kerja asal menggunakan Keluar harta benda.
  • Ketiga, seperti yang ditunjukkan dalam kaedah 1 , laksanakan kod.

Oleh itu, ia akan menyimpan dan menutup dua Buku Kerja . Kita dapat melihat tarikh diubah suai adalah sama untuk dua Buku Kerja . Kesimpulannya, kami telah menunjukkan 5 Makro VBA Excel yang berbeza untuk menyimpan dan menutup Buku Kerja .

Baca Lagi: Bagaimana untuk Menyimpan Makro ke Buku Kerja Makro Peribadi?

Kesimpulan

Kami telah menunjukkan kepada anda 5 cepat dan mudah difahami Excel VBA untuk simpan dan menutup Buku Kerja . Jika anda menghadapi sebarang masalah, sila komen di bawah. Selain itu, anda boleh melawat tapak kami Exceldemy untuk lebih banyak artikel berkaitan Excel . Terima kasih kerana membaca, teruskan kecemerlangan!

Hugh West ialah jurulatih dan penganalisis Excel yang sangat berpengalaman dengan lebih 10 tahun pengalaman dalam industri. Beliau memiliki Ijazah Sarjana Muda Perakaunan dan Kewangan serta Ijazah Sarjana dalam Pentadbiran Perniagaan. Hugh mempunyai minat untuk mengajar dan telah membangunkan pendekatan pengajaran yang unik yang mudah diikuti dan difahami. Pengetahuan pakar Excel beliau telah membantu beribu-ribu pelajar dan profesional di seluruh dunia meningkatkan kemahiran mereka dan cemerlang dalam kerjaya mereka. Melalui blognya, Hugh berkongsi pengetahuannya dengan dunia, menawarkan tutorial Excel percuma dan latihan dalam talian untuk membantu individu dan perniagaan mencapai potensi penuh mereka.