How to rank highest to lowest by counting negative values?
I would probably use something like this follow by if elseif logic but I can't seems to figure it out
Set CountRng = range("B1:E1")
CountApple = Application.WorksheetFunction.CountIf(CountRng, "<0")
CountOrange ..
CountBanana ..
If CountApple > CountOrange then or endif...
Maybe there is a better way to do this?
See Question&Answers more detail:os