VBA auto filter error handling

Hi,

I have some code that takes a value from a combo box and stores in a variable, and then filters a worksheet with this criteria. However when a selection from the combo box returns no results it still filters showing no columns. the code is:

HTML Code: 

So basically what I want to do, and cant seem to manage is when a selection is made that returns no values, it prompts the user with MsgBox telling them that there are no active projects.

Any ideas?

Thanks

Thanks you legend.