2010-09-02 111 views
1

我有3個單元格,它們相互合併並用給定單元格名稱(例如「foo」)引用。通過單元格名稱選擇的Excel中的單元格的解鎖範圍Office 2007

我現在想用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屬性設置爲false?

回答

3

下面的代碼工作正常在我的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 

HTH!

+0

thx This works :-) – echox 2010-09-07 08:52:16

相關問題