在excel中插入行保持公式

Question

我有一系列行，其中一列使用ctrl-D填充公式。如何插入新行，使值为空，但复制公式？

谢谢

Answer 1

听起来你正在寻找“ pastespecial - ＆gt;公式而不是值”选项。除非你使用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. 插入 - ＆gt;模块
3. 粘贴代码

将其与按钮关联：

1. 向工作表添加按钮
2. 将宏关联到按钮
3. 如果您有一个activeX按钮，请从on_click事件中调用您的宏

将其与快捷方式相关联：

1. Alt-F8打开工作簿中的宏列表
2. 突出显示要与快捷方式相关联的宏
3. 点击选项按钮
4. 创建快捷方式