Question

如果列A与所选条件匹配，我正在尝试向选定的单元格添加公式。

我无法工作的唯一部分是以下代码。

cell.Offset(0, 7).Value = "=SUM(" & cell.Offset(0, 6) & ",-(" & cell.Offset(0, 8) & "," & cell.Offset(0, 5) & "))"

如果我要手动输入公式，它将显示为

=Sum(G2-I2)-F2

很容易只添加该代码，但它不会将行号更新为当前行。

任何帮助都会得到帮助。

由于人

Answer 1

这是你在尝试的吗？

cell.Offset(0, 7).Formula = "=SUM(" & _
                            cell.Offset(0, 6).Address & _
                            "-" & _
                            cell.Offset(0, 8).Address & _
                            ")-" & _
                            cell.Offset(0, 5).Address

或许这可能？

cell.Offset(0, 7).Formula = "=SUM(" & _
                            cell.Offset(0, 6).Address(RowAbsolute:=False, ColumnAbsolute:=False) & _
                            "-" & _
                            cell.Offset(0, 8).Address(RowAbsolute:=False, ColumnAbsolute:=False) & _
                            ")-" & _
                            cell.Offset(0, 5).Address(RowAbsolute:=False, ColumnAbsolute:=False)

添加总和以基于cell.offset vba执行否定

1 个答案: