I suspect I may be missing your problem. You do want the user to select it, right? If so, there are other ways to select areas, such as using Shift with arrow keys and PgDn, or entering "B53:B150" in the address box.

But if you want to do it in VBA, you can do that with:
Range("B53:B150").Select