Disable Excel Icon X Di Windows User Form

Dikarenakan kondisinya lagi demen melajarin MAcro VBA Excel, disini aku coba bikin tulisan mengenai bagaimana cara melakukan Disable terhadap Icon X pada jendela userform di excel.

Proses dari kode makro dibawah adalah User tidak akan bisa melakukan klik pada Icon X pada userform, dimana apabila Icon X tetap di klik, maka akan muncul sebuah pesan yang memberitahukan bahwa Icon X tidak bisa di klik.

selain pesan klik pada icon X juga bisa dimodifikasi sesuai perintah selanjutnya apabila Icon X di klik.

kodenya adalah :

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = vbFormControlMenu Then
Cancel = True
MsgBox "Icon X... Tidak boleh di close"
End If
End Sub

Demikianlah sehingga kode ini berakhir....