如何在 Excel 中一次鎖定公式裡的所有儲存格參照？

作者Siluvia修改日期2024-10-31

通常，您需要將所有儲存格參照鎖定為絕對參照，以避免在複製公式時儲存格參照發生變動。本文將為您介紹實現此操作的方法。

使用 VBA 程式碼一次鎖定公式中的所有儲存格參照
 透過 Kutools for Excel 輕鬆一次鎖定公式中的所有儲存格參照

使用 VBA 程式碼一次鎖定公式中的所有儲存格參照

您可以執行下列 VBA 程式碼，一次鎖定所選區域中所有公式儲存格的參照。請依照以下步驟操作：

1. 同時按下 Alt+F11 鍵，即可開啟 Microsoft Visual Basic for Applications 視窗！

2. 在 Microsoft Visual Basic for Applications 視窗中，點選插入＞模組，然後將下方的 VBA 程式碼複製並貼上至模組視窗中。

VBA 程式碼：一次鎖定公式中的所有儲存格參照

Sub test()
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Select range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    For Each xCell In xRg
        xCell.Formula = Application.ConvertFormula(xCell.Formula, xlA1, , xlAbsolute)
    Next
End Sub

3. 按下 F5 鍵執行程式碼後，將彈出 Kutools for Excel 對話方塊，請選取包含需鎖定參照之公式的儲存格範圍，再點選確定按鈕。請參閱截圖：

選取儲存格範圍的 Kutools for Excel 對話框截圖

接著，所有儲存格參照將會一次性鎖定在所選的公式儲存格中。請參閱以下截圖：

顯示所選 Excel 公式儲存格中鎖定儲存格參照的截圖

透過 Kutools for Excel 輕鬆一次鎖定公式中的所有儲存格參照

轉換儲存格參照是 Kutools for Excel 提供的實用功能，只需幾個簡單步驟，即可快速一次鎖定公式中的所有儲存格參照！

Kutools for Excel 提供超過 300 項進階功能，簡化複雜作業，提升創造力與效率。整合 AI 功能，Kutools 能精準自動化各項任務，讓資料管理輕鬆無負擔。Kutools for Excel 的詳細資訊…… 免費試用……

1. 選取需要鎖定的公式儲存格，然後點選 Kutools > 更多 > 轉換儲存格參照。

Kutools 索引標籤中「更多 > 轉換參照」選項的截圖

2. 在轉換儲存格參照對話方塊中，於轉換為絕對參照選項區塊中選取轉換儲存格參照，然後點選確定按鈕。

「轉換公式參照」對話框設定為「轉為絕對參照」選項的截圖

接著，所選公式儲存格中的所有儲存格參照將一次全部鎖定（轉換為絕對參照）。請參閱以下截圖：

Kutools for Excel－透過超過 300 項必備工具全面強化 Excel，讓您的工作更快速、更輕鬆，並運用 AI 功能實現更聰明的資料處理與高效生產力！立即取得

示範：透過 Kutools for Excel 輕鬆一次鎖定公式中的所有儲存格參照

Kutools for Excel：超過 300 種實用工具隨手可得！盡享 AI 驅動功能，讓工作更聰明、更快速！立即下載！

最佳 Office 生產力工具

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