VBA给数据加密处理

VBA语言専攻 2023-03-13

【分享成果，随喜正能量】人这一辈子，经历多了，忙乎到最后，都会发现，荣华富贵从来就不是幸福的必要条件，真正的幸福和逍遥，而是兜里有钱，身体没病，心里没事。得之坦然，失之淡然。活在当下，不念过往，不畏将来，才是通往幸福的最好的选择。。

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

NZ13：VBA给数据加密处理

也许您的EXCEL表格中有些数据是给特殊人看的，不能示众。如：财务的工资表，人事部门的掌握的员工个人电话，汇总后的多人家庭住址，领导掌握的属下的奖金分配额，老板的分红记录等等，甚至是一些个人的历史档案。那么有没有办法让这些数据实现加密呢？出示给人的是一些无法破译的字符，如果自己需要了可以随时解密。

是的，VBA无所不能，我给出的这个工具NZ13就可以实现给数据的自由加密。只要数据是加密状态，即时别人打开工作簿文件，看到的也是无关的东西。而你需要做的，就是记住自己的加密密码，以便恢复数据。

工具的代码我封装在VBA_数据加密.xlsm文件中。工具是开放源码的（注意VBE的打开密码是123456789，但强烈建议您不要轻易打开代码窗口，即使打开也要留有备份）。您可以把数据拷贝到这个文件中，也可以把代码复制到您的文件中。注意：这个工具代码的运行可以通过快捷键来完成。

一工具的应用场景

我们看下面的表格：

对于上述数据，当您打开时最不想让人看到的是每个人的“工资收入”，这时我们企望的就是把这些“工资收入”的单元格进行加密。

有的朋友会说了：可以隐藏啊，是的，可以隐藏这列，但这是EXCEL的操作，在熟悉VBA后，可以达到更高的层次。更何况如果是隐藏列，当别人打开这个工作簿时可以取消隐藏实现数据的读取。那么，是否可以设置打开工作薄的密码呢？首先，这些数据只是部分不便示人，大部分是可以让别人看的；其次，我强烈建议使用EXCEL表格的学员，不要使用打开工作薄的密码，非常麻烦！