将包含特定文本的单元格设置为第一个单元格，或“x”

Question

有以下场景；

• 工作表的单元格 (A30) 包含文本“重要说明/条款”。
• 根据产品代码（带有自己的注释/条款）将文本添加到 A31 行（即“重要说明/条款”之后）的宏。
• 当我将产品添加为新行时，单元格会向下移动，这意味着“重要说明/条款”不再是 A30。

如何将“重要说明/条款”设置为第一个单元格？例如。如果我将第一个单元格设置为“x”，我希望能够在宏上具有类似于

的内容

Cells(x + 1, 1).Value = "Notes/disclaimer for Product 2"

其中 x 是包含“重要说明/条款”的单元格。工作表上永远只有一个 x。

谢谢。

Answer 1

只需使用这样的名称定义您的目标单元格

ActiveWorkbook.Names.Add Name:="MyXField", RefersTo:="=Sheet1!A30"

现在使用命名引用引用该单元格的位置

range("MyXField").offset(1,0).value = "Notes..."

现在，当添加或删除行或列时，此命名字段将引用所需的位置。只是不要删除单元格，名称会丢失。