Combo Box value is null
 

I'm creating a combo box for the first time. I've got it set up in a form.
The values are on a separate worksheet range. The purpose is to have the
user choose a value from the combo box and then data on a worksheet is
filtered by that value. I've tried finding the information from other
discussions, but I'm not getting it. Can you help?

My code is:
Dim PrNo As String
PrNo = ProjectNumberComboBox
Sheets("Data").Select
Range("A1:AH16").Select
Selection.AutoFilter
ActiveSheet.Range("$A$1:$AH$16").AutoFilter Field:=1, Criteria1:=PrNo
ProjectNoMenu.Hide

Combo Box value is null
 

To get the data from the combobox use

userform1.Combox1.text

when you type the line into VBA you should see after the userform and then
period a box pop up showing you the items on the Userform. the combobox name
should be one of the items.

"Pam" wrote:

I'm creating a combo box for the first time. I've got it set up in a form.
The values are on a separate worksheet range. The purpose is to have the
user choose a value from the combo box and then data on a worksheet is
filtered by that value. I've tried finding the information from other
discussions, but I'm not getting it. Can you help?

My code is:
Dim PrNo As String
PrNo = ProjectNumberComboBox
Sheets("Data").Select
Range("A1:AH16").Select
Selection.AutoFilter
ActiveSheet.Range("$A$1:$AH$16").AutoFilter Field:=1, Criteria1:=PrNo
ProjectNoMenu.Hide

Combo Box value is null
 

Thank you. You all are life savers for the ignorant. =o)

"Joel" wrote:

To get the data from the combobox use

userform1.Combox1.text

when you type the line into VBA you should see after the userform and then
period a box pop up showing you the items on the Userform. the combobox name
should be one of the items.

"Pam" wrote:

I'm creating a combo box for the first time. I've got it set up in a form.
The values are on a separate worksheet range. The purpose is to have the
user choose a value from the combo box and then data on a worksheet is
filtered by that value. I've tried finding the information from other
discussions, but I'm not getting it. Can you help?

My code is:
Dim PrNo As String
PrNo = ProjectNumberComboBox
Sheets("Data").Select
Range("A1:AH16").Select
Selection.AutoFilter
ActiveSheet.Range("$A$1:$AH$16").AutoFilter Field:=1, Criteria1:=PrNo
ProjectNoMenu.Hide