在Excel中插入行保存公式

我有一个列与我用ctrl-D填充公式的行的范围。 我怎样才能插入一个新行,所以值是空的,但公式复制?

谢谢

这听起来像你正在寻找“ pastespecial – >公式,但没有价值 ”选项。 我很确定这是不可能的,除非你使用VBA。

你可以尝试像这样:

这将清除没有公式的单元格。 它假定当你调用它时,你在行的最左边的单元格中,并且该行没有任何空白单元格。 如果这些假设是不准确的,你需要调整它才能工作。

Sub KeepFormulasInRow() Do Until ActiveCell.Value = "" If Left(ActiveCell.Formula, 1) <> "=" Then ActiveCell.Clear End If ActiveCell.Offset(, 1).Select Loop End Sub 

更新

将代码添加到您的工作簿:

  1. Alt-F11打开VB编辑器
  2. 插入 – >模块
  3. 粘贴代码

将其与一个button相关联:

  1. 将一个button添加到工作表
  2. 将macros关联到button
  3. 如果您有一个activeXbutton,请从on_click事件调用您的macros

将其与快捷方式相关联:

  1. Alt-F8打开工作簿中的macros列表
  2. 突出显示要与快捷方式关联的macros
  3. 点击选项button
  4. 创build你的捷径