EXCEL里建了两个文本框,要筛选出表里对应文本框的内容。宏怎么编写！！！！

EXCEL里建了三个文本框,要筛选出表里对应文本框的内容。宏怎么编写！！！！~

Private Sub TextBox1_LostFocus()
ActiveSheet.Range("E:E").AutoFilter Field:=1, Criteria1:=TextBox1.Text, _
Operator:=xlAnd
End Sub

Private Sub TextBox2_LostFocus()
ActiveSheet.Range("G:G").AutoFilter Field:=1, Criteria1:=TextBox2.Text, _
Operator:=xlAnd
End Sub

使用自定义筛选就可以了
步骤：
1 选择需要的列
2 设置好筛选
3 选择筛选中的自定义筛选
4 输入多个条件
这样就可以显示符合多个条件的数据了

Private Sub TextBox1_LostFocus()
ActiveSheet.Range("E:E").AutoFilter Field:=1, Criteria1:=TextBox1.Text, _
Operator:=xlAnd
End Sub

Private Sub TextBox2_LostFocus()
ActiveSheet.Range("G:G").AutoFilter Field:=1, Criteria1:=TextBox2.Text, _
Operator:=xlAnd
End Sub

使用数组和字典，将不符合条件的隐藏，符合条件的显示。

---

祁东县19736872725： EXCEL里建了三个文本框,要筛选出表里对应文本框的内容.宏怎么编写!!!! - ？
谢卞羟基： Private Sub TextBox1_LostFocus() ActiveSheet.Range(＂E:E＂).AutoFilter Field:=1, Criteria1:=TextBox1.Text, _ Operator:=xlAnd End Sub Private Sub TextBox2_LostFocus() ActiveSheet.Range(＂G:G＂).AutoFilter Field:=1, Criteria1:=TextBox2.Text, _ Operator:=xlAnd End Sub

祁东县19736872725： excel vba语言里如何筛选文本框里的文本? - ？
谢卞羟基：按关键字筛选的例子代码: Sub 宏1()ActiveSheet.AutoFilterMode = FalseActiveSheet.UsedRange.AutoFilter Field:=4, Criteria1:=＂*爱*＂, Operator:=xlFilterValues End Sub上面的代码在我的电脑上执行时候,先取消筛选模式,然...

祁东县19736872725： 求助!! excel2007里面有很多个文本框,要 一起 选中 有什么好的方法?？
谢卞羟基： 先点击工具栏最右边的“查找和选择”旁的下拉箭头,点击下拉菜单中的“选择对象”,然后,按住鼠标左键不松手,拉出一个矩形框,矩形框覆盖你要选得文本框,然后松手,就一次性选中了多个文本框了

祁东县19736872725： EXCEL中如何把两个栏目的中的内容一起筛选 - ？
谢卞羟基： 使用COUNTIF的计算公式也可以的,假设表为三列五行在表最右和最后加一行一列,在四列加公式输入=if(b2>10,if(c2>10,＂1＂,＂＂),＂＂)写好后下拖致五行,在第四列第六行的格内输入=COUNTIF(d2:d5,1),希望对你有用.

祁东县19736872725： excel怎么筛选 - ？
谢卞羟基： excel筛选步骤如下: 1、选择第一行,依次单击“开始”选项卡--“筛选”; 2、单击A1的筛选下拉箭头,勾选2012-2014年的数据; 3、在新一列里输入“中士”,然后向下填充即可. 效果图如下: 最后再筛选2015-2017年的数据,输入下士,并向下填充即可.

祁东县19736872725： 2个excel文件怎么进行文字筛选? - ？
谢卞羟基： 只是顺序乱了,表1A列排序,表2C列排序.现在表1和2中的顺序是一样的. 直接点 菜单 数据--排序 确定

祁东县19736872725： excel vba语言里怎么样筛选文本框里的文本? - ？
谢卞羟基： 看看满足么?满足的话要采纳噢.

祁东县19736872725： excel表格内加入自动筛选框 - ？
谢卞羟基： 你所要求的在一个单元格有2个选项的功能好像实现不了.不过有个折中的办法.选中第二行,点一下功能区的自动筛选按钮,会在这一行的单元格上出现一个下拉的箭头,点一下这个箭头,可以选择要筛选的内容,设置筛选条件,还可以排序.

祁东县19736872725： excel怎么做筛选 - ？
谢卞羟基： 依次单击“数据,筛选”:单击姓名右边的向下的三角符号,鼠标指向“文本筛选”,然后单击“等于”:设置“等于”后面的文本框里输入“王*”,表示筛选出所有第一个字符是王,后面不限制字数的王姓同学;如果筛选出所有王姓的两个字姓名的同学,比如王媛,则在等于后面输入“王?”,即可筛选出所有姓氏后面只有一个字的同学的相关信息.设置完成后单击“确定”即可:所筛选出来的结果就是所有王姓同学的成绩等信息:

祁东县19736872725： excel vba语言里如何筛选文本框里的文本? - ？
谢卞羟基： Sub SS()Dim iStr As StringiStr = InputBox(＂请输入要查找的字符:＂, ＂查找内容窗口＂)If iStr <> ＂＂ Then With Range(＂A1:A10＂) Set rng = .Find(iStr, after:=Range(＂A10＂), lookat:=xlPart) If Not rng Is Nothing Then addrs = rng....