Lock cells on the basis of date VBA

[Admin]

Hi,

Will look this in detail later. In the meantime, add the following line before the debug line.

wksTarget.Unprotect Password:=Pwd