如何在Excel中使用索引search来locking/解锁单元格

当我使用index-match公式匹配条件时，我想解锁单元格。

我尝试了很多，但没有奏效。 你能告诉我我的错误吗？

 Private Sub Worksheet_ChangeS(ByVal Target As Range) If[X9] > "42401" Then ActiveSheet.Unprotect("pswrd")[ = INDEX(A16: L35, MATCH(X9, A16: A35, 0), MATCH("GPF", A16: L16, 0))].Locked = False ActiveSheet.Protect("pswrd") Else ActiveSheet.Unprotect("pswrd")[ = INDEX(A16: L35, MATCH(X9, A16: A35, 0), MATCH("GPF", A16: L16, 0))].Locked = True ActiveSheet.Protect("pswrd") End If End Sub