Hi
I don't get a problem. Tested with cells merged and unmerged. Tested
with Target being single and multiple cells. Did you put in the End
With bit?!
regards
Paul

On Jun 24, 1:00*pm, Brad E. wrote:
I am getting an "Unable to set the Locked property of the Range class" error
at the last line of the code which I have copied here.

30 *If Intersect(Target, Range("F5:F13")) Is Nothing Then GoTo 40
* * ActiveSheet.Unprotect Password:="mypass"
* * With Range(Target.Offset(0, 2), Target.Offset(0, 4))
* * * * .Validation.Delete
* * * * .Font.Color = 0
* * * * .Formula = "=VLOOKUP(N" & .Row & ",TABLES!$AF$4:$AG$32,2,FALSE)"
* * * * .Locked = True

The Merged cells in H5:J5 depend on the user-entry in F5. *Most of the time,
the merged cells will be the vlookup formula, but in some instances, the
merged cells will need to be unlocked and user-entered. *I am setting the VBA
up to put the formula in EACH time and (in the code directly following) if
the few instances occur, I will set validation, change the font color, clear
the formula and unlock the range.

I appreciate any help. *Brad