vba - 如何使用 VBA 自动使用来自单独 Excel 工作簿的数据透视表的数据填充 Excel 工作表？

Question

我有两个打开的 Excel 工作簿。一个在数据透视表中有一些数据，如下所示：

Row Labels   Date
A             5

B             4

C             3

另一个单独的工作簿除了 A 列之外是空白的，它列出了与数据透视表中相同的行标签，但可能以不同的顺序：

行标签

乙

一个

C

我想在第二个工作簿上放置一个按钮，当按下该按钮时，它将自动以正确的顺序使用数据透视表中的适当列填充行标签。

我知道 VLOOKUP 会以某种方式参与其中，但我不太确定如何到达那里。理想情况下，如果这个 VBA 代码可以是动态的，那就太好了，这样无论数据透视表的大小如何，无论第二个工作簿中有多少行标签，按钮都可以工作。

标签： vbaexcelpivotvlookup

Answer 1

使用该GETPIVOTDATA功能 - 例如：

    =GETPIVOTDATA("Date",[PivotWorkbook]Sheet1!$A$1,"Row Field",$A2)

必须打开包含数据透视表的工作簿才能计算结果。