乐于分享
好东西不私藏

【跟我学Excel VBA】第十九课:利用窗体进行模糊匹配录入

【跟我学Excel VBA】第十九课:利用窗体进行模糊匹配录入

        今天我们聊一聊模糊查找!首先看一下以下案例:

        某外卖对商户进行跟踪管理,并对一些发现的问题进行登记以进行相应的改善。但是,商户目前就有4000多个,而且正以每天数十的速度增加着,因此,在查找对应的商户名称的时候就非常困难。

        为了解决这一问题,我们推出的模糊匹配的解决方案。

        首先,我们画一窗体。窗体由两个控件组成,一个txtBox和一个listbox。listbox的作用是显示商户名称,而txtbox的作用是用于输入模糊查找的条件。窗体结构如下:

   实现过程如下:

1、启动窗体时显示所有商户名称;

        2、点击某一个商户名称的时候,实现所点击内容输入到指定单元格;

        3、在文本框中输入任意一个或者多个字符时,能匹配包含这些字符的商户。

        代码如下:

  启动窗体时显示所有商户名称:

        结果如下:

  点击listbox时,输入商户名称:

        结果如下:

        输入之后,大家可以用unload me关闭窗体。

  重点:怎样实现模糊匹配?

        1、模糊匹配,我们需要使用通配符,且使用Like进行匹配。这样,我们需要将录入的字符全部用“*”进行间隔,这样我们可以定义一个自定义函数来实现这一目的。

        2、在文本框输入任意字符时,实时进行模糊匹配。这样我们需要用到键盘的up事件,代码如下:

        整个效果图如下:

       这个功能相当重要哟,如果你想定制小系统,这个功能是必不可少的。