Excel VBA Simpan sebagai Format File (12 Contoh yang Sesuai)

Hugh West

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

Kami menyimpan informasi penting dalam Excel Kami juga melakukan berbagai operasi sesuai dengan kebutuhan kami. Jadi, perlu untuk menyimpan file setelah kami memperbaruinya. Jika tidak, kita mungkin kehilangan beberapa data berharga. Simpan an Buku Kerja Excel Selain itu, menyimpan sebuah Excel sesuai yang kita inginkan Format , atau menyimpan file dalam file yang diinginkan Lokasi Dalam artikel ini, kami akan menunjukkan kepada Anda contoh-contoh yang paling berguna dari Excel VBA Simpan sebagai Format File .

Unduh Buku Kerja Praktik

Unduh buku kerja berikut ini untuk berlatih sendiri.

VBA Simpan sebagai Format File.xlsm

12 Contoh Format File Excel VBA Simpan sebagai File

Untuk mengilustrasikannya, kita akan menggunakan dataset berikut ini sebagai contoh. Sebagai contoh, dataset ini merepresentasikan Penjual , Produk dan Penjualan Bersih Di sini, kita akan menyimpan buku kerja ini dengan menerapkan Excel VBA Simpan sebagai Format File .

1. VBA untuk Menyimpan sebagai File Excel

Dalam contoh pertama kita, kita akan menunjukkan kepada Anda sebuah Kode VBA untuk menyimpan Excel Oleh karena itu, ikuti langkah-langkah di bawah ini untuk melakukan tugas tersebut.

LANGKAH-LANGKAH:

  • Pertama, buka Tab Pengembang.
  • Kemudian, pilih Visual Basic .

  • Sebagai hasilnya, yang VBA jendela akan muncul keluar.
  • Setelah itu, klik Sisipkan .
  • Selanjutnya, pilih Modul .

  • Oleh karena itu, yang Modul akan muncul.
  • Setelah itu, salin kode berikut dan tempelkan ke dalam kotak. 
 Sub Contoh_1() ActiveWorkbook.SaveAs End Sub

  • Sekarang, jalankan kode dengan menekan F5 .
  • Akibatnya, Anda harus memasukkan nama file, format, dan info lainnya seperti yang diminta.
  • Terakhir, ini akan menyimpan file di lokasi yang Anda tentukan.

Baca selengkapnya: Cara Menyimpan Lembar Kerja sebagai File Baru Menggunakan Excel VBA

2. Tentukan Ekstensi File dengan Excel VBA

Dalam contoh sebelumnya, kita harus menentukan secara manual Format File setelah menekan perintah run. Tetapi di sini, kami akan menunjukkan cara yang lebih efisien untuk menerapkan Excel VBA Simpan sebagai Format File untuk menyimpan buku kerja dalam format yang diinginkan. Kita cukup menentukan ekstensi file setelah nama file. Jadi, masukkan kode di bawah ini di Modul jendela. 

 Sub Contoh_2() Dim lokasi As String lokasi = "D:\SOFTEKO\excel vba save as file format.xlsm" ActiveWorkbook.SaveAs Filename:=lokasi End Sub

Dengan cara ini, Anda dapat menjalankan kode untuk mendapatkan file dalam format dan lokasi yang diinginkan. simpan file dalam Format xlsx, jenis xlsx sebagai pengganti xlsm .

Baca Lebih Lanjut: Excel VBA Macro untuk Menyimpan PDF di Folder Tertentu (7 Contoh Ideal)

3. Excel VBA untuk Menggunakan Kode Format File

Namun demikian, kita bisa memasukkan Nomor Kode Format File alih-alih menentukan ekstensi file. Beberapa kode yang berguna adalah: .xlsx = 51 , . xlsm = 52 , .xlsb = 50 , .xls = 56 Oleh karena itu, salin kode berikut ini dan tempelkan ke dalam Modul kotak. 

 Sub Contoh_3() Dim lokasi As String lokasi = "D:\SOFTEKO\excel vba save as file format" ActiveWorkbook.SaveAs Filename:=location, FileFormat:=52 End Sub

Baca selengkapnya: [Diperbaiki!] Mengapa Excel Tidak Menyimpan Pemformatan Saya? (7 Kemungkinan Alasan)

4. Simpan di Direktori yang Sama dengan VBA

Dalam contoh ini, kita akan menunjukkan cara untuk Simpan di Direktori yang Sama di mana file sudah ada dengan Excel VBA Oleh karena itu, sisipkan kode di bagian Modul jendela. 

 Sub Contoh_4() ActiveWorkbook.SaveAs Filename:="excel vba save as file format" End Sub

Baca selengkapnya: Excel VBA: Pilih Lokasi dan Simpan sebagai PDF

5. VBA untuk Menyimpan di Direktori Baru

Namun demikian, kita mungkin juga perlu menyimpan file dalam file Direktori Baru Jadi, ketikkan kode berikut ini di dalam Modul kotak dan menjalankannya. 

 Sub Contoh_5() Dim lokasi As String lokasi = "D:\SOFTEKO\excel vba save as file format" ActiveWorkbook.SaveAs Filename:=lokasi End Sub

