•Using the drawing toolbar, choose the rectangle icon and draw a rectangular box on the worksheet.
•Right-click the box. Choose Format Autoshape. On the Size tab, change the size to 1" x 1"
•On the properties tab, change properties to "don't move and size with cells " •Using View - Zoom, adjust the worksheet to maximum
•Place the box to the most upper left corner (cell A1)
•Adjust row and column size of cell A1 manually until it match with size of the box
•read the row and column scale and use it to update the whole row and column.
Do This using macro and you will be fast :D
Taken from:http://www.mrexcel.com/tip071.shtml