☰

在 Excel 中同时锁定多个单元格公式中的单元格引用

tag-icon • tag-icon microsoft-excel
在 Excel 中同时锁定多个单元格公式中的单元格引用

当单元格作为一组处理时，有没有办法锁定 Excel 表格中单元格公式中的单元格引用？（F4 键一次只能锁定一个单元格的单元格引用。）

答案1

我通常使用 F4 来获取适当的混合单元格引用。（我很少发现绝对单元格引用是必要的。）然后，我向下或横向填充（或两者兼而有之）以使我的列或行填充相同的公式。或者，根据我的工作表的布局方式，我复制并粘贴单元格，而不是向下/横向填充。

答案2

Bernie Deitrick这个 excelforum.com 主题给出以下宏，说明首先选择你的细胞，然后运行它：

Sub ConvertToAbsoluteReferences()
Dim myCell As Range
Dim storedCalc As Variant
Dim RefStyle As Variant
Dim MyMsg As String
Dim myStyle As Integer

MyMsg = "1: =A1 Relative" & Chr(10) & _
"2: =A$1 Absolute Row" & Chr(10) & _
"3: =$A1 Absolute Column" & Chr(10) & _
"4: =$A$1 Absolute" & Chr(10) & Chr(10) & _
"Choose a style: 1, 2, 3, or 4...."
myStyle = Application.InputBox(MyMsg, "Style Choice", , , , , , 1)

Select Case myStyle
Case 1
RefStyle = xlRelative
Case 2
RefStyle = xlAbsRowRelColumn
Case 3
RefStyle = xlRelRowAbsColumn
Case Else
RefStyle = xlAbsolute
End Select

With Application
storedCalc = .Calculation
.ScreenUpdating = False
.EnableEvents = False
.Calculation = xlCalculationManual

For Each myCell In Intersect(Selection, Selection.SpecialCells(xlCellTypeFormulas))
myCell.Formula = Application.ConvertFormula( _
myCell.Formula, xlA1, xlA1, RefStyle)
Next myCell

.ScreenUpdating = True
.EnableEvents = True
.Calculation = storedCalc
End With

在我看来，它在 Office 2013 中运行良好。要运行宏，首先通过自定义功能区启用“开发人员”选项卡，然后选中右侧列中未选中的框。您会在该选项卡上找到“宏”。

另外两个想法：

  • 运行宏时，请注意宏的作用，或请有能力的人为您检查它们。我不会对宏以意外方式危害您的数据或机器负责；并且
  • 我个人更喜欢我在另一个答案中建议的方法。这样的宏对我来说似乎是一种钝器，尽管我可以想象在某些情况下它会是更有效的解决方案。

答案3

如果它们都在同一行或同一列，您只需查找并替换（在公式中查找）在$ $要锁定的引用之前和之后添加符号即可。

EI. ='RATE CARD'!D5

查找!D并替换为!$D$

相关内容