【数据有效性】(高级版本改名为”数据验证”)是Excel非常炫酷、实用的一个功能,相信大部分朋友都有使用过用它制作的下拉列表——什么?又讲【数据有效性】?别走!我们今天不讲怎么用【数据有效性】制作下拉列表,老调重弹不是俺星光的作风,今天我们讲……
打个响指,先问大家一个问题,使用【数据有效性】制作好的下拉菜单,需要几步?
1, 选取单元格
2, 单击单元格右侧的【下拉箭头按钮】
3, 在弹出的下拉列表中选择需要的选项
1——2——3——我数学学的好,一共三步,不服来辩!
是的,我就是这么无聊——我们今天就讲这个三步走。
这个三步能不能变成两步?第二步能不能省略?就是那个单击【下拉箭头按钮】的那步?我最近视力伴随脑力一起急剧下降, 实在很烦点击它!能不能我一选中有【数据有效性】的单元格,下拉列表就自动弹出来?
亲,伸出手,跟我来。

1, 快捷键Ctrl C复制下面的工作表事件代码
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
'程序出错时,继续执行下一步
n = Target.Validation.Type
'当单元格没有【数据验证】时,程序出错,但会继续执行
If Err = 0 Then Application.SendKeys
'%{down}'
打个响指,先问大家一个问题,使用【数据有效性】制作好的下拉菜单,需要几步?
1,
2,
3,
1——2——3——我数学学的好,一共三步,不服来辩!
是的,我就是这么无聊——我们今天就讲这个三步走。
这个三步能不能变成两步?第二步能不能省略?就是那个单击【下拉箭头按钮】的那步?我最近视力伴随脑力一起急剧下降, 实在很烦点击它!能不能我一选中有【数据有效性】的单元格,下拉列表就自动弹出来?
亲,伸出手,跟我来。

1,
Private Sub Worksheet_SelectionChange(ByVal Target As Range)


