1

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

为了让数据透视表的搜索尽可能简单,我有几个切片器窗口可以让用户单击他们的搜索条件。我想做的是基于他们的搜索条件(一旦缩小到一个结果),是有一个宏按钮,可以自动启动他们的浏览器(比如说 Internet Explorer),并带有在数据透视表中找到的链接。

我可以弄清楚浏览器的启动(或只是复制文本),但是有没有一种方法可以根据与我的数据透视表关联的切片器的选择来编程宏按钮的操作?

任何帮助将非常感激!

4

1 回答 1

1

如果我对您的理解正确,您希望在数据透视表中仅出现一个链接时启动您的代码(在您对其应用切片器之后)。

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

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

在此处输入图像描述

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

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事件。

于 2017-10-26T20:09:48.333 回答