为什么我无法使用excel VBA更新Listbox的RowSource属性？

Question

What my userform looks like with the properties window:

This is my code:

With Worksheets("List of Accounts").ListObjects("ListofAccounts").ListColumns(1).Range
    Total_rows_Accounts = .Find(What:="*", _
    After:=.Cells(1), _
    Lookat:=xlPart, _
    LookIn:=xlFormulas, _
    SearchOrder:=xlByRows, _
    SearchDirection:=xlPrevious, _
    MatchCase:=False).Row
End With

If Total_rows_Accounts > 1 Then
    lbxCurrent.RowSource = "List of Accounts!A2:A4"
End If

What my worksheet looks like:

The error:

Answer 1

Your Range is incorrect. It should be lbxCurrent.RowSource = "'List of Accounts'!A2:A4" You're getting the error due to spaces in your sheet name