如何在Excel VBA中的切片器中单击值时运行宏

Question

我的excel中有一个切片器，具有以下两个值

添加客户添加供应商

单击这些值时，我想打开2个不同的表单。谁能帮我这个忙。

Answer 1

是的，您可以在切片器点击时调用不同的表单，请检查以下代码。希望它能满足您的要求，如果不是，您可以根据需要进行更改。

在Worksheet_PivotTableUpdate事件中编写代码时，在每个切片器上单击都会调用此事件。

Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)

If ActiveWorkbook.SlicerCaches("Slicer_Region").SlicerItems("East").Selected = True Then
UserForm1.Show
ElseIf ActiveWorkbook.SlicerCaches("Slicer_Region").SlicerItems("West").Selected = True Then
UserForm2.Show
End If

End Sub

其中， Slicer_Region =“要在公式中使用的名称”

您可以通过右键单击切片器并单击切片器设置来获得此名称。并找到要在公式中使用的名称。

东方或西方=“切片机名称”

您要为此呼叫不同的形式。