Excel VBA Filtering, Selecting, and Counting

Hi,

How to determine the cells in a range based upon Font Size and Font Name?

For example, CurrentRegion or UsedRange, how what cells have certain Font Size or certain Font applied?

For example, you have a contiguous range of cells.

1) How many different font sizes in that range?
2) How many different fonts used in that range?

Perhaps, Filters can help?

As little looping as possible; preferably none.

Solution should be as efficient as possible.