User Form dapat dipakai untuk interaksi antara user dengan programmer biasanya di Ms. Excel user form ini dapat dijadikan sebagai formulir. Nah bagaimana menciptakan sebuah Form pada Ms. Excel? Kali ini aku akan menciptakan sebuah form secara sederhana dan sangat mendasar.
Tutorial ini aku buat bagi yang gres mencar ilmu Macro atau VBA Excel dan mudah-mudahan bermanfaat. Sebelum kepada pembahasan silakan lihat bagaimana tampilan sebuah VBA Project yang secara default dikala menekan tombol ALT+F11.
Jika Anda lihat pada gambar tampilan VBA Project diatas ada 4 jenis objek VBA Project pada Book1 yang pertama yaitu Sheet1, Sheet2, Sheet3 dan Workbook. Untuk menampilkan sebuah Form maka kita harus menyisipkan form dari hidangan Insert kemudian pilih UserForm
Setelah Anda klik hidangan diatas maka akan muncul sebuah Form gres berjulukan UserForm1 menyerupai tampilan berikut
Dari tampilan UserForm1 Anda dapat memilih nama Form, label maupun ukuran Form, warna background dengan memakai Properties dari UserForm tersebut
Untuk mengganti nama UserForm1 silakan ganti pada properties diatas contohnya aku ganti menjadi contohnya menyerupai berikut. Catatan perlu diingat bahwa penamaan baik sebuah Form maupun textbox lainnya dilarang memakai spasi maka Anda akan melihat sebuah peringatan berikut
Jika ingin mempelajari lebih jauh bagaimana cara menciptakan pesan peringatan dengan VBA excel silakan lihat link ini
Apa saja yang akan dirubah untuk propertie UserForm1? Berikut contohnya
Name ganti dengan “FormInput”
Caption ganti dengan “Form Input Data”
Back Color ganti dengan “&H00004000&”
Anable ganti dengan “TRUE”
Height ganti dengan “180”
width ganti dengan “240”
Jika sudah mengganti Properties dari UserForm1 diatas maka risikonya akan tampil menyerupai berikut ini
Jika Form sudah didesain, lalu properties sudah disetting langkah berikutnya biasanya yaitu pengkodeaan. Pengkodean disini memakai bahasa pemrograman VBA. Apa saja VBA untuk sebuah UserForm? Script VBA untuk userform banyak ragamnya yang sering dipakai contohnya menyerupai berikut
Private Sub UserForm_Initialize()
UserForm1.Caption = "FORM TEST"
End Sub
Script VBA diatas dipakai untuk mengidentifikasikan pada sebuah UserForm walaupun sudah diganti pada Propersies Caption “Form Input Data” apabila sudah diberi instruksi diatas maka Caption UserForm tersebut akan menjelma “FORM TEST”
Private Sub UserForm_Activate()
UserForm1.BackColor = &HFF&
End Sub
Script diatas akan merubah warna background dari UserForm menjadi warna merah walaupun diatas sudah diganti pada properties menjadi warna hijau. Jika duab uah script VBA diatas dijalankan dengan menekan tombol F5 pada keyboard maka tampilan UserForm akan tampak menyerupai berikut
Bagaimana apabila Anda akan menciptakan sebuah tombol Exit dengan memakai CommandButton pada UserForm tersebut? Hal ini sangat gampang Anda tinggal tambahkan 1 buah CommandButton dari ToolBox dan buat pada UserForm
Untuk menutup UserForm dengan CommandButton silakan tuliskan script VBA berikut
Private Sub CommandButton1_Click()
Unload Me
End Sub
Untuk menguji script VBA apakah sudah berhasil atau belum silakan tekan F5 untuk menjalankan lalu tekan tombol COmmandButton1 tersebut apabila sudah benar maka UserForm tersebut akan ditutup atau close. Untuk mengganti CommandButton yang ada di UserForm akan aku bahas pada artikel berikutnya. Sumber http://www.excel-id.com/