ListBox rowsource named range offset by 1

As the title says, I have a listbox populate with a named range on startup in UserForm_Initialize(). The named range contains the header "Vendor" on the first line. I want the listbox to omit the first line from the named range, but no matter what code I try to toss at it, I'm getting errors. Here's my latest failed attempt at it:

Private Sub UserForm_Initialize()
    SpinButton1.Value = 0
    Dim lbrng As Range: Set lbrng = Sheets("Vendor").Range("VendorList").Offset(1, 0).Value
    ListBox1.RowSource = lbrng.Address
End Sub

BTW, this code alone works without error, but does not offset the list...

    ListBox1.RowSource = Worksheets("Data").Range("VendorList").Offset(1).Value

Strange, I retract that. It suddenly isn't working now once I restarted the project.

Try this to see if this helps......

ListBox1.RowSource = Sheets("Vendor").Range("VendorList").Offset(1, 0).Address

Or your code should be like this.....

Private Sub UserForm_Initialize()
    SpinButton1.Value = 0
    Dim lbrng As Range
    Set lbrng = Sheets("Vendor").Range("VendorList").Offset(1, 0)
    ListBox1.RowSource = lbrng.Address
End Sub