VBA selecting top 3

Dear Friends,

I'm trying to make a macro that selects the 3 highest values and give these cells a blue backcolor. (The code should skip any blanc cells).


Thanks you for any help offered.

Greetings,

Roberto, The Netherlands