如何在 Excel 中選取所有已解鎖的儲存格區域？

作者Xiaoyang修改日期2024-07-31

眾所周知，Excel 儲存格預設為鎖定狀態；當您在保護工作表後仍需修改某些特定儲存格的值時，必須先解除這些儲存格的鎖定。但若您想進行變更，該如何快速找出並選取所有已解鎖的儲存格呢？

使用 VBA 程式碼選取所有選區解鎖

使用 Kutools for Excel 選取所有選區解鎖

使用 VBA 程式碼選取所有選區解鎖

太神奇了！在 Excel 中使用高效 Tabs，就像 Chrome、Edge、Firefox 和 Safari 一樣！
每天為您節省 50% 的時間，並減少數千次滑鼠點擊！

下列 VBA 程式碼可協助您快速一次選取所有選區解鎖，請依下列步驟操作：

1. 按住 ALT + F11 鍵，即可開啟 Microsoft Visual Basic for Applications 視窗。

2. 點選插入＞模組，並將下列程式碼貼上至模組視窗中。

VBA 程式碼：選取所有選區解鎖

Sub SelectUnlockedCells()
'Update 20130830
Dim WorkRng As Range
Dim OutRng As Range
Dim Rng As Range
On Error Resume Next
Set WorkRng = Application.ActiveSheet.UsedRange
Application.ScreenUpdating = False
For Each Rng In WorkRng
    If Rng.Locked = False Then
        If OutRng.Count = 0 Then
            Set OutRng = Rng
        Else
            Set OutRng = Union(OutRng, Rng)
        End If
    End If
Next
If OutRng.Count > 0 Then OutRng.Select
Application.ScreenUpdating = True
End Sub

3. 接著按下 F5 鍵執行此程式碼，所有未鎖定的儲存格將自動被選取。在工作表受到保護後，您即可修改這些儲存格的值。

注意事項：

1. 若您的工作表中未解鎖任何儲存格區域，此程式碼將無法生效。
2. 此 VBA 程式碼僅適用於已使用的範圍。

使用 Kutools for Excel 選取所有選區解鎖

如果您不熟悉 VBA 程式碼，也能透過點選方式，使用 Kutools for Excel 中的選擇非鎖定儲存格功能，一次選取所有已解鎖的儲存格區域。

Kutools for excel：內含超過 300 種實用 Excel 增益集，30 天內免費試用，無任何限制。立即取得。

若您已安裝 Kutools for Excel，請依下列步驟操作：

1. 選取您想要鎖定的儲存格範圍以外的區域，或整個工作表。

2. 按一下 Kutools > 選取 > 選擇非鎖定儲存格。

3. 接著，您所選範圍內的所有已解鎖選區將立即被選取，如下圖所示：

使用 Kutools 選取未鎖定的儲存格

若想進一步了解此功能，請按一下選擇非鎖定儲存格。

相關文章：

如何識別並選取 Excel 中所有已鎖定的儲存格？

最佳 Office 生產力工具

🤖	KUTOOLS AI 助手：基於以下內容徹底革新數據分析：智慧執行｜產生程式碼｜建立自訂公式｜分析資料並產生圖表｜呼叫增強函數……
	熱門功能：尋找、醒目提示或標記重複值｜刪除空白行｜合併列或儲存格而不遺失資料｜不使用公式的四捨五入……
	高級 LOOKUP：多重條件 VLookup ｜多重數值 VLookup ｜跨多個工作表 VLookup ｜模糊查找……
	高級下拉列表：快速建立下拉式清單｜相依式下拉式清單｜多選下拉式清單……
	欄位管理員：新增指定數量的欄位｜移動欄位｜切換隱藏欄位的可見狀態｜比較範圍與欄位……
	精選功能：網格聚焦｜設計視圖｜增強編輯欄｜工作簿與工作表管理員｜資源庫（自動文字）｜日期提取｜合併工作表｜加密／解密儲存格｜依清單傳送電子郵件｜超級篩選｜特殊篩選（篩選粗體儲存格／斜體／刪除線……） ......
	頂尖 15 工具組：12 文字工具（添加文本，刪除特定字符，……）｜ 50+ 圖表類型（甘特圖，……）｜ 40+ 實用公式（基於生日計算年齡，……）｜ 19 插入工具（插入二維碼，從路徑插入圖片，……）｜ 12 轉換工具（金額轉大寫，匯率轉換，……）｜ 7 合併和拆分工具（高級合併行，分割儲存格，……）｜……以及更多