直接上效果图:
代码如下:(很简短,一定很惊讶吧!)
Private Sub TextBox1_Change()
Range("a1").AutoFilter 2, "*" & TextBox1.Text & "*"
End Sub
代码说明:
具体操作向下看:
文末想说:
-未来还没到来,一切都还来得及!
-关注+私信我,回复006
页面更新:2024-02-22
本站资料均由网友自行发布提供,仅用于学习交流。如有版权问题,请与我联系,QQ:4156828
© CopyRight 2008-2024 All Rights Reserved. Powered By bs178.com 闽ICP备11008920号-3
闽公网安备35020302034844号