【问题标题】:Is there a way to sum 2 ranges instead of just 2 cells?有没有办法将 2 个范围而不是 2 个单元格相加?
【发布时间】:2020-05-04 13:51:41
【问题描述】:

我正在尝试对“e”列和“f”列求和

而不是

("e1")=("e1")+("f1")

我希望看到类似下面的内容。

set Range1 as range("E1:E100")
set Range2 as range ("f1:f100")

Range1=Range1+Range2

我知道它不会像这样工作,但相信没有办法得到结果。

非常感谢任何帮助。

【问题讨论】:

  • 您需要 1 个号码还是 100 个号码?
  • 我希望有 100 个数字
  • 请不要使用全部大写,这被认为是尖叫。

标签: excel vba sum range


【解决方案1】:

你可以试试下面的代码:

With Range("g1:g100")
    .Formula = "=e1+f1"
End With

【讨论】:

  • Sub Sum_EF() With Range("z17:z116") .Formula = "=e17+f17" End With Range("e17:e116").Value = Range("z17:z116" ).Value End Sub
【解决方案2】:

您可以使用评估:

Dim ws as worksheet, Range1 as range, Range2 as range

set Range1 as ws.range("E1:E100")
set Range2 as ws.range ("f1:f100")

Range1.value = ws.Evaluate( Range1.Address() & "+" & Range2.address() )

【讨论】: