怎样快速知道哪一列（几列）处于筛选状态？并快速定位到筛选列的位置

Maron5

如果一个表有很多列，对其中一列或几列设置了筛选之后，怎样快速找到这几列呢？
怎样快速定位到这几列的位置呢？

－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－

比如：表格共有A～CR列，2000行数据；
我先对 BF列 设置了筛选，然后拖着横滚动条，拖到 E列 查看我的数据，
查看完需要的数据后，
接下来，要对 BF列 取消筛选，继续对其他列的筛选设置，
这时，又拖着滚动条，拖到 BF列 …………
（拖来拖去的很影响效率）

－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－

怎样能查看完 E列 数据后，快速回到 BF列 呢？
快速回到设置了筛选的这一列（也可能是多列）

－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－

想到过方法，比如：
记住设置筛选的这个，是BF列，然后需要回去的时候，定位到单元格 BF1。

－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－

有没有更便捷的？
要是能用宏设置快捷键之类的更好啦～

Maron5

小白一枚，望各路大神不吝赐教哦

痛痛痛痛

定位筛选方法不知道

痛痛痛痛

不过可以视图拆分窗口，达到同时固定四个筛选列的目的，不用来回倒腾

yf1969

2003版中只有下拉箭头是蓝色的，很不明显。建立放大了看

excel-ssy01

好像没有这种更快捷的方法，我的方法是将文档存储为xlsm格式，写入VBA代码，思路是在代码里让所有的列号取消隐藏，然后弹出一个inputbox,让筛选内容=inputbox的值，把宏绑定一个按钮或者快捷键，这样就可以每次输入内容就自动筛选，并且自动取消筛选，不用你去找它的位置。

excel-ssy01

楼主你好：
用函数无法实现，但是VBA可以直接实现。我上面给的方法是以前自己写的，数据小的时候很好用（比如2000行，20列数据）的话。但是如果你有上万行数据，上百列的时候很超级慢了，所以经过对VBA仔细研究，发现其实有现成又直接的方法可以调用，以下结合我自己的需求和网上找的方法修改而来的代码。你要看一下你的筛选符号是第几行，自己修改一下cells(9,i)中的行号，就可以了。好了，上代码：

Sub 已筛选位置判断()
Dim i As Integer, Str, Count, YuanSu, AddC
'检查是否设置了自动筛选
If ActiveSheet.FilterMode = False Then
MsgBox "没有设置自动筛选，不必担心遗漏！", vbCritical, "小哥哥你好："
Exit Sub
Else
'MsgBox "有筛选"
For i = 1 To ActiveSheet.AutoFilter.Filters.Count
    '检查该字段是否有设置筛选条件
    With ActiveSheet.AutoFilter.Filters.Item(i)
        If .On Then
        YuanSu = .Count
        AddC = Split(Cells(9, i).Address, "$")(1)   'i就是有筛选符号的列，它是一个数字，被称呼为字段，通过cells(R,C)函数对象找到address，再通过split函数去掉后面一个$符号，获得简写的列标。
        MsgBox AddC & i & Chr(13) & Chr(13) & "此列存在筛选，当前显示了其中的： " & YuanSu & "个元素项.", vbExclamation, "第" & i & "列" & "即：" & AddC & i
        Range(Cells(9, i), Cells(9, i)).Select
        End If
    End With
    Next
End If

亲测有效，而且和很快速哦。

daxu1906

试下用切片器，插入表，设计栏上插入切片器

刀羊

可以尝试一下把筛选列 和 查看列分别设置名称，通过名称栏的选择来完成跳转。