Excel通过vbscript创建数据透视表

Question

我有一个要求，即我设置了从同一张表＃3创建的三个数据透视表。现在，工作表＃3也会填充第1页和第2页的数据。每个新的工作表首先清除数据，然后用新的数据填充它。并且为此我的pivot表刷新代码不起作用并且即使数据和列在那里也给出table columns are not found的错误。我很确定这是由于数据清除而发生的。所以我想知道有一些方法可以在运行时通过脚本创建这样的pivot tables。有可能吗？

更新

我有以下格式的数据Excel表格：

Name   Fruits    Condition of Fruits
=====  ======    ====================

Ram    Apple       Good

Jadu   Apple       Bad

Tina   Orange      Good

Ram    Orange      Good

Tina   Apple       Bad

Ram    Apple       Bad

在相同excel的另一张表中输出Pivot程序，如表（2）所示 像这样：

Name  Fruits   Condition of Fruits
====  ======   ===================
               Good       Bad    Total
               ====      =====  ======
Ram   Apple     1           1     2
Ram   Orange    1           0     1
Tina  Apple     0           1     1
Tina  Orange    1           0     1
jadu  Apple     0           1     1
===================================
Grand Total     3           3     6
===================================

如第一张表所示，只要表格（1）中有源数据，上述格式就必须出现在表格（2）的Excel中。

我希望使用Excel数据透视表概念创建宏程序。

您可以为上面的Pivot创建建议任何代码设置吗？

Answer 1

不要直接从VBA创建数据透视表，而是试试这个。

如果您使用vba函数清除所有数据，然后感觉新数据停止删除数据。而不是擦除数据只是逐个单元地用新数据替换旧数据。

如果有帮助，请告诉我。

如果您可以提供excel文件，我可以查看问题。