Refresh Listbox

[sharky12345]

I'm using this on a Userform to load a Listbox from a range;

With Sheet1
LastRow = .Cells(.Rows.Count, "A").End(xlUp).Row
End With
With Me.ListBox1
.ColumnCount = 10
.ColumnHeads = True
.ColumnWidths = "40;50;110;60;55;60;60;60;0;50"
.RowSource = Sheet1.Range("A2:M" & LastRow).Address(, , , True)
End With

Can someone show me how to reload it after the sheet values have been changed but without having to reload the Userform?

 

[Fluff]

The listbox should update automatically, whenever the data changes.

 

[rlv01]

When I use your code snippet, the listbox changes when the cell data changes without having to reload the userform.