400-685-0732

WJMonitor舆情之声

企业大数据智能舆情监测管理解决方案

全网监测海量数据按需发布监测预警

实时把握舆情动态精准追溯信息源头

获取验证码
企业采购 个人使用
当前位置: 首页 > 办公 > excel > excel数据有效性 使EXCEL里数据有效性列表显示得更大些的方法

excel数据有效性 使EXCEL里数据有效性列表显示得更大些的方法

时间:2018-07-13 15:41:52

excel数据有效性 使EXCEL里数据有效性列表显示得更大些的方法,今天给大家带来的这篇文章主要讲的是,excel数据有效性的相关知识,或许有很多人都曾被这个问题困扰,但是当你看完excel数据有效性 使EXCEL里数据有效性列表显示得更大些的方法这篇文章的时候我相信你一定不会载被这个问题所困扰了,一起来看看吧!

在使用excel时,当使用数据有效性创建下拉列表时,不能够改变字体或字体大小。如果缩小工作表的尺寸,那么将难以阅读列表中的项目。

excel数据有效性 使EXCEL里数据有效性列表显示得更大些的方法

要使列表中的文本看起来更大,可以使用VBA代码,使得在选择数据有效性单元格时增大工作表缩放尺寸设置,从而使数据有效性列表中的文本看起来更大。

下面的代码在选择数据有效性列表单元格时将工作表的尺寸缩放为120%。如果选择的单元格中没有设置数据有效性,那么工作表尺寸缩放为100%。

excel数据有效性 使EXCEL里数据有效性列表显示得更大些的方法

代码

Private Sub Worksheet_SelectionChange(ByVal Target As Range)Dim lZoom As LongDim lZoomDV As LongDim lDVType As LonglZoom = 100lZoomDV = 120lDVType = 0Application.EnableEvents = FalseOn Error Resume NextlDVType = Target.Validation.TypeOn Error GoTo errHandlerIf lDVType <> 3 ThenWith ActiveWindowIf .Zoom <> lZoom Then.Zoom = lZoomEnd IfEnd WithElseWith ActiveWindowIf .Zoom <> lZoomDV Then.Zoom = lZoomDVEnd IfEnd WithEnd IfexitHandler:Application.EnableEvents = TrueExit SuberrHandler:GoTo exitHandlerEnd Sub

以上就是excel数据有效性 使EXCEL里数据有效性列表显示得更大些的方法全部内容了,希望大家看完有所启发,对自己的工作生活有所帮助,想要了解更多跟excel数据有效性 使EXCEL里数据有效性列表显示得更大些的方法请关注我们优词网!

excel数据有效性 使EXCEL里数据有效性列表显示得更大些的方法

分享按钮