Ruang Tutorial kali ini sharing kembali tentang code vba untuk save dan Close yang tujuan code ini digunakan ketika kita membangun aplikasi berbasis Excel kita menggunakan 3 metode prosedur
Berikut Syntax VBA Prosedur 1
Private Sub CommandButton1_Click()
ActiveWorkbook.Close savechanges:=True
End Sub
Berikut Syntax VBA Prosedur 2
Private Sub CommandButton1_Click()
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub
Berikut Syntax VBA Prosedur 3
Private Sub CommandButton1_Click()
If MsgBox("Anda Yakin Akan Keluar dan Menyimpan Data..?? : ", vbYesNo + 48, "Konfirmasi") = vbYes Then
ActiveWorkbook.Close savechanges:=True
Else
MsgBox "Batal Keluar..!! Aplikasi Masih Akan Beroperasi..!!!", 64, "Aplikasi Pemula 21"
End If
End Sub
cara mengimplementasikan syntax diatas
- pilih Tab Developer, klik Visual Basic atau kita tekan secara bersama tombol Alt+F11 masuk tab menu developer kemudian pilih menu visual Basic atau menu dipojok kir
- Masuk ke Visual Basic Editor (VBE) pilih This Workbook