点击A工作表中的单元格，在B工作表显示对应的筛选结果，返回A表时，B表取消筛选取消

淡墨青衫A8

请教各位大神，如何实现：当我点击汇总表里B列中的文字时，在支出明细表中显示对应的筛选结果，我对VBA是个小白，麻烦各位大神指教，谢谢！如图：

附上附件

Peny2020

试试是不是这样

LIUZHU

我觉得除了筛选出来外，是不是要增加一个跳转到支出明细表的功能

淡墨青衫A8

Peny2020 发表于 2024-4-25 15:24
试试是不是这样

正是我需要的这样，太谢谢大佬了！

淡墨青衫A8

Peny2020 发表于 2024-4-25 15:24
试试是不是这样

你好，再请教一下：如果汇总表里的收入也像支出这样实现的话，应该增加那些代码？谢谢！

Peny2020

淡墨青衫A8 发表于 2024-4-26 08:40
你好，再请教一下：如果汇总表里的收入也像支出这样实现的话，应该增加那些代码？谢谢！

在你的汇总表里加了一个触发的代码。
你想加就在后面再加一个


If Target.Column = 8 And Target.Row > 4 Then
b = Target.Value
Sheets(3).Select
Set rng = Sheets(3).Range("A2").CurrentRegion
    rng.AutoFilter
    rng.AutoFilter Field:=3, Criteria1:=b
End If

Peny2020

附件已按你说的改了。

淡墨青衫A8

Peny2020 发表于 2024-4-28 12:31
附件已按你说的改了。

太感谢了，大神！

淡墨青衫A8

Peny2020 发表于 2024-4-28 12:31
附件已按你说的改了。

大神，再请教您一下：目前这个代码可以筛选“支出明细表”的C列，不能筛选B列，虽然把代码中的3改成2就可以了，但是这样C列就不能筛选了，我想把B列和C列同时都保留筛选的功能，您看看再增加些什么代码？麻烦您了。

Peny2020

淡墨青衫A8 发表于 2024-4-28 18:51
大神，再请教您一下：目前这个代码可以筛选“支出明细表”的C列，不能筛选B列，虽然把代码中的3改成2就可 ...

你是想在筛选c列后第二次再对b列筛选？
还是说你看完c列了，想自己在b列进行筛选？那你把c列的筛选删掉就好了