Diskusi tentang Excel

Disable dan Enable Commandbutton pada UserForm

Apakah bisa kita mendisable fungsi Commandbutton? Tentu jawabannya adalah BISA. Lalu bagaimana cara membuat coding untuk disable dan enable tersebut? Berikut saya jelaskan tutorial agar fungsi tombol tidak bisa diklik atau disable setelah tombol lain di klik. Cara ini saya gunakan melalui Userform.

Cara membuat disable dan Enable tombol / Commandbutton
Langkah pertama silakan buat 2 buah Commandbutton dan letakan pada UserForm kemudian silakan pula Anda ganti Caption melalui properties nya untuk Commandbutton1 ganti Caption dengan "Simpan" sedangkan untuk Commandbutton2 ganti caption dengan "Edit"


Setelah dua buah commandbutton tersebut dibuat langkah berikutnya kita akan membuat script VBA silakan tekan F7 untuk View Code kemudian kita akan memilih Object UserForm dan prosedur Initialize.



Setelah tulisan Private Sub UserForm_Initialize() silakan ketikkan script / coding VBA berikut

Private Sub UserForm_Initialize()
CommandButton2.Enabled = False
End Sub
Script diatas akan menghasilkan jika userform di load maka Commandbutton2 akan tidak aktif. Langkah berikutnya kita akan membuat objek Commandbutton1 jika di klik maka Commandbutton2 akan aktif atau Enable Anda harus menuliskan script berikut

Private Sub CommandButton1_Click()
CommandButton2.Enabled = True
CommandButton1.Enabled = False
End Sub
Kemudian untuk objek Commandbutton2 agat ketika diklik maka commandbutton2 akan disable dan commandbutton1 akan disable maka silakan ketikkan prosedur Click pada Commandbutton2 seperti berikut

Private Sub CommandButton2_Click()
CommandButton1.Enabled = True
CommandButton2.Enabled = False
End Sub
Nah, Langkah-langkah diatas sangatlah sederhana dalam membuat disable dan enable commandbutton atau tombol pada UserForm.
Silakan diuji coba dan hasilnya akan seperti berikut

Jika Userform Aktif



Jika Tombol Simpan di klik maka tombol simpan akan Disable sedangkan tombol Edit akan Enable


Jika Anda klik kembali tombol Edit maka hasilnya akan kembali ke gambar yang pertama tadi yaitu tombol Edit Disable sedangkan tombol Simpan Enable.

Demikian tutorial bagaimana cara membuat disable dan Enable commandbutton pada UserForm. Semoga tutorial ini bermanfaat dan selamat mencoba.

Simak Pengenalan Dasar UserForm

Related

Macro Excel VBA 6957702982747102522

Post a Comment

Tulisan ini Bermanfaat..? Silakan berkomentar sesuai topik artikelnya, tidak dianjurkan menggunakan kata-kata yang dapat menimbulkan hal negatif. Mohon maaf apabila tidak memiliki etika akan Admin HAPUS tanpa pemberitahuan kembali. Terimakasih... salam Exceler

emo-but-icon

item