首页 > 软件操作教程 > 办公软件 > Excel
题目内容

怎么使EXCEL里数据有效性列表显示得更大些?

题目答案

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

                                                                             image.png

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

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

                                                                         image.png

代码

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 If 
exitHandler:
    Application.EnableEvents = True
    Exit SuberrHandler:    GoTo exitHandlerEnd Sub
网友评论(共0条评论)

请自觉遵守互联网相关政策法规,评论内容只代表网友观点!

最新评论

点击加载更多评论>>

软件操作 新人注册送三重礼

已有 22658 名学员学习以下课程通过考试

相关视频试题

最需教育客户端 软件问题一手掌握

去 App Store 免费下载 iOS 客户端