Take a look at this and see if it will help you to organize your code.

http://www.exceltip.com/st/Create_Us...Excel/629.html



"Amy Brooks" wrote in message
...
Hi,

I've tried to modify the following code (originally intended for an
Outlook
form) to work in an Excel form. As I expected, it doesn't work, but I'm
not
entirely sure why. My guess is that either, I've put it in the wrong
place,
the sub name is wrong, or the code itself has a problem. The code is
supposed
to make one combo box (Employee) dependant on another (Department). For
example, if I selected the Marketing department from the Department combo
box, I would only get the options A Brock, A Brooks, and V Woodford.

What should I use as the Sub name?
Where is the code supposed to go?
Are there any other mistakes in the code that could be causing it not to
work?

__________________________________________________ __________________
Sub cboEmployee_List()
Select Case Item.UserProperties("cboDepartment")
Case "Accounts"
cboEmployee.List = Split("C Dawson,,J Cooper,L Bottomley",
",")
Case "Sales"
cboEmployee.List = Split("A Soar,B Miller,D Padgett,P
North",
",")
Case "Marketing"
cboEmployee.List = Split("A Brock,V Woodford,A Brooks", ",")
End Select
End Sub
__________________________________________________ __________________

Thanks!
Amy