Assign ListBox by code

[yonyon7]

Hi,

I'm trying to assign a list box to a variable using Set statement, but getting an error.

Dim SourceList As ListBox
Dim TargetList As ListBox

Private Sub lstCustomer_Click()
    Set SourceList = Me.lstCustomer
    Set TargetList = Me.lstCustSub
End Sub

what am i doing wrong?

Thanks!!
yonyon