How to edit, amend or delete a row's information through list box userform

[cnu nagula]

i need a code to edit, amend or delete a row in a sheet through listbox.
i am having textboxes 9 to 15.
i am using the following code for listbox1 for selecting the name from cell b2


Private Sub UserForm_initialize()
ListBox1.List = Worksheets("Details").Range("b3", Worksheets("Sheet2").Range("b65536").End(xlUp)).Value
End Sub


please help

 

[cnu nagula]

i am using the following code for updating sheet2 rows

Private Sub save_Click()
'next empty cell in column A
Set c = Worksheets("Details").Range("a65536").End(xlUp).Offset(1, 0)
Application.ScreenUpdating = False 'speed up, hide task
'write userform entries to database
c.Value = Me.TextBox1.Value
c.Offset(0, 1).Value = Me.TextBox1.Value
c.Offset(0, 2).Value = Me.TextBox2.Value
c.Offset(0, 3).Value = Me.TextBox3.Value
c.Offset(0, 4).Value = Me.TextBox4.Value
c.Offset(0, 5).Value = Me.TextBox5.Value
c.Offset(0, 6).Value = Me.TextBox6.Value
c.Offset(0, 7).Value = Me.TextBox7.Value
c.Offset(0, 0).Value = Me.TextBox8.Value
'clear the form
With Me
.TextBox1.Value = vbNullString
.TextBox2.Value = vbNullString
.TextBox3.Value = vbNullString
.TextBox4.Value = vbNullString
.TextBox5.Value = vbNullString
.TextBox6.Value = vbNullString
.TextBox7.Value = vbNullString
.TextBox8.Value = vbNullString
End With
Application.ScreenUpdating = True
'ListBox1.Clear 'Gollem
End Sub