SteveG
01-16-2008, 06:29 AM
Hi All,
I've searched around for a while now and can't find the answer so I'm hoping someone can help.
I have a workbook with several Combo Boxes being used in a User Form. The RowSource is set to a named range in the workbook. This range includes a blank cell. My objective is to restrict users from populating the ComboBox with anything other than what is in the RowSource. MatchEntry is set to 1 - frmMatchEntryComplete and MatchRequired is set to True.
The User Form is launched using a command button on a sheet in the workbook.
Private Sub CommandButton6_Click()
frmAddRequest.Show
End Sub
When I launch the User Form I get the Microsoft Forms - Invalid Property error message. I am using the code below to initialize the form.
Private Sub UserForm_Initialize()
cboLSRName.Value = ""
cboTeam.Value = ""
cboUserList.Value = ""
DTPicker1.Value = Date
optSick = False
optVacation = False
optFloat = False
optFlex = False
cboLSRName.SetFocus
End Sub
I assume that the error is being caused by setting the Combo Box Values to "" but I'm not sure how to get around that. Any help is much appreciated!
Thanks,
Steve
I've searched around for a while now and can't find the answer so I'm hoping someone can help.
I have a workbook with several Combo Boxes being used in a User Form. The RowSource is set to a named range in the workbook. This range includes a blank cell. My objective is to restrict users from populating the ComboBox with anything other than what is in the RowSource. MatchEntry is set to 1 - frmMatchEntryComplete and MatchRequired is set to True.
The User Form is launched using a command button on a sheet in the workbook.
Private Sub CommandButton6_Click()
frmAddRequest.Show
End Sub
When I launch the User Form I get the Microsoft Forms - Invalid Property error message. I am using the code below to initialize the form.
Private Sub UserForm_Initialize()
cboLSRName.Value = ""
cboTeam.Value = ""
cboUserList.Value = ""
DTPicker1.Value = Date
optSick = False
optVacation = False
optFloat = False
optFlex = False
cboLSRName.SetFocus
End Sub
I assume that the error is being caused by setting the Combo Box Values to "" but I'm not sure how to get around that. Any help is much appreciated!
Thanks,
Steve