That worked like a Charm, Thanks a ton.

For other ranges in the same worksheet, I guess, I only need to change

Code:
WholeData = Range("R3:AC17").Value2
and rest of the code should be repeated for each range, no need to change the variable, also, I guess. I'll surely try for other ranges.