Belajar VBA Excel : Membuat Tombol Simpan Menggunakan Macro

 MlatenMania.com - Hallo Sobat Blogger semuanya, selamat datang kembali di blog sederhana Saya ini, pada kesempatan ini kembali Saya akan berbagi sebuah tutorial mengenai VBA Excel. Dan sesuai dengan judul artikel ini, yang akan Saya bahas adalah mengenai Cara Membuat Tombol Simpan Menggunakan Macro.

Membuat Tombol Simpan Menggunakan Macro

Untuk membuat sebuah tombol kita bisa memanfaatkan shape ataupun gambar, dan pada kesempatan ini Saya akan membuat tombol tersebut menggunakan sebuah shape. Tentunya agar mempermudah dan juga mempersingkat tutorial pada kesempatan kali ini.

1. Tombol Simpan Macro Versi 1

Untuk tombol simpan yang pertama ini adalah tombol simpan yang pada saat diklik nantinya akan muncul sebuah pesan, untuk lebih jelasnya berikut merupakan langkah-langkah ataupun caranya:

a. Buat sebuah tombol menggunakan shape, dan pada contoh ini Saya membuatnya menggunakan TextBox dimana di tombol tersebut saya memberikan tulisan/teks "Simpan". Berikut merupakan penampakan tombol tersebut:

Tombol Simpan

b. Langkah berikutnya adalah silahkan Copy kode/script Macro di bawah ini:

Sub SimpanDanPesan()
        MsgBox "Data Berhasil Disimpan!!!", vbInformation, " MlatenMania.com"
         ThisWorkbook.Save
End Sub

c. Buka lembar kerja Visual Basic Excel (Alt+F11) kemudian klik pada menu Insert dan pilih Module kemudian Paste kode/script yang kita copy tadi ke dalam module tersebut:

d. Dilanjutkan dengan klik kanan pada tombol tersebut, kemudian klik/pilih Assign Macro:

e. Pada jendela Assign Macro klik pada SimpanDanPesan kemduian akhiri dengan klik tombol OK:

Selesai.

Untuk mencobanya silahkan klik pada tombol tersebut. Maka akan muncul sebuah pesan seperti pada gambar di bawah ini:

Catatan : Simpan terlebih dahulu dokumen/file (beri nama file) agar tidak terjadi error

2. Tombol Simpan Macro Versi 2

Untuk tombol simpan yang kedua ini berbeda dengan tombol versi 1 di atas, untuk tombol versi ke 2 ini tidak muncul pesan seperti pada gambar di atas. Jadi nantinya file/dokumen tersebut akan secara otomatis tersimpan dan langsung tertutup (close).

Untuk cara/proses pembuatannya pun sama dengan cara di atas (versi 1) yang membedakan adalah kode/script Macro-nya. Dan berikut merupakan script Macro tersebut:

Sub SimpandanKeluar()
ActiveWorkbook.Save
Application.Quit
End Sub

Mungkin hanya itu saja artikel mengenai Belajar VBA Excel : Membuat Tombol Simpan Menggunakan Macro, mudah-mudahan apa yang sudah Saya sampaikan pada kesempatan ini bisa bermanfaat untuk kita semuanya. Jangan lupa untuk terus mengunjungi MlatenMania.com untuk mendapatkan informasi-informasi menarik lainnya. Sekian dan terimakasih.