在Excel表上应用过滤器的公式

Question

我在Excel 2013工作簿中有两个工作表。第一个是客户信息表，第二个是客户购买表。第二个表格与每次购买相关联的“客户ID”。我想要实现的是客户端表中每个客户端旁边的链接，单击该链接时会将用户发送到第二个表中的购买的筛选视图。我相信我可以使用Excels超链接功能链接工作表，但是如何让它将过滤器应用于表？

非常感谢！

ķ。

Answer 1

遵循该计划。 链接表[Sheet ...] ：

和数据表[数据] ：

您可以添加代码：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim Crit As String

    If Target.Rows.Count = 1 And Target.Columns.Count = 1 Then
         If Target.Column = 3 Then
            Crit = Cells(ActiveCell.Row, 1).Value
            If ActiveCell.Row = 1 Then Crit = "ALL"
            If Crit = "" Then Exit Sub

            Sheets("Data").Select
            Sheets("Data").Range("A1").Select
            If Crit = "ALL" Then ' ALL
                Selection.AutoFilter
            Else
                Selection.AutoFilter Field:=1, Criteria1:=Crit
            End If
        End If
    End If
End Sub

在事件选择中使用名称列表更改工作表 宏认为数据在工作表上＆＃34;数据＆＃34;。
如果您点击标签全部，则宏显示全部...