How to upgrate changes in lisbox selection

[inactiveUser214710]

hi every one
The goal of this project is be opotunity to change some data in several columns of the userform, by selecting any row in listbox.

The changings goes to other listbox(Listbox2 = for just one regist), to be check, and after that to be saved. .

The code that I have for show in listbox2 the row select, to change is:

Private Sub ListBox1_Click()  ´the data list have +- 500 rows
  Dim i As Long
   With ListBox2
    .Clear
    .AddItem   
      For i = 0 To 6
       .List(.ListCount - 1, i) = ListBox1.List(ListBox1.ListIndex, i)
      Next i
  End With 
End Sub

But as there are many regists, I agrouped and put it in combobox, to be chose the group. so the data in listbox1, comes from combobox item.
The problem is, when I choose a selection of the group of data, listbox2 don't upgrate.
Here Is the problem, it don't upgrate, the changes.
I already have tried, in many ways, to solve this problem, but without resolution. So I return to this forum to ask for help again.
For those who want and can help, I will be very grateful.
Thank You
Jdcar