VBA_NZ系列工具NZ03：利用右键进行筛选操作

我的教程一共九套及VBA汉英手册一部，分为初级、中级、高级三大部分。是对VBA的系统讲解，从简单的入门，到数据库，到字典，到高级的网抓及类的应用。大家在学习的过程中可能会存在困惑，这么多知识点该如何组织成自己的程序呢？VBA可否能组织一个大型的程序呢？如何让VBA形成一个工具，拿来就用呢？在我的教程完结后，我陆续推出这类技术工具资料，这类工具整合了若干多的VBA知识点，让大家感受到VBA之强大。工具资料共两个系列，一个是YZ系列，一个是NZ系列。今日给大家介绍的是VBA_NZ系列工具NZ03：利用右键进行筛选操作

【分享成果，随喜正能量】 老人言：“拆穿多没意思，年纪大了就喜欢看别人演戏，精彩的地方我还可以给你鼓掌。” 。

NZ03利用右键进行筛选操作

这个应用给大家讲解利用一个加载项完成利用右键进行筛选的操作，涉及到的知识点有，如何在右键中添加菜单；如何在点击右键菜单时响应我们的特定过程；如何利用窗口实现数据的选择；如何进行等于和不等于的操作；如何选择空格的操作；如何进行排重的操作等等。

同时这个应用中我们还会大量的了解错误处理中On Error Resume Next与 On Error GoTo 0 相结合，合理的控制什么时候执行错误处理，什么时候忽略错误的操作。

本应用工具我封装在NzFilter.xlam加载项中，注意密码是123456789，但强烈建议您不要轻易打开代码窗口，即使打开也要留有备份。当然，这部分代码，我还不能完全测试到所有的场景，可能不能完全执行所有的场景，希望大家根据自己的应用进行合理的补充。

一 一般的筛选操作

我们在进行数据处理时用到筛选时肯定的，一般的操作是三步，如下：

第一步：点击“数据”

第二步：点击“筛选”

第三步：选择数据

由以上的可以看出，要有三个步骤，但是，在实际操作时有可能由于页面的问题，会涉及到页面的滚动，在数据多的时候，往往会繁琐，而且对于一些特殊的选择，如空行或者排重，还要进行更多的操作。

二 NZ03的筛选操作

为了更方便的利用筛选的操作，我可以用NZ03提供的技术来完成，在应用前，我们要首先打开这个NzFilter这个加载项。

然后切换到我们的工作簿，这个时候，我在要处理的列中，点击任何单元格，右键，我们会看到下面的界面：

此时点击第一个菜单：NzFilte，就可以进行数据的处理了。界面如下：

这个界面提供了很多功能。

1 等于和不等于的筛选，可以提供五个数据的处理，如下截图，可以在五个对话框中进行数据的选择：

2 可以进行空格的筛选：

3 对数据排重的处理：

数据选择好后就可以点击筛选按钮了，如上最后的排重处理结果：

如果取消筛选，只需要右键，然后点击NzClear即可:

三 技术总结

在这份资料中我用到了如下的知识点：

1 如何在右键中添加菜单；

2 如何在点击右键菜单时响应我们的特定过程；

3 如何利用窗口实现数据的选择；

4 如何进行等于和不等于的操作；

5 如何选择空格的操作；如何进行排重的操作等等。

6 On Error Resume Next与 On Error GoTo 0 相结合，控制执行错误处理

7 右键添加菜单及去除的一般处理。

如果大家已经看到了这个技术的代码，可以细细体会代码的含义，也可以根据自己的需要对代码进行适当的修改和补充。

【分享成果，随喜正能量】

• 为了无分别，以上代码不便公开，如需要，可以私信我