Question

我要向小计添加大约50个标签。我需要将这些选项卡保留为非表，以便将它们从一个工作簿移动到另一个工作簿。我已经创建了一个宏来将它们移到工作簿中，我需要它们进入其中并仅制作这些选项卡表。

我现在想创建一个宏，以使这些选项卡具有小计。它们都具有相同的行长，但是某些选项卡具有其他列。此外，一些列将是平均值，而另一些将是总和。我将如何处理此问题的任何建议或帮助将不胜感激！我在VBA上经验不足，因此很难开始对此部分进行破解。

谢谢！

**

编辑：以下代码是我尝试使用的示例宏编辑器，但需要使其通用，以脱离任何表使用选项卡循环在指定范围内

**

Sheets("Net Sales").Select
Range("F11").Select
ActiveSheet.ListObjects(Active).ShowTotals = True
Range("Table2[[#Totals],[Var %]]").Select
ActiveSheet.ListObjects("Table2").ListColumns("Var %").TotalsCalculation = 
xlTotalsCalculationAverage
Range("Table2[[#Totals],[Var $]]").Select
ActiveSheet.ListObjects("Table2").ListColumns("Var $").TotalsCalculation = 
xlTotalsCalculationSum
Range("Table2[[#Totals],[2018B $]]").Select

将小计添加到不同选项卡上的多个表？

0 个答案: