excel|筛选——你不知道的Excel单元格筛选器 excel

文章图片

筛选——Excel解释：对所选单元格启用筛选。然后，单击列标题中的箭头以缩小数据范围。

其实筛选功能职场人都很熟悉，本来没有内容可以写，但是看到一位老师的小视频后，让我有了写一写的欲望。
Excel在进行筛选操作时，需要点击单元格右侧下三角，然后进行输入型搜索筛选。操作效果如下：

【excel|筛选——你不知道的Excel单元格筛选器】上述操作需要三个步骤实现，本篇文章的方法只需要简单的一步即可完成，顺便增加了筛选文字红色凸出功能。

But ，这种方式目前只可以对文本型内容操作，数据还无法实现模糊筛选。
VBA代码如下，有需者自取。不懂者，可留言。
Private Sub TextBox1_Change()
ActiveSheet.UsedRange.AutoFilter Field:=1Criteria1:=\"=*\" & TextBox1.Text & \"*\"Operator:=xlOr
Cells.Font.ColorIndex = xlAutomatic
On Error Resume Next
For i = 2 ToRange(\"C50000\").End(xlUp).Row
If Rows(i).Hidden = True Then GoTo 100 '如果单元格隐藏，在不做判断，减少循环次数
n = (Len(Cells(i 3)) -Len(Application.WorksheetFunction.Substitute(Cells(i 3) TextBox1.Text\"\"))) / Len(TextBox1.Text) '判断字符串中有几个查找字符
'Debug.Print n
For num = 1 To n
j =Application.WorksheetFunction.Find(\"@\"Application.WorksheetFunction.Substitute(Cells(i 3) TextBox1.Text\"@\" num))
'Debug.Print j
Cells(i 3).Characters(jLen(TextBox1.Text)).Font.Color = vbRed '标颜色，利用Characters对象
Next
100:
Next
End Sub

excel|筛选——你不知道的Excel单元格筛选器

相关经验推荐

多边形的对角线与边数的关系多边形的对角线与边数的关系是函数关系吗

11月23日南京秦淮新增1例核酸检测异常人员活动轨迹

要养成健康的饮食和睡眠习惯能提高睡眠质量的食物

非人哉|《斗罗大陆》海神三考，辅助魂技失效，小舞被绑沉银柱溺水

原神怎么获得番茄，原神番茄在哪里收集

胃酸过多想吐怎么缓解如何才能缓解胃酸带来的痛苦呢

怎么防止孩子玩游戏怎么防止孩子玩游戏打人

蜂蜜四五年了还能吃吗

摩尔庄园游戏金矿石怎样获取（摩尔庄园游戏金矿石获取方法）

湖北有哪些城市有地铁湖北有哪些城市

厦门失业生育保险怎么报销厦门失业生育补助金在哪里领取

高通骁龙|华为Mate 50正在测试：搭载4G版骁龙898，明年上半年发布

怎么去除茶垢

呆萌的名字情侣名字设计

女生节幽默祝福话语女生节幽默祝福

小超梦排位撞车圣枪哥，拿手掘墓教做人？峡谷第一实至名归！

dnf手游剑豪带火套怎么样

低血压的危害有哪些

高考前突然什么都不会怎么办如何调整

合肌怎么形成的