Filling a list box with a dynamic named range

Hello guys!

I'm having problems with this: I need to fill a list box (from the controls toolbox) when a command button is clicked with a named range from another sheet, this range is dynamic. For some reason, none of the codes I've tried are working! Is there any short straighforward piece of VB code I can use to do this??

My dynamic named range is defined by

OFFSET(Sheet2!$B$2;0;0;COUNTA(Sheet2!$B:$B))

And I intend to copy the VB code into my sheet under

Private Sub CommandButton2_Click()

End Sub

That's all, thank you!