excel拖动排列步骤如下：1.我在EXCEL中输入以下数字，如图：2.现在我要想复制“1”，则拖动单元格A1，但此该你会发现，在下拖动下方有个方框，如图：3.上步出现的情况便是以顺序的方式出现，但你只需要点动那个右下方的方框，选择“复制单元格”即可......
excel图表技巧：显示数据有效性列表
Excel教程
2022-01-07 22:11:35
数据有效性（即“数据验证”）是Excel中常使用的一项功能。然而，在使用数据有效性创建好下拉列表后，我们不能够随便修改列表中的字体或字体大小。如果工作表显示比例较小，那么数据有效性列表中的内容也会相应地变小，这样就很难看清楚里面的内容，如下图1所示。
图1
我们可以使用一点小技巧，用VBA代码使得当用户选择数据有效性列表所在的单元格时，增大工作表的显示比例，使数据有效性列表中的字体随之变大，从而更清楚地看到其内容，其效果如下图2所示。
图2
代码如下：
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim lZoom As Long
Dim lDVZoom As Long
Dim lDVType As Long
‘设置放大比例
lZoom = 100
lDVZoom = 120
lDVType = 0
Application.EnableEvents = False
On Error Resume Next
‘目标单元格的有效性类型
lDVType =Target.Validation.Type
On Error GoTo errHandler
‘判断有效性类型是否为序列
‘3代表数据有效性类型为序列
If lDVType <> 3Then
‘不是序列
‘正常显示
With ActiveWindow
If .Zoom <>lZoom Then
.Zoom = lZoom
End If
End With
Else
‘是序列
‘放大显示
With ActiveWindow
If .Zoom <>lDVZoom Then
.Zoom = lDVZoom
End If
End With
End If
exitHandler:
Application.EnableEvents= True
Exit Sub
errHandler:
GoTo exitHandler
End Sub
将代码放置在设置了数据有效性的工作表模块中，这样，在选择数据有效性列表单元格时将工作表的尺寸扩大为120%。如果所选择的单元格中没有设置数据有效性，那么工作表尺寸恢复为100%。效果演示如下图3所示。
图3
标签： Excel图表制作Excel常用函数excel数据透视表excel教程
上一篇：VBA快速处理上标 下一篇：excel图表如何清楚地定位散点图中的数据点
相关文章