Input data siswa dengan menggunakan Form pada excel

untuk membuat entry data dengan menggunakan userform pada excel adalah dengan cara mememilih menu tab developer kemudian pilih visual basic

setelah itu akan tampil jendela visual basic kemudian pilih insert-userform

setelah itu tambahkan label dan textbox
misal kita akan melakukan form input data siswa
maka buat label nama, label alamat
dengan cara mengklik hurup A pada toolbox kemudian diganti captionnya pada jendela properties
dengan label1 diganti dengan Nama label2 diganti dengan Alamat, setelah itu buat 2 buah textbox
kemudian aktivkan userform1 dengan cara mengklik userform itu kemudian ubah captionnya pada jendela properties dengan From Input Data Siswa sehingga seperti gambar dibawah ini

setelah itu klik ganda pada commandbutton1 (simpan) sehingga muncul jendela view code
kemudian ketikan kode berikut:

Private Sub CommandButton1_Click ()
Sheet1.Activate
If TextBox1.Value = "" Or TextBox2.Value = "" Then
MsgBox "Maaf data tidak lengkap"
Exit Sub
End If

Dim isi As Long
isi = WorksheetFunction.CountA (Range ("a: a")) + 1
Cells (isi, 1) .Value = WorksheetFunction.Count (Range ("a: a")) + 1
Cells (isi, 2) .Value = TextBox1.Value
Cells (isi, 3) .Value = TextBox2.Value
MsgBox "Input Data Berhasil"

End Sub

kemudian kembali ke jendela excel pilih Sheet1

setelah itu isi cell, cell seperti berikut:

cells A1 = No

cells B1 = Nama

cells C1 = Alamat

nah itulah sedikit berbagi tentang form input data sehingga kita bisa lebih cepat mengisi data pada excel