Cara menggunakan macro data entry excel

Selamat pagi sobat Belajar Office dan tetap bersemangat untuk beraktivitas kembali. Pada artikel sebelumnya  admin sudah membahas cara  Menampilkan UserForm VBA Excel. Kita lanjut lagi 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 Caption : Input data

• Tambahkan tool-tool dengan properties sebagai berikut :

• Selanjutnya kita masuk pada pembuatan kodingnya
• Doubel Klik pada Tool CommandButton1 atau tombol Add ketikan kodingnnya seperti dibawah ini

Private Sub Add_Click()
Dim kosong As Long
Sheet2.Activate

kosong = WorksheetFunction.CountA(Range(“A:A”)) + 1
Cells(kosong, 1).Value = TextBox1.Value
Cells(kosong, 2).Value = TextBox2.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 Cancel_Click()
Unload Me
End Sub

• Kemudian Save
• Selanjutnya kita buat tombol pada sheet1 untuk menampilkan atau memanggil userform input data yang telah kita buat

Contoh seperti gambar dibawah ini

membuat button

• Caranya klik tab menu Developer >> group Controls >> klik insert  >>> Command Button (Active X)
• Letakan pada sheet1

Baca juga : Cara Membuat Command Button (Active X)

• Kemudian ketikan kodingnya

Private Sub CommandButton1_Click()
UserForm1.Show
End Sub

• Save As File Excel dengan format Excel Macro-Enabeled Workbook supaya hasil yang VBA macro tidak hilang
• Selesai.

Untuk file yang sudah jadi sebagai bahan latihan bisa sobat download pada link dibawah ini

Membuat Form Input Data Excel VBA

Contoh UserForm VBA Excel

Silahkan dicoba input data maka data-data akan masuk pada sheet2

seperti gambar dibawah ini

hasil input data

Demikian Cara Membuat Form Input Data Pada Excel VBA sederhana dulu supaya tidak pusing dan lebih mudah untuk dipahami, pada artikel selanjutnya nanti akan kita tambahkan lagi beberapa tool-tool yang lainnya secara bertahap.

Halo, nama saya Alvian. Saya akan berbagi tutorial membuat aplikasi Input Data Siswa menggunakan Microsoft Excel. Saran dari saya, gunakan Microsoft Excel terbaru yaitu 2013. Jika anda belum mampu membelinya, gunakan Microsoft Excel 2010/2007 seperti yang saya gunakan.

Microsoft Excel memang sangat berguna dalam membantu pengolahan data, salah satunya juga sangat membantu dalam mempermudah penginputan data siswa. Teknik yang akan saya bagi adalah menggunakan pemrograman VBA. Caranya cukup mudah, yaitu sebagai berikut:

Ikuti langkah-langkah berikut:

1. Mengaktifkan menu Developer.

Menu Developer merupakan menu yang tersembunyi pada awal kali kita menjalankan Ms. Excel. Dia tidak akan tampil di barisan menu bar, akan tetapi kita bisa mengaktifkannya dengan cara berikut: Cara mengaktifkan menu developer.

Jika menu/tab developer sudah aktif, silakan melanjutkan ke langkah berikutnya.

2. Membuat kerangka Entri Data.

Ini adalah bagian yang menyenangkan menurut saya, karena kita akan mendesain seperti apa tampilan input data siswanya. Buatlah desain kerangka entri data sesuai dengan kepentingan data anda, bisa dibuat di sheet baru atau di sheet yang sudah ada, contohnya seperti ini:

*Catatan: Tombol ‘SIMPAN’ dapat anda buat dengan menggunakan shape biasa. Tombol yang saya buat sesuai gambar di atas adalah shape dengan model ‘Rounded Rectangle’. Untuk pembuatan seperti sel, pewarnaan, dan seterusnya dapat anda modif sendiri, anda pasti bisa bukan?

3. Membuat tampilan daftar siswa.

Tadi kita sudah membuat input datanya, sekarang kita akan membuat tampilan output dari input data yang kita masukkan, kurang lebih seperti ini:

Anda bisa membuatnya di sheet yang berbeda (Sheet 2). Sesuaikan tampilan tersebut dengan kebutuhan dalam pengolahan data siswa anda.

4. Menyisipkan pemrograman VBA

