Hi,

Have you used: ListBox1.RowSource
You need to upgrade:
Userform1


[vba]Private Sub UserForm_Initialize()
UserformHook Me, Me.Caption
End Sub[/vba]
Test Ok Excel 2003