【发布时间】:2016-02-01 14:32:21
【问题描述】:
我试图选择单元格 B4 以及从 A 列到 Z 列以及第 10 行及以下的所有单元格,所以基本上是 A10:Z150。并试图在我保护床单之前解锁它。 现在我正在使用 Sheets("DR02").Range("B4", "A10:Z200").Locked = False 但它不起作用。它唯一解锁第 4 行上方的单元格,而不仅仅是单元格 B4。
【问题讨论】:
我试图选择单元格 B4 以及从 A 列到 Z 列以及第 10 行及以下的所有单元格,所以基本上是 A10:Z150。并试图在我保护床单之前解锁它。 现在我正在使用 Sheets("DR02").Range("B4", "A10:Z200").Locked = False 但它不起作用。它唯一解锁第 4 行上方的单元格,而不仅仅是单元格 B4。
【问题讨论】:
尝试使用:
With Sheets("DR02")
.Unprotect "password"
.Range("B4,A10:Z200").Locked = False
.protect "password"
End With
或者(获取“A”列的最后一行):
With Sheets("DR02")
.Unprotect "password"
.Range("B4,A10:Z" & .Range("A" & .Rows.Count).End(xlUp).Row).Locked = False
.protect "password"
End With
编辑:
从 cmets 看来,单元格 B4 与其他单元格合并,如果是这样,我们可以使用:
With Sheets("DR02")
.Unprotect "password"
Union(.Range("B4").MergeArea, .Range("A10:Z" & .Range("A" & .Rows.Count).End(xlUp).Row)).Locked = False
.Protect "password"
End With
【讨论】:
password 更改为您的密码
B4?
Union(Range("B4").MergeArea, Range("A10:Z" & Range("B" & Rows.Count).End(xlUp).Row)).Locked = False
【讨论】: