I have a multipage userform;
- Page 1 has listbox1 and textbox1
- page 2 has listbox2

Basically my code searches for the value in textbox1 and outputs the result into listbox1.
Then my code uses the selected value in listbox1 to perform another search and the results should appear in listbox2
It also adds a worksheet with the name of the selected listbox1.value


rr = ListBox1.Value
If Not Evaluate("ISREF(" & rr & "!A1)") Then Worksheets.Add(After:=Worksheets(Worksheets.Count)).Name = rr
Set ws = Sheets(rr)
ws.Activate

'''get data

LR = ws.Range("A999999").End(xlUp).Row


With Me.ListBox2
    .RowSource = "=" & rr & "!A1:AO" & LR
End With
Everything works fine except for this bit:
With Me.ListBox2
    .RowSource = "=" & rr & "!A1:AO" & LR
End With
I keep getting a runtime 380 error & I have no idea what the issue is.

Any assistance appreciated!