使EXCEL里数据有效性列表显示得更大些的方法
发布时间：2023-10-16 05:46:21
在使用excel时，当使用数据有效性创建下拉列表时，不能够改变字体或字体大小。如果缩小工作表的尺寸，那么将难以阅读列表中的项目。
要使列表中的文本看起来更大，可以使用VBA代码，使得在选择数据有效性单元格时增大工作表缩放尺寸设置，从而使数据有效性列表中的文本看起来更大。
下面的代码在选择数据有效性列表单元格时将工作表的尺寸缩放为120％。如果选择的单元格中没有设置数据有效性，那么工作表尺寸缩放为100％。
代码
Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim lZoom As Long Dim lZoomDV As Long Dim lDVType As Long lZoom = 100 lZoomDV = 120 lDVType = 0 Application.EnableEvents = False On Error Resume Next lDVType = Target.Validation.Type On Error GoTo errHandler If lDVType <> 3 Then With ActiveWindow If .Zoom <> lZoom Then .Zoom = lZoom End If End With Else With ActiveWindow If .Zoom <> lZoomDV Then .Zoom = lZoomDV End If End With End IfexitHandler: Application.EnableEvents = True Exit SuberrHandler: GoTo exitHandlerEnd Sub
0
投稿猜你喜欢
现在有很多小伙伴都在使用Wps这一款办公软件，但经常使用就会导致有很多文件的使用记录，这极有可能会导致个人隐私的泄露，那么我们要如何去清除最- 众所周知，在Win8系统下总能看到一个叫做desktop.ini的文件，格式也没有见过，不知道要怎么打开，特别是系统垃圾清理的时候，也不懂可
- Win10系统操作性能是符合相当多朋友喜欢的，也有很多人不习惯Win10的操作界面，还是习惯之前的Win7界面，那么怎么样才能实现使用Win
- 苹果今天推出了 iOS 16.2 RC 版，本次更新带来了以下改进和错误修复：一、iCloud功能带来了可选的端到端加密，这一功能将向所有美
- 越来越多的小伙伴开始使用Win10 20H2版本，因为新版本带来了许多新功能。其中有一个功能就是更改屏幕刷新频率，能够让我们的视觉效果更加流
- 火狐浏览器怎么设置默认搜索引擎为必应？一些朋友发现自己安装完火狐浏览器，在地址栏输入文字进行搜索时，默认是用百度进行搜索的，大家希望把默认的
- 特别是在统计数据的时候，“冻结窗口”功能就显得尤为重要，今天，小编就教大家在Excel中表格进行冻结窗口的功能操作。Excel中表格进行冻结
- 我们知道，在Excel中通过填充柄或粘贴公式可快速复制公式，而Word中没有此项功能，但是我们在用Word 2000/2002制表时，也经常
- 掌握了前面的有关简单的PPT课件模板及成套的PPT课件模板的教程，若还想使PPT精彩一些就再来学一学一套模板多张内页的PPT课件制作教程吧。
- 使用win10系统电脑的时候，有些情况下会升级自己的系统版本。有用户发现win10电脑总是自动关机且会重启的问题，win10 1909关机自
- 我们在编辑Word文档的时候通常会用到分隔符，分隔符包括分页符、分栏符以及分节符等，通过在文字中插入分隔符，可以把将Word文档分成多个部分
- 很多网友在日常工作中经常需要从网页里复制文字进行处理，然而直接复制到文档中的内容往往带有格式而使系统处理速度缓慢，且会给后期处理带来诸多不便
- Win7系统提示Windows无法启动安装过程怎么办？这可能是硬件导致的，也可能是电脑的设置问题，那么具体的解决方法就来看看下面小编带来的这
- 为知笔记怎么开启夜间模式?为知笔记不仅是一款帮你记录生活、工作点点滴滴的云服务笔记软件，也是一款共享资料、基于资料进行沟通的协作工具。想要开
- 当电脑工作不正常、运行缓慢或出现电池和应用程序问题时，有用户就会选择将电脑重置，但是近期有Win11用户遇到了重置失败未做更改的情况，那么应
- IF函数的多层嵌套，IF函数是我们工作中最常见的函数之一，今天我们一起来看看IF函数的多层嵌套问题。如下图：根据业绩计算提成比例当业绩大于等
- 对于U盘的实际容量，相信有不少用户都存在着疑问，比如说购买8GU盘，但是在电脑中显示的容量却小于8G，这是不是买到了缩水U盘呢？接下来小编就
- 在使用PPT打印文档后，文档是打印出来了，但是PPT程序却出现停止响应的情况使用系统带把PPT打印成图片到是没有问题，看来是打印安装方面的问
- Win10系统在安装后默认使用其内置的edge浏览器，但是因为使用习惯问题，不少用户会选择安装其他浏览器。但是使用一段时间后会发现默认浏览器
- 在Excel中统计数据，经常会用到日期这方面的函数，日期函数想要熟练精通掌握也不太容易，下面是小编带来的关于excel当前日期函数教程的内容
