芽在工作簿中具有50或60个定义的名称。在许多情况下，他需要将出现的$ Q $ 4更改为$ Q $ 3。 Bud可以在“名称管理器”中进行编辑，并分别进行编辑，但是他想知道是否有一种方法可以减少手动操作。

有两种方法可以解决此问题。首先是尝试“欺骗”并让Excel进行更改。选择当前单元格Q3，然后删除该单元格，向上移动单元格。这样会将当前的Q4移至Q3，并且Excel应该将所有引用（包括任何定义的名称）更新为现在的Q3。

当然，如果进行删除会使工作表的布局混乱，则此操作将无效。在这种情况下，最好依靠宏来使用第二种方法。宏可以轻松地遍历每个定义的名称并进行替换。这是一个非常简单的示例：

Sub ReplaceFormulasInNames()

Dim n As Integer

For n = 1 To Names.Count         Names(n).RefersTo = Replace(Names(n).RefersTo, "$Q$4", "$Q$3")

Next End Sub

宏检查每个名称的RefersTo属性，如果它包含文本$ Q $ 4，它将更改为$ Q $ 3。

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本技巧（13654）适用于Microsoft Excel 2007、2010、2013、2016、2019和Office 365中的Excel。