Capture a cell out of range of Listbox Selection and Fill in Other Listbox

Hi everyone
I have a listbox on my userform where I select a row.
The data comes from sheet1
This sheet have several columns(10) and that listbox show only the first 4 columns, and this is what I want.
I would like to show on other listbox or in a label, at same userform, the line corresponding to the selected in the listbox, but of the 10th column.
Will be possible?
I tried with the code bellow, but wihtout any result, because It shows all data from that column(k).
Thank you very much

Dim LastRow, x, CurVal As Range
'''find the lastrow 'Data begin column B and goes until k
LastRow = Sheet1.cells(Rows.Count, 2).End(xlUp).Row
'''clear listbox4
Me.ListBox4.Clear
CurVal = Me.ListBox1.Value '''''ListBox1.List(ListBox1.ListIndex, i) 'Me.ListBox1.Value
''
For x = 2 To LastRow
If Sheet1.cells(x, "b") = CurVal Then
'found a match populate listbox4
Me.ListBox4.AddItem Sheet1.cells(x, "k")
End If
Next x

see big yellow banner - upload your workbook - not all of us will want to build the app from scratch.
Welcome to the forum

Please attach a sample workbook (not a picture or pasted copy). Make sure there is just enough data to demonstrate your need. Include a BEFORE sheet and an AFTER sheet in the workbook if needed to show the process you're trying to complete or automate. Make sure your desired results are shown, mock them up manually if necessary.

Remember to desensitize the data.

Click on GO ADVANCED and then scroll down to Manage Attachments to open the upload window.

Hi Torachan

To give an example for a similar, simpler situation, it would be quite complicated for me to do.
However, through several attempts and ways to solve it, I managed to solve my problem.
However, I appreciate all the openness and availability to solve my problem.
My thanks