LANGKAH - LANGKAH MEMBUAT FORM ISIAN DATA SEDERHANA DI MS. EXCEL

KALI INI SAYA AKAN SHARING TUTORIAL MEMBUAT FORM ENTRY BARANG DI MS. EXCEL

Terkadang kita merasa jenuh mengisi table di excel, untuk itu kita membutuhkan form sederhana untuk mengisi data tersebut.

Adapun langkah-langkah pembuatan form sebagai berikut :
1. Buka Ms. Excel.
2. Double Klik di nama worksheet lalu ganti nama Sheet1 menjadi “PARTSDATA” (bisa diganti dengan nama lain).

3. Pada Row 1 buat kolom dengan nama heading untuk tabel, seperti contoh dibawah ini:

4. Kemudian simpan terlebih dahulu file dengan cara klik file save as dan pilih tipe Excel Macro Enabled Workbook sebagai ekstensi penyimpanan.

Langkah berikutnya membuat Macro untuk file tersebut.

5. Pada worksheet pilih menu view klik tab Macros pilih view macros :

Akan muncul tampilan Macro, lalu tulis macro name menjadi “FORM” kemudian klik create, seperti gambar dibawah ini:

6.  Setelah itu akan muncul tampilan MVA. Kemudian klik kanan mouse pada VBA Project , Pilih insert, kemudian pilih Userform.

7. Akan muncul tampilan UserForm

Langkah selanjutnya adalah design userform dengan komponen yang akan kita gunakan ,

seperti : Label untuk tulisan “kode barang, nama barang, satuan, dan harga barang”. Sedangkan Textbox untuk tempat pengisian data kecuali data satuan menggunakan komponen Combo Box, dan Command Button digunakan pada tulisan “tambah data” dan “selesai”. Seperti tampak pada gambar berikut :

Langkah selanjutnya adalah memberi nama dan caption untuk tiap label, textbox, Combo box dan command button

Label1 Caption diganti dengan “Kode”
Label2 Caption diganti dengan “Nama Barang”
Label3 Caption diganti dengan “Satuan”
Label4 Caption diganti dengan “Harga”

TextBox1 Name diganti dengan “tkode”
TextBox2 Name diganti dengan “tnama”
ComboBox Name diganti dengan “cbosatuan”
TextBox3 Name diganti dengan “tharga”

command button1 Caption diganti dengan “TAMBAH DATA”
command button1 Name diganti dengan “cmdtambah”
command button2 Caption diganti dengan “SELESAI”
command button2 Name diganti dengan “cmdselesai”

Langkah selanjutnya adalah membuat kode.

1.       Klik command button “TAMBAH DATA“
2.       Klik kanan pada tombol “TAMBAH DATA” lalu pilih view code atau klik menu bar pilih view code.

Maka akan muncul tampilan seperti ini

3.       Masukan kode seperti dibawah ini:

Private Sub CMDTMBH_Click()
Dim iRow As Long
Dim ws As Worksheet
Set ws = Worksheets(“PARTSDATA”)

‘menemukan baris kosong pada database
iRow = ws.Cells(Rows.Count, 1) _
.End(xlUp).Offset(1, 0).Row

‘check untuk sebuah kode
If Trim(Me.tkode.Value) = “” Then
Me.tkode.SetFocus
MsgBox “Masukan Kode Barang”
Exit Sub
End If

‘copy data ke database
ws.Cells(iRow, 1).Value = Me.tkode.Value
ws.Cells(iRow, 2).Value = Me.tnama.Value
ws.Cells(iRow, 3).Value = Me.cbosatuan.Value
ws.Cells(iRow, 4).Value = Me.tharga.Value

‘clear data
Me.tkode.Value = “”
Me.tnama.Value = “”
Me.tsatuan.Value = “”
Me.tharga.Value = “”
Me.tkode.SetFocus
End Sub

4.       Dilanjutkan dengan pengisian code pada tombol selesai, sama seperti  langkah nomor 2 diatas dengan kode dibawah ini :

Private Sub cmdselesai_Click()
Unload Me
End Sub

5.       Untuk kolom pengisian satuan atau pada cbosatuan, gunakan kode berikut:

6.       Untuk menghindari menutup melalui tanda X pada form masukan kode dibawah ini dengan klik kanan mouse pada form dan pilih view code dan ketikan kode dibawah ini :

Private Sub UserForm_QueryClose(Cancel As Integer, _
CloseMode As Integer)
If CloseMode = vbFormControlMenu Then
Cancel = True
MsgBox “PAKE TOMBOL SELESAI ATUH BANG!”
End If
End Sub

7.        Mengisi code pada module dengan cara klik kanan module pilih view code dan isikan kode dibawah ini :

Sub FORM()
UserForm1.Show
End Sub

7.       Lalu klik run. Dan akan muncul tampilan sepertini dibawah ini:

8.        Buat tombol untuk mengaktifkan form entry data menggunakan shape.

Lalu klik kanan tombol yang telah dibuat, pilih Assign Macro

Setelah tampilan assign macros terbuka, pilih nama macro yang telah dibuat di awal (FORM), lalu klik oke.

9.        TERAKHIR, Simpan hasil kerja pembuatan form entry barang yang telah dibuat dalam tipe Excel Macro Enabled Workbook, dan buat nama filenya sesuai keinginan.

>>>Untuk melihat hasil form entry data sesuai tutorial diatas, KLIK DISINI.

Terimakasih atas kunjungannya, semoga bermanfaat dan sampai jumpa di tutorial selanjutnya J Assalamu’alaikum Wr.Wb.