Protect / Unprotect sheet using VBA

[wisewood]

is it possible to protect and unprotect a sheet using VBA ?

I have a sheet i would like to prevent users from editing by using protection, but would also like VBA script to be able to paste rows onto the sheet - so would need VBA to unprotect, paste the data, and then protect again.

Can this be done?

 

[mordrid]

Hi yes you can protect and unprotect using VBA, the code is as follows

ActiveSheet.Unprotect Password:="XXXX"

or

ActiveSheet.Unprotect ("XXXX")

ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, Password:="XXXX"

Where XXXX = your password