Vba 根据其他单元格中的值锁定单元格

我想根据另一个单元格中的值锁定一个单元格

例如：

如果

B2

具有至少包含10个字母的任何值，则锁定

A2

，如果

B2

具有超过10个字母的值，则解锁

A2

---

我希望在A列和B列中有此项，因此VBA宏将查看B列中的值，并相应地锁定/解锁A列中的值。

首先将所有工作表设置为解锁状态

然后使用根据另一个单元格中的值锁定特定单元格

If Worksheets("Sheet1").Range("B1").Value = <something> then: _
Worksheets("Sheet1").Range("A1").Locked = True

---

它将只锁定您在上面用lock标记的单元格，而不锁定所有其他单元格。

我对VBA的了解仍然有限。我不知道如何循环，你能帮我吗？首先从学习vba开始。循环在每种语言中都是一个非常基本的函数，如果你不知道如何循环，你就不可能走得很远。这一次，请看这里：记住，对于这类问题，谷歌永远是你的朋友，多用它吧！据我所知，您在Stack Overflow方面是个新手，所以欢迎来到社区。请在这里参观：它将真正帮助你在这里提问和导航。

Worksheets("Sheet1").Protect UserInterfaceOnly:=True