How to find a range in a single a column differentiating the strings

Question

I am facing an issue where to find the specific range in a column while building a macro using VBA script. here is the column data to sort it out using VBA

in