Tips Macro Disable Tombol Keluar "X" pada excel - Kebiasaan pengguna excel jika menutup workbook pasti menggunakan tombol X (Close,tutup, exit) yang terletak dibagian pojok kanan atas, tombol X (Close,tutup, exit) tentu saja berfungsi untuk menutup lembar kerja excel. Pada kesempatan kali ini saya akan membagikan cara Disable Tombol Keluar "X" pada excel, jadi pengguna excel tidak akan bisa keluar dari workbook ketika mengakses tombol X (Close,tutup, exit)

Beberapa bulan yang lalu saat blog ini masih bernama iParengan, saya telah memberikan tips disable tombol X pada userform, untuk melihat kembali tips tersebut silahkan ikuti tautan atau link ini Userform VBA Excel Disable Tombol X

DISABLE TOMBOL X
Sebelum postingan ini terbit seeblumnya beberapa menit yang lalu saya juga sudah share cara Disable dan mengganti fungsi klik kanan excel, maka untuk melengkapinya kita juga bisa disable tombol X (Close,tutup, exit) pada excel, bagaimana caranya ?

Private Sub Workbook_BeforeClose(Cancel As Boolean)
If Not tutupWB Then
Cancel = True
MsgBox "Tombol X sudah dinon aktifkan oleh admin, silahkan gunakan tombol lain, atau cari tombolnya ditetangga sebelah", _
vbInformation, "ExcelPro"
End If
End Sub

Letakan kode macro diatas dalam ThisWorkbook, ketika pengguna mengakses tombol X (Close,tutup, exit) pada excel maka pengguna akan mendapatkan teguran berupa kotak pesan Tombol X sudah dinon aktifkan oleh admin, silahkan gunakan tombol lain, atau cari tombolnya ditetangga sebelah .

Jika tombol X (Close,tutup, exit) sudah tidak berfungsi , lalu bagaimana cara pengguna excel keluar dari workbook ?, maka kita buat lagi tombol baru yang berfungsi untuk keluar dari workbook excel

Buatah tombol pakai apa saja, yang penting gunakan kode macro ini dan jalankan saat tombol tersebut diklik atau diakses

Public TombolX As Boolean
Public Sub Keluar()
TombolX = True
ThisWorkbook.Close
End Sub

Demikianlah cara Disable Tombol Keluar "X" pada excel, semoga bermanfaat
No comments