操作环境：
本工作表中的A1:E10区域中，A1:B5和D10单元格被锁定。
操作目标：
选定以上被锁定的所有单元格。
操作方法：
1。在本工作表标签上击右键后点“查看代码”，在弹出的代码窗口中粘贴以下代码：
Sub 选择锁定单元格()
Dim myRange1 As Range, myRange2 As Range, rng As Range
Set myRange1 = Range("A1:E10") '指定被锁定的单元格所在的单元格区域
For Each rng In myRange1
If myRange2 Is Nothing And rng。
Locked = True Then
Set myRange2 = rng
End If
If rng。Locked = True Then
Set myRange2 = Union(myRange2, rng)
End If
Next
myRange2。
Select
MsgBox "锁定单元格的地址为：" myRange2。Address
Set myRange1 = Nothing
End Sub
然后关闭代码窗口回到工作表中。
2。点击“工具/宏/宏/Sheet1。
选择锁定单元格/执行”，即可将被锁定的所有单元格选定。
如果这些锁定单元格有共同特点，可以定位。比如要选择包含公式的单元格，可以编辑-定位-公式，这样就能选中。
如果没有任何规则，只能手动选择，按住CTRL键的同时，用鼠标选择多个单元格。
0