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()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
CommandButton2.Enabled = False
End Sub
Private Sub CommandButton1_Click()Kemudian untuk objek Commandbutton2 agat ketika diklik maka commandbutton2 akan disable dan commandbutton1 akan disable maka silakan ketikkan prosedur Click pada Commandbutton2 seperti berikut
CommandButton2.Enabled = True
CommandButton1.Enabled = False
End Sub
Private Sub CommandButton2_Click()Nah, Langkah-langkah diatas sangatlah sederhana dalam membuat disable dan enable commandbutton atau tombol pada UserForm.
CommandButton1.Enabled = True
CommandButton2.Enabled = False
End Sub
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
0 Response to "Disable dan Enable Commandbutton pada UserForm"
Posting Komentar
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