Thursday, July 12, 2018

Form input sederhana







Selamat berinovasi sobat Belajar Office dan tetap bersemangat untuk beraktivitas kembali. Pada kesempatan ini admin akan membahas cara membuat

Form input data pada Excel VBA sederhana dilengkapi dengan koding simpel dulu sehingga lebih mudah untuk dipahami.

Pada form input data Excel VBA yang akan kita buat ini nantinya data-data kita setting supaya nanti otomatis masuk kedalam sheet Excel yang bisa kita tentukan.

Langkah-langkahnya sangat mudah yaitu sebagai berikut :
Buka MS Excel buatlah dua buah sheet : Sheet1 dan Sheet2

Buat userform baru yang simpel dulu dengan tampilan seperti contoh gambar dibawah ini






Dengan properties
Name : UserForm1 dan 
Label Palin atas  dengan Caption  Form input data”
Tambahkan tool-tool dengan properties sebagai berikut :
CommandButton1  dengan Caption : Input data
CommandButton2  dengan Caption : Cancel

Label 1  dengan Caption Kode Produk
Label 2  dengan Caption Nama Produk
Label 3  dengan Caption Harga Satuan

Doubel Klik pada Tool CommandButton1 atau tombol Input data ketikan kodingnnya seperti dibawah ini

Private Sub CommandButton1_Click()
Dim irow As Long
irow = Worksheets("sheet1").Cells(Rows.Count, 2).End(xlUp).Offset(1, 1).Row
Worksheets("sheet1").Cells(irow, 2).Value = TextBox1.Value
Worksheets("sheet1").Cells(irow, 3).Value = TextBox2.Value
Worksheets("sheet1").Cells(irow, 4).Value = TextBox3.Value
End Sub

Selanjutnya untuk koding Cancel (untuk menutup form jika data tidak jadi di input)
Doubel Klik pada Tool CommandButton2 atau tombol Cancel ketikan kodingnnya seperti dibawah ini

Private Sub CommandButton2_Click()
Unload Me
End Sub

Selanjutnya kita buat tombol pada sheet1 untuk menampilkan atau memanggil userform input data yang telah kita buat dengan sebuah gambar atau shape yang akan menuju modulyang akan memanggil userform1
Buatlah sebuah modul pada property vba dengan cara
Klik ALT + F11 Kemudian Insert Modul dan pastekan kode berikut

Sub Panggil ()
Userform1. Show
End sub

Save As File Excel dengan format Excel Macro-Enabeled Workbook supaya hasil yang VBA macro tidak hilang
Demikian postingan singkat kali ini semoga bermanfaat
Selesai.

Sample file dapat didownload dibawah ini


 input sederhana

No comments:

Post a Comment

APLIKASI GUDANG VERSI EXCEL VBA

Aplikasi Gudang Sederhana silahkan dikembangkan kritik dan saran membangun selalu kami harapkan FROM ENTRI IURAN BULANA...