vba - 解锁由cellname Office 2007选择的excel中的单元格范围

Question

我有 3 个相互合并的单元格，并使用给定的单元格名称(例如“foo”)引用。

我现在想用 locked 解锁这些单元格。属性。

以下代码中的锁将不是 工作，但值将成功分配给单元格:

Workbooks(loadedSheetName).Worksheets("foo").Range("bar").Locked = False
Workbooks(loadedSheetName).Worksheets("foo").Range("bar") = "foo value"

可行的是通过“坐标”引用单元格，但对我来说并不是一个真正的选择:

Workbooks(loadedSheetName).Worksheets("foo").Range("B3:E3").Locked = False

有没有可能按名称选择一些合并的单元格并设置 locked属性为假？

Answer 1

以下代码在我的 Excel 2007 中工作正常

Sub aa()
    Dim ce As Range
    Application.ScreenUpdating = False ''# screen flicker off
    ActiveSheet.Unprotect Password:=""
    For Each ce In Range("rng")
        ce.MergeArea.Locked = "False"
    Next ce
    ActiveSheet.Protect Password:=""
End Sub

!