ActiveX ComboBox to drive workbook presentation

[MM977]

Hi all,


I would like to use an an ActiveX ComboBox to drive the formatting of the Excel workbook.

Particulars of relevance:
- ComboBox name: ComboBox1
- ComboBox options: Total, Products, Services


What I have thus far:

Sub ComboBox1_Change()

Select Case ComboBox1.Value
Case Total
MsgBox "Total"
Case Products
MsgBox "Products"
Case Services
MsgBox "Services"
End Select

End Sub

However selecting the drop-down options in the ComboBox does absolutely nothing pertaining to the Macro. No errors, nothing. My formulas work as expected but nothing from the Macro.

Any thoughts? I've spent two full days on it now and I really should do some proper work.

 

[My Aswer Is This]

If you do not want to see screen action during script put these two lines of code in your script:

Application.ScreenUpdating = False

Application.ScreenUpdating =True

Put your code between these two lines of code.

 

[MM977]

Brilliant! I love that. Will add it when I'm back tomorrow