对另一个工作表中的区域求和

Question

我试图让这个单元格从另一个工作表中总计一个范围，但我总是卡住了。范围行和列各不相同，但起点始终为 C2。我需要从 C2 总计到已使用范围的其余部分(即排除 A 列和 B 列以及第 1 行，但包括其他所有内容(。

如果可以的话，请帮忙。

Range("A1").Formula = "Wage Totals"
Range("A2").Formula = "=SUM(" & ActiveWorkbook.Sheets("Wage").Range(Cells(2, 3), Cells.SpecialCells(xlCellTypeLastCell)).Address(False, False) & ")"

Answer 1

查看此链接 在 VBA 中使用 SUM((

您可以使用该想法将代码更改为：

Dim lastCol As Long
Dim lastRow As Long
lastCol = Sheets("Wage").Cells(1, Sheets("Wage").Columns.Count).End(xlToLeft).Column
lastRow = Sheets("Wage").Cells(Sheets("Wage").Rows.Count, 1).End(xlUp).Row
Range("A1").Value = "Wage Totals"
Range("A2").Value = WorksheetFunction.Sum(Sheets("Wage").Range(Sheets("Wage").Cells(2, 3), Sheets("Wage").Cells(lastRow, lastCol))) 

这是非常幼稚的解决方案，因为它假设可以通过查找 Col "A" 上的最后使用行和第 1 行上上次使用的 col 来找到使用范围限制。您可以更改查找限制的方法。