VBA to select first item in a ComboBox

[2Took]

Trying to get VBA to select first item in a combobox. What do I need to add? Getting below error on this part at the end of code below:

:  Worksheet.ComboBox1.ListIndex = 0

If fixed_range.Row = n Or Not Intersect(ActiveCell, Range("B7")) Is Nothing Then MsgBox "That was a last step." & vbNewLine & "Back to step 1, for the next item in the Queue.", vbInformation, "Heads Up": Call ClearPBoard: Range("A11").Select: ActiveWindow.ScrollRow = ActiveCell.Row:  Worksheet.ComboBox1.ListIndex = 0: Exit Sub

 

[Rick Rothstein]

I think the problem is "Worksheet"... it is not an object. You might have meant "Worksheets" (with the "s" on the end)... that is an object (a Collection), but you would need to specify what worksheet in it you were referring to. For example, if your ComboBox is on a worksheet named "Sheet1", then you code line should be...

Worksheets("Sheet1").ComboBox1.ListIndex = 0

 

[2Took]

I think the problem is "Worksheet"... it is not an object. You might have meant "Worksheets" (with the "s" on the end)... that is an object (a Collection), but you would need to specify what worksheet in it you were referring to. For example, if your ComboBox is on a worksheet named "Sheet1", then you code line should be...

Worksheets("Sheet1").ComboBox1.ListIndex = 0

How do I do it by sheet code name? Better practice to do it that way, right?

 

[Rick Rothstein]

If you sheet's Code Name is Sheet1, just use it that way...

Sheet1.ComboBox1.ListIndex = 0