Tuesday, January 29, 2019

√ Macro Excel - Cara Disable Tombol Close Atau X Pada Userform

Excel-id - Bagaimana cara mendisable tombol Close atau X pada User Form yang telah dibentuk hal ini bertujuan supaya user tidak mengklik tombol Close pada user form tetapi hanya klik tombol yang telah dibentuk dengan CommandButton.

Langkahnya cukup sederhana pertama silakan masuk ke VBA editor dan buat sebuah UserForm1 dengan cara klik insert kemudian pilih UserForm maka akan dibentuk sebuah form gres dengan nama "UserForm1". silakan klik kanan pada UserForm dan klik view mode

Langkah berikutnya silakan tuliskan script VBA dibawah ini

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    If CloseMode = 0 Then
        Cancel = True
        MsgBox "Untuk menutup Form silakan klik tomblo CLOSE", vbCritical
    End If
End Sub
Jika sudah dituliskan script VBA diatas langkah berikutnya kita akan buat sebuah CommandButton untuk menciptakan tombol CLOSE dengan cara klik Insert pada ToolBox kemudian pilih CommandButton kemudian silakan drag and drop pada form


Langkah berikutnya silakan ganti Caption goresan pena CommandButton1 menjadi "CLOSE" pada properties CommandButton1


Jika sudah final mengganti Captions silakan double klik goresan pena CLOSE pada UserForm untuk menulisakan perintah Close Form


Selesai, silakan coba jalankan perintah dengan mengklik tombol RUN dancoba klik close yang berwarna merah apabila di klik maka akan muncul pesan kesalahan


OK, script VBA sudah benar dan Anda sudah dapat menciptakan bagaimana cara mendisable tombol CLOSE sesuai dengan keinginan.
Selamat mencoba
Sumber http://www.excel-id.com/