NZ07工具：日期录入控件

VBA技术工具是我根据我的多年经验，并结合一些需求推出多项工具。这些工具分为YZ系列和NZ系列：YZ系列比较容易，一般可以通过教程中的代码组合自己也可以容易的写出；NZ系列则比较困难些，需要一定的VBA技术能力可以得到。这些工具只对学员，不对外。

对于较难些的NZ系列工具，每个工具有两种版本，开放源码的版本和不开放的版本。不开放源码的版本可以直接使用，是用来鼓励哪些执着于VBA学习的和应用，按照我的教程踏实学习，并学习到了高级阶段的学员。这些工具我会陆续推出，一般以19版MS为蓝本编写。今日给大家介绍的这个系列的NZ07工具：日期录入控件

NZ07 日期录入控件

这个应用是展现给大家在高版本Excel工作簿中录入日期时专用控件。我一共提供了两个控件供大家根据需要选择，其一是NzAppsDatePicker.xlam,这个控件比较简单，只是单纯的选择日期进行录入；其二是NzWinDatePicker.xlam，这个控件较复杂些，可以实现日期的录入、日历的添加、日期格式的设置、每年周数的计算及录入。

工具的核心技术我封装在NzAppsDatePicker.xlam和NzWinDatePicker.xlam加载项中，加载项提供两个版本，一是开放源码的版本（注意VBE的打开密码是123456789，但强烈建议您不要轻易打开代码窗口，即使打开也要留有备份）；二是不开源码的版本，这个版本只提供使用，学员在获得我的全部10套教程后即可得到这个版本的资料。加载项在加载后，任意右键，就可以在菜单中看到工具的菜单，应用非常的方便。

一  NzAppsDatePicker加载项加载后的菜单及日期录入

我们打开任意的一个EXCEL文件（2007版本之上），然后加载上述加载项，在工作表中选择要录入日期的单元格，右键，如下：

我们会看到提示的录入控件的菜单，点击它，我们会得到下面的录入工具：

此时，我们只需根据需要选择我们要录入的日期起即可，选好日期后单击，就实现了录入：

二  NzWinDatePicker加载项的加载

这个加载项的功能比较多些，同样是打开任意文件后，打开这加载项后即可以利用。右键菜单和第一个加载项一样，

点击菜单NZ DatePicker后我们可以得到下面的界面：

这个界面是简化版本，还可以点击“改变设置”的按钮看到这个控件的全貌：

三 利用NzWinDatePicker加载项的功能

1  日期的录入

我们在第一个截图中双击某个日期，就可以实现日期的录入了；

2  当天日期的选择

 在界面中我们点击“今天”，界面提示的日期就会显示当前的日期：

3  插入日历

我们在选择插入日历，就可以将界面中显示的日历插入到工作表中了：

4  其他设置

我们点击“改变设置”按钮，可以改变显示界面的各种选项，包括：语言、日期的格式、当期日期的排列标准，这些功能都是非常好用的。

5  提示功能

这个控件还有很多的提示功能，如我们点击界面中的问号按钮：

提示如下：

可以大大方便初次使用者的需要。

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

我20多年的VBA实践经验，全部浓缩在下面的各个教程中：

【分享成果，随喜正能量】成年人的分寸感，是一种点到即止的默契，说有事，就不要问什么事；说在跟人吃饭，就不要问跟谁吃饭。成年人有分寸的客套不是虚伪，而是一种善良，它是用最温柔的方式告诉对方，我们需要保持怎样的距离。。