안녕하세요, 다른 시트의 값을 기준으로 Excel 시트의 셀을 고정하려고합니다.

Question

다른 경우에는 완벽하게 작동하지만 내 경우에는 그렇지 않은 다양한 코드를 시도했습니다. 시트에 코드를 작성하기 전에 시트에있는 모든 셀이 어쨌든 잠김으로 표시됩니다. 나는 여기에서 갇혀 있고 여기서 무엇을 할 수 있는지 모른다.

나는이 코드를 시도했지만 아무 것도 잠겨있는 것 같지 않은데, 내가 원하는 것은 무엇이든 할 수 있습니다.

Private Sub Worksheet_Change(ByVal Target As Range) 
    If Range("A1") = "Accepting" Then 
     Range("B1:B4").Locked = False 
    ElseIf Range("A1") = "Refusing" Then 
     Range("B1:B4").Locked = True 
    End If 


End Sub 

Answer 1

범위를 잠그면 시트가 보호되지 않으면 아무 효과가 없습니다.

예를 들어 Range("B1:B4").Locked = True은 YourWorksheet.Protect까지 작동하지 않습니다. 당신은 YourWorksheet.Unprotect을 수행 한 후에 그것을 보호 해제 할 수 있습니다.