Protect cells within a shifting range

[hermithead]

Hi,

The range of cells that I want protected are going to vary from workbook to workbook as each workbook will contain different amounts of data.

So I need a macro that can be applied to protect a shifting range of data, for example:
In 'workbook A', only cells B1:G26 contain data.
Whereas 'workbook B' the data ranges from cells B1:G55
*Note that cell B1 is fixed.

I had the same problem with a shifting print range, the code below is what I developed and it works - it finds the last blank cell in column G and enters the word "End", it then expands the print range back to B1.

I tried modifying this to protect cells but got stuck

Please Login or Register  to view this content.

Thank you

[jaslake]

Hi hermithead

In Thisworkbook Module try this code

Please Login or Register  to view this content.