KODE MACRO MENUTUP WORKBOOK OTOMATIS

VBA EXCEL MENUTUP WORKBOOK SECARA OTOMATIS

Memberikan hasil yang maksimal dan kepuasan terhadap pengunjung termasuk prioritas kami sehingga ini akan sangat detail dan singkat. Kami harap Anda meluangkan waktu beberapa menit untuk membaca penjelasan kami dibawah ini secara cermat.

Biasanya kita menginginkan Jika komputer tidak ada aktivitas apapun maka akan tidur secara otomatis dengan waktu yang sudah ditentukan.

Begitupun juga Workbook Excel, Anda dapat Menutup Lembar Kerja Excel Secara Otomatis menggunakan kode macro excel dengan waktu yang Anda tentukan. Contoh seperti alarm.

Langkah-langkah :

1. Buka Excel Anda
2. Simpan dengan extensi .xlsm atau .xlsb atau extensi yang dapat menjalankan macro
3. Tekan Alt+F11 atau pada menu Developer silahkan pilih Visual Basic (maka Anda akan disajikan dengan jendela VBA)
4. Salin Kode Macro dibawah ini ke ThisWorkbook

Private Sub Workbook_Open()
On Error Resume Next
Application.OnTime RunWhen, "Tutup", , False
On Error GoTo 0
RunWhen = Now + TimeSerial(0, MENIT, 0)
Application.OnTime RunWhen, "Tutup", , True
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
On Error Resume Next
Application.OnTime RunWhen, "Tutup", , False
On Error GoTo 0
End Sub
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
On Error Resume Next
Application.OnTime RunWhen, "Tutup", , False
On Error GoTo 0
RunWhen = Now + TimeSerial(0, MENIT, 0)
Application.OnTime RunWhen, "Tutup", , True
End Sub
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
On Error Resume Next
Application.OnTime RunWhen, "Tutup", , False
On Error GoTo 0
RunWhen = Now + TimeSerial(0, MENIT, 0)
Application.OnTime RunWhen, "Tutup", , True
End Sub

5. Kemudian buatlah 1 buah module dan masukan Kode Macro dibawah ini ke dalam module tersebut

Public RunWhen As Double

Public Const MENIT = 1

Public Sub Tutup()

ThisWorkbook.Close savechanges:=False

End Sub

6. Selesai

Jika Anda melakukan langkah0langkah diatas dengan benar dan penempatak kode macro juga benar, maka sistem akan berjalan sesuai intruksi yang Anda berikan lewat kode macro.

Biarkan Workbook Anda terbuka kurang lebih 1 menit, maka Workbook Exel akan Menutup Secara Otomatis.

PRIORITAS KAMI

Kami sangat memperhatikan hasil maksimal dan kepuasan bagi pengunjung sehingga selain artikel diatas, kami juga menyediakan sampel file gratis untuk pemahaman yang mendalam.

Download File

Apabila Anda merasa bahwa artikel ini bagus dan layak untuk dibagikan maka silahkan share ke sosial media yang Anda punya, bisa lewat Facebook, Google Plus, Whatsapp, Telegram dll.

Belajar Excel itu mahal lhoo..
Jika berkenan Anda bisa Share artikel ini ke sosial media apapun.

Link Artikel Ini :

https://www.mtsbmtumbrasanom.id/2019/01/kode-macro-excel-combobox-bertingkat.html

Kami Selalu Berusaha Memberikan Yang Terbaik dan Original Untuk Anda

Jabat Erat@Hak Cipta 2015