There's a MUCH easier way, you'll be glad to hear!Use this:Range("A65536").End(xlUp).Offset(1, 0).Select