6. Minta Kata Sandi untuk Membuka File Excel

Selain itu, Anda bisa menerapkan Excel VBA Simpan sebagai Format File untuk meminta Kata sandi untuk Buka File Excel Jadi, masukkan dan jalankan kode di bawah ini. 

 Sub Contoh_6() ActiveWorkbook.SaveAs _ Nama file:="D:\SOFTEKO\excel vba save as file format.xlsm", Kata Sandi:="satu" End Sub

Baca selengkapnya: Cara Menyimpan File Excel dengan Kata Sandi

Bacaan Serupa

  • Excel VBA untuk Menyimpan File dengan Nama Variabel (5 Contoh)
  • Cara Menyimpan Excel sebagai Lanskap PDF (Dengan Langkah Cepat)
  • Excel VBA untuk Menyimpan sebagai File Menggunakan Jalur dari Sel (Dengan Langkah Cepat)
  • Kode VBA untuk Tombol Simpan di Excel (4 Varian)
  • [Diperbaiki!] File CSV Excel Tidak Menyimpan Perubahan (6 Kemungkinan Solusi)

7. Tambahkan Kata Sandi untuk Mengedit di Excel

Selain itu, Anda bisa meminta Kata sandi untuk Penyuntingan di Excel Tanpa kata sandi, itu hanya akan terbuka dalam format read-only. Salin kode dan tempelkan. Kemudian, jalankan kode tersebut. 

 Sub Contoh_7() ActiveWorkbook.SaveAs _ Filename:="D:\SOFTEKO\excel vba save as file format.xlsm", WriteRes:="one" End Sub

8. Buka dalam Format Hanya-Baca

Sekali lagi, untuk membuka file di Format Hanya-Baca , ketik kode di bawah ini dan tekan F5 untuk menjalankannya. 

 Sub Contoh_8() ActiveWorkbook.SaveAs _ Filename:="D:\SOFTEKO\excel vba save as file format.xlsm", _ ReadOnlyRecommended:=True End Sub

Baca selengkapnya: Cara Membuka Dokumen Word dan Menyimpan Sebagai PDF atau Docx dengan VBA Excel

9. Buat Kotak Dialog 'Simpan Sebagai'

Operasi lain yang berguna dari Excel VBA untuk Menyimpan sebagai Format File adalah untuk menghasilkan Simpan Sebagai Kotak Dialog Oleh karena itu, masukkan kode di bawah ini. 

 Sub Contoh_9() Aplikasi.GetSaveAsFilename End Sub

Baca selengkapnya: Makro Excel untuk Menyimpan sebagai PDF (5 Contoh yang Sesuai)

10. VBA untuk Membuat &; Simpan Buku Kerja Baru

Selain menyimpan file, kita juga bisa Buat &; Simpan Buku Kerja Baru dengan VBA Untuk menyelesaikan tugas tersebut, ketik kode di bawah ini di dalam Modul jendela dan tekan F5 . 

 Sub Contoh_10() Dim book As Workbook Set book = Workbooks.Add Application.DisplayAlerts = False book.SaveAs Filename:="D:\SOFTEKO\excel vba save as file format.xlsm" Application.DisplayAlerts = True End Sub

Baca Lebih Lanjut: Excel VBA: Simpan Lembar sebagai Buku Kerja Baru tanpa Membuka

11. Simpan Buku Kerja Aktif di Excel

Demikian juga, kita dapat menyimpan buku kerja aktif di tempat penyimpanannya. Untuk menjalankan operasi, masukkan kode yang sangat sederhana. 

 Sub Contoh_11() ActiveWorkbook.Save End Sub

Baca selengkapnya: Cara Menyimpan Makro untuk Semua Buku Kerja di Excel (dengan Langkah Mudah)

12. VBA untuk Menyimpan sebagai Format PDF di Excel

Akhirnya, kita bisa menggunakan PDF ekstensi file di VBA kode untuk disimpan di Format PDF Jadi, terapkan Excel VBA Simpan sebagai Format File di bawah ini. Kemudian, jalankan kode dengan menekan F5 . 

 Sub Contoh_12() ActiveSheet.SaveAs Filename:="excel vba save as file format.pdf" End Sub

Baca selengkapnya: Cara Menyimpan Excel sebagai PDF (6 Cara Berguna)

Kesimpulan

Untuk selanjutnya, Anda akan dapat menyimpan file dengan Excel VBA Simpan sebagai Format File Ikuti terus contoh-contoh yang dijelaskan di atas. Teruslah menggunakannya dan beri tahu kami jika Anda memiliki cara lain untuk melakukan tugas tersebut. ExcelWIKI Jangan lupa untuk memberikan komentar, saran, atau pertanyaan jika Anda memiliki pertanyaan di bagian komentar di bawah ini.

Postingan sebelumnya Cara Menggabungkan Data dari Beberapa Baris di Excel (4 Metode Cepat)
Postingan berikutnya Cara Menghitung Persentase Diskon dengan Rumus di Excel

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.