I thin you must first unprotect sheet
Sheets("sheet name").Unprotect ("password_here")
and finally protect again 
Sheets("sheet name").Protect ("password_here")