excel图表技巧:显示数据有效性列表

数据验证(“数据验证”)是Excel中常用的功能。但是，在创建了具有数据有效性的下拉列表后，我们不能随意修改列表中的字体或字号。如果工作表的显示比例较小，数据有效性列表中的内容也会相应较小，这样就很难看清内容，如下图1所示。

图1

当用户选择数据有效性列表所在的单元格时，我们可以使用一点技巧和VBA代码来增加工作表的显示比例，使数据有效性列表中的字体变大，其内容可以看得更清楚。效果如下图2所示。

图2。

代码如下：

私有子工作表_选择更改(按值目标作为范围)

昏暗的房间一样长

变暗变长

将lDVType调为长

设置放大倍数。

lZoom=100

lDVZoom=120

lDVType=0

申请。启用事件=假

出错时继续下一步

目标单元格的有效性类型。

lDVType=目标。验证。类型

出错时转到错误处理程序

判断有效性类型是否为序列。

3表示数据有效性类型为序列。

如果lDVType 3Then

不是一个序列

正常显示。

带活动窗口

如果。缩放lZoom然后。Zoom=lZoom

如果…就会结束

以…结尾

其他

是顺序。

放大显示屏。

带活动窗口

如果。缩放lDVZoom然后。Zoom=lDVZoom

如果…就会结束

以…结尾

如果…就会结束

existhandler :

申请。启用事件=真

出口接头

errHandler:

GoTo exitHandler

末端接头

代码被放置在设置了数据有效性的工作表模块中，这样当选择数据有效性列表单元格时，工作表的大小被放大到120%。如果选定单元格中未设置数据有效性，工作表大小将恢复为100%。效果如下图3所示。

图3。