Edit data adalah salah satu cara untuk merubah data yang sudah di input sebelumnya, sebelum kita masuk kedalam pembahasaan bagaimana cara mengedit data di userform atau database yang telah kita buat, sebelumnya kita sudah belajar pada tahap langkah pertama, kedua dan ketiga jadi data yang sudah kita input dan ingin merubah data tersebut kapanpun kita mau merupakan langkah yang ke-4 (empat) pada metode pembelajaran ini. ok lanjut saja daripada panjang lebar membahas tentang bagaimana meng-edit data yang sudah terlanjur kita input tanpa harus mengotak-atik database intinya.

langkah-langkah yang harus kita lakukan adalah:

1. Buat userform seperti biasanya pada metode pembelajarn sebelumnya.

2. tambahkan CommandButton dan ganti namanya di properties kemudian pilih caption ganti dengan nama Edit Data.

3. Masukan Kode berikut pada tombol Edit Data yang sudah kita buat tadi.

Data = TextBox1.value

With Worksheets("Sheet1").Range("A2:A100")

Set c = .Find(TextBox1, LookIn:=xlValues)

If Not c Is Nothing Then

baris = c.Row

Worksheets("Sheet1").Cells(baris, 1).Values = TextBox1.Value

Worksheets("Sheet1").Cells(baris, 2).Values = TextBox2.Value

Worksheets("Sheet1").Cells(baris, 3).Values = TextBox3.Value

​

TextBox1.Value = ""

TextBox2.Value = ""

TextBox3.Value = ""

​

End If

End With

​

Jika langkah di atas diikuti dengan benar dan sesuai maka proses data untuk melakukan pengeditan akan berjalan dengan baik

dan jangan lupa juga jika pada saat di Run terjadi error maka silahkan masukan kode di bawah ini di bawah Private Sub CommandButton2_Click()

On Error Resume Next

demikian pembelajaran untuk meng Edit Data dalam database excel ini semoga bermanfaat.

​