VBA code to automatically clear a cells contents when another cell is empty

it doesnt work for me, its not working until I unprotect the sheet by mouse enter the password then click on any other cell. then it works for me fine, it also locks the sheet again with the password.