Use second column to break ranking ties

I'm hoping to find a VBA solution to breaking ties in rankings. Attached is a simplified version of what I'm trying to achieve. I need to rank the top four performers in each location, using Scor A (High is best) and breaking any ties by using Scor B (Low is best). The result in "Rank" can either stop at 4 or revise the whole list. I've searched, but most solutions are not Vba and seem to use an artificial "Count" function to break ties. If they use 2 columns they only seem to combine the columns and then rank the result. Any help will be most appreciated.