Sunday 18 May 2014

Membuat Form Sederhana Inputan di Microsoft Excel

1. Buka microsoft excel
2. Keluarkan tab developer
3. Klik tab developer
4. Klik icon Visual Basic
5. Pada jendela Project - VBA project di sebelah kiri, klik kanan pada Sheet1 , pilih Insert, pilih UserForm.Muncul tampilan seperti berikut:
Note: UserForm1 telah terbuat, jadi yang muncul UserForm2


 6. Pada jendela Toolbox, keluarkan atau drag 1 buah control CommandButton dan 1 buah TextBox. Dan letakkan di jendela UserForm2 satu persatu. Susun sedemikian rupa letaknya seperti berikut:


7. Klik CommandButton dan isikan code berikut ini diantara Private Sub CommandButton1_Click() dan End Sub.

Sheet1.Activate
Range("A2").Select
ActiveCell.FormulaR1C1 = TextBox1.Text
MsgBox (TextBox1.Text)

8. Klik Run atau tekan tombol F5 pada keyboard. Form itu akan berjalan dan tampil seperti berikut:


9. Ketik suatu angka di kolom textbox. Setelah selesai memasukkan angka di kotak textbox, klik CommandButton1. Viola, sel A2 di Sheet1 kamu sudah terisi dengan angka yang sama dengan angka yang kamu masukkan di kotak textbox. Contoh:


Segitu aja, semoga bermanfaat.

No comments:

Post a Comment