Excel VBA 2010 - workheet.subtotal函数sum和同一行中的平均值

时间:2013-10-18 08:58:25

标签: excel excel-vba excel-2010 vba

我正在创建一个从Oracle数据库获取数据的宏,这意味着行数可以根据结果而变化。在这个宏中,我使用的是worksheet.subtotal函数,该函数在组更改时汇总了多个列。这一切都有效,但我面临的问题是一些列需要平均。

搜索我无法找到一个解决方案,你可以在同一行中同时包含平均值和总和。我不希望用户必须手动干预以更改每个组的每个列。

你可以将同一行中的平均值和总和都放在哪里吗?

1 个答案:

答案 0 :(得分:1)

AFAIK你不能在Sum中同时使用AverageSubtotal,但不要放松心情:)这是另一种选择。

假设您有两列。在一个你想要的Sum和另一个你想要的Average。在您的代码中,为这两列设置Sum。生成报告后,只需突出显示您想要的列Average,然后使用 CTRL + H subtotal(9 subtotal(1 kbd>如果您不想手动执行,那么您也可以在代码中执行Find and Replace;)

这可以用作SumAverage具有相同的结构。

=Sum(<Range>)
=Average(<Range>)