I can write a macro that gets the last cell and figures out the ranges of
rows and columns that do not play but is there an easier way to do this?
Pat

Are you looking for

Cells(1, 1).Locked = False
Rows("2:" & Rows.Count).Hidden = True
Range(Columns(2), Columns(Columns.Count)).EntireColumn.Hidden = True
ActiveSheet.Protect

If this post helps click Yes
---------------
Jacob Skaria


"Pat" wrote:

I can write a macro that gets the last cell and figures out the ranges of
rows and columns that do not play but is there an easier way to do this?
Pat