problem show dynamic rowsource of data in listbox on userform

hi, all

i have a problem about show dynamic rowsource data from sheet to listbox on userform it just show one col while i have four cols in my sheet

this is my code

Private Sub UserForm_Initialize()
ListBox1.RowSource = Range(sheet1.Range("a2"), sheet1.Range("a65536").End(xlUp)).Address(, , , True)
ListBox1.ColumnCount = 4
End Sub

hi royuk i would asking about this line to understand it

Me.ListBox1.List = rData.Offset(1).Resize(rData.Rows.Count - 1, rData.Columns.Count).Value

what means -1 and resize about resize as far as i know move right to left or opposite from col to col or row to row if i'm not wrong but this i don't understand

thanks royUK for your code and the clearing