Excel VBA filter by font color

[12Rev79]

Dear Experts,

I have an excel with
Column E as Passport expiration,
Column G as Company ID expiration,
Column I Passes expiration,

In the same sheet I have a ComboBox1 with filledrange using the headers as above

For example I want that after if select Company ID expiration from my combobox it will filter all with red font in column G, if non a msgbox will say "No Expired Company ID"

Can anyone help me how can I figure out my code, please?

Thanks in advance,
12rev79