Disini kita akan bermain sedikit bahasa pemrograman VBA (Visual Basic for Application). Bahasa ini sangat membantu Ms. Excel dalam mengelola data. Untuk memulai koding/pemrograman, klik menu Developer – View Code. Layar Code Editor akan muncul dan dari sinilah kita memulai pemrograman layaknya aplikasi pemrograman lainnya.

Selanjutnya kita akan membuat Module. Module ini ibarat wadah berisi skrip yang dapat kita panggil (Call) lewat lembar kerja utama Ms. Excel. Selain itu, dengan Module, kode akan lebih rapi dan terstruktur, sehingga kita tidak kebingungan ketika mengeditnya kembali. Cara membuat Module:

Jika Module sudah dibuat, klik dua kali Module1 dan letakkan kode berikut kedalam Module yang sudah dibuat:

Sub inputData()
Dim Baris, totalBaris As Long
totalBaris = Sheet2.Cells.Rows.Count
Baris = Sheet2.Cells(totalBaris, 2).End(xlUp).Row + 1

Sheet2.Range("A" & Baris).Value = "=ROW()-5" Sheet2.Range("B" & Baris).Value = Sheet1.Range("D6").Value
Sheet2.Range("C" & Baris).Value = Sheet1.Range("D8").Value
Sheet2.Range("D" & Baris).Value = Sheet1.Range("D9").Value
Sheet2.Range("E" & Baris).Value = Sheet1.Range("D10").Value
Sheet2.Range("F" & Baris).Value = Sheet1.Range("i10").Value
Sheet2.Range("G" & Baris).Value = Sheet1.Range("D11").Value
Sheet2.Range("H" & Baris).Value = Sheet1.Range("D12").Value
Sheet2.Range("i" & Baris).Value = Sheet1.Range("D13").Value
Sheet2.Range("j" & Baris).Value = Sheet1.Range("i13").Value
Sheet2.Range("k" & Baris).Value = Sheet1.Range("D14").Value
Sheet2.Range("l" & Baris).Value = Sheet1.Range("G14").Value

MsgBox "Data sudah masuk database"

Sheet1.Range("D6").Value = ""
Sheet1.Range("D8").Value = ""
Sheet1.Range("D9").Value = ""
Sheet1.Range("D10").Value = ""
Sheet1.Range("i10").Value = ""
Sheet1.Range("D11").Value = ""
Sheet1.Range("D12").Value = ""
Sheet1.Range("D13").Value = ""
Sheet1.Range("i13").Value = ""
Sheet1.Range("D14").Value = ""
Sheet1.Range("G14").Value = ""
End Sub

Kira-kira jadinya seperti ini:

Tutup Code Editor dan kembali ke lembar kerja utama Ms. Excel.

5. Menetapkan Macro sebagai Tombol

Setelah keempat proses diatas dilakukan, sekarang saatnya menetapkan Macro pada tombol yang sudah kita bikin tadi. Macro ini adalah sekumpulan perintah membentuk suatu prosedur dari skrip yang anda tulis di Code Editor VBA.

Untuk menetapkan Macro, klik kanan pada objek/tombol yang sudah kita buat, yaitu tombol ‘SIMPAN’, pilih Assign Macro. Akan muncul kotak daftar Macro yang sudah kita buat.

Pilih Macro yang tersedia dengan nama inputData, karena tadi kita menamainya inputData.

Selamat, aplikasi Input Data Siswa anda sudah jadi. Tinggal memasukkan data kedalam kotakkan yang tersedia kemudian tekan tombol ‘SIMPAN’, maka data yang diinputkan akan muncul di Sheet tampilan daftar siswa.

Ternyata mudah bukan membuat aplikasi Input Data Siswa pada Excel menggunakan VBA. Anda juga dapat memodifikasi kontennya untuk membuat aplikasi input data lain seperti input data koperasi, nilai siswa, akuntansi, dan lain sebagainya.

Jika terdapat kendala/kesulitan dalam membuat aplikasi ini, silakan berkomentar. Apabila anda bingung dengan penjelasan pada bagian koding/skrip VBA, silakan tanyakan di kolom komentar, saya akan segera menjawab pertanyaan-pertanyaan anda. Terimakasih.

Kredit aplikasi untuk: Heru Monas Prasetyo

Download file JADI

INPUT DATA SISWA.XLSM (24.0 KB)