Hi

If the code is being run from a CommandButton make sure that the
TakeFocusOnClick property of the CommandButton is set to False. Also,
although I have seen it said that it is not necessary, activate the sheet
you want and select a cell on that sheet before the unprotect statement and
your problem should disappear.

Worksheets("Sheet1").activate
Range("a1").select
ActiveSheet.Unprotect

HTH

Ken