Fylde listbox med data fra anden workbook

Hep,

Jeg prøver lige nu med denne kode, men det virker ikke ("Invalid property value".

Dim wbold As Workbook
Dim wbnew As Workbook

Set wbold = ActiveWorkbook

Workbooks.Open Filename:="\\.host\Shared Folders\navn On My Mac\Dropbox\Indsatsfelter 100925 v.0.9.xlsm"

Set wbnew = ActiveWorkbook

'fyld Listbox1 med data fra filen

sidsteif = wbnew.Worksheets("Liste").Range("B1000").End(xlUp).Row

wbold.Activate

With frmtrs.ListBox1
    .RowSource = wbnew.Worksheets("Liste").Name & "!" & "B4" & ":F" & sidsteif
    .ColumnCount = 8
    .ColumnWidths = "100, 100, 200, 50, 0, 0, 80, 0"
End With