在Excel中点击数据验证列表时，如何放大或缩小单元格？

数据验证列表中的字体是固定的，无论你在工作表中更改为何种字体大小，这里我介绍一个宏代码，在点击数据验证列表的单元格时可以实现放大或缩小。

放大或缩小数据验证列表

放大或缩小数据验证列表

要放大特定的数据验证列表，可以使用以下代码：

1. 右键单击你使用的Sheet标签，点击“查看代码”以启用Microsoft Visual Basic for Applications窗口。

2. 在窗口中，将代码复制并粘贴到脚本中。见截图：

VBA： 放大特定的数据验证列表

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice20171215
    On Error GoTo xErr
    If Target.Validation.Type > -1 Then
        ActiveWindow.Zoom = 140
        Exit Sub
    End If
xErr:
        ActiveWindow.Zoom = 100
End Sub

3. 保存代码并返回到工作表，当点击包含数据验证列表的C1单元格时，缩放比例将会放大。

提示：

如果希望在点击任意一个数据验证列表时都能放大或缩小，可以使用此代码：

VBA： 点击数据验证列表时放大或缩小

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice20171215
    On Error GoTo xErr
    If Target.Validation.Type > -1 Then
        ActiveWindow.Zoom = 140
        Exit Sub
    End If
xErr:
        ActiveWindow.Zoom = 100
End Sub

相关文章：

• 如何在Excel中将所有选项卡调整为同一缩放比例？