基于切片器在枢轴 table 中复制 link 的宏按钮

Question

我从一个包含我所有数据的数据透视表 Table 开始。其中一个数据字段是 URL 字符串，我最终想将其发送给用户。

为了尽可能轻松地通过枢轴 table 进行搜索，我有几个切片器 windows 让用户可以单击他们的搜索条件。我想做的是，基于他们的搜索条件（一旦缩小到一个结果），有一个宏按钮可以自动启动他们的浏览器（比方说 Internet Explorer），在枢轴中找到 link table.

我可以弄清楚浏览器的启动（或只是复制文本），但是有没有一种方法可以根据与我的枢轴关联的切片器的选择来对宏按钮的操作进行编程 table?

如有任何帮助，我们将不胜感激！

Answer 1

如果我没理解错的话，您想在数据透视表中仅出现一个 link 时启动您的代码（在对其应用切片器之后）。

您可以使用 Worksheet_PivotTableChangeSync 事件和辅助单元格来实现。

假设您的数据透视表 table 在第 G 列，从单元格 G2 开始。在单元格 G1 中输入此公式 =COUNTA(G3:G20)（根据您的需要调整范围）。

然后在您的工作表模块（不是常规模块）中输入此代码。

Private Sub Worksheet_PivotTableChangeSync(ByVal Target As PivotTable)
Dim a As Long
a = Range("G1").Value
If a = 1 Then
    'your code for link in cell G3
Else
End If
End Sub

现在，当您将数据透视表切片为仅一个选择时，COUNTA 公式的计算结果将为 1 并触发 Worksheet_PivotTableChangeSync 事件。

基于切片器在枢轴 table 中复制 link 的宏按钮

Macro button to copy link in pivot table based on Slicer

excel

vba

pivot-table

slicers