Search / Edit Data With Userform

I'm coming along nicely with my user form. My last issue was trying to get it to search/recall data from the "Data" tab. This works perfectly when only 1 record is found, and if multiple line items are found, a message box pops up and tells me how many records are found that meet the criteria. However, I am now struggling to get the code to work properly to past the details of those records into the list box, so that the user can select which record they want to edit.

I get a Run-Time Error '1004' Application-Defined or Object-Defined error and it points to the section in red:

Code:
Sub FindAll()
Dim strFind As String 'what to find
Dim rFilter As Range 'range to search
Set rFilter = Worksheets("Data").Range("E3", Range("h65536").End(xlUp))
Set Rng = Worksheets("Data").Range("E3", Range("e65536").End(xlUp))
strFind = Me.cbosearch.Value

[Code] ...........