如何使用VBA在Excel中选择特定单元格？

Question

我试图从A列到Z列以及第10行和第10行选择单元格B4和所有单元格，所以基本上是A10：Z150。并且在我保护表单之前尝试解锁它。 现在我使用Sheets（“DR02”）。范围（“B4”，“A10：Z200”）。锁定= False但它不起作用。它仅在第4行上方解锁单元而不是仅在单元格B4上。

Answer 1

尝试使用：

  With Sheets("DR02")
    .Unprotect "password"
    .Range("B4,A10:Z200").Locked = False 
    .protect "password"
  End With

或（获取第34列中的最后一行; A＆＃34;）：

With Sheets("DR02")
 .Unprotect "password" 
 .Range("B4,A10:Z" & .Range("A" & .Rows.Count).End(xlUp).Row).Locked = False
 .protect "password"
End With

修改：

根据评论，似乎单元格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

Answer 2

联盟（范围（＆＃34; B4＆＃34;）。MergeArea，范围（＆＃34; A10：Z＆＃34;＆amp;范围（＆＃34; B＆＃34;＆amp; Rows.Count）。结束（xlUp）.Row））。Locked = False