如何根据指定条件做数据有效性的下拉选择呢

小年玩卡 · 发表于 2023-6-30 09:50

本帖最后由小年玩卡于 2023-6-30 21:21 编辑

求助大神，谢谢

下面这种直接用数据有效性能实现吗？还是说只有VBA代码才可以实现？

演示11.7z (11.07 KB, 下载次数: 2)

fanyoulin · 发表于 2023-6-30 10:12

你的文字表述不太清晰，我尝试做了一个；

小年玩卡 · 发表于 2023-6-30 10:27

fanyoulin 发表于 2023-6-30 10:12
你的文字表述不太清晰，我尝试做了一个；

那个下拉的意思差不多，就是根据首页G列的名称判断，如果等于其他工作表中D3，那么下拉就自动出现首页对应的R列内容（也就是您现在做的那种效果），不过后面其他工作表都需要一样的效果才行

ykcbf1100 · 发表于 2023-6-30 10:32

嗯，只是路过。。。

fanyoulin · 发表于 2023-6-30 10:32

小年玩卡发表于 2023-6-30 10:27
那个下拉的意思差不多，就是根据首页G列的名称判断，如果等于其他工作表中D3，那么下拉就自动出现首页对 ...

代码在工作表事情selectchang中，你把代码复制到每一个你需要这种效果的工作表的selectchange上面就行；

小年玩卡 · 发表于 2023-6-30 10:38

fanyoulin 发表于 2023-6-30 10:32
代码在工作表事情selectchang中，你把代码复制到每一个你需要这种效果的工作表的selectchange上面就行；

有没有更便捷的方法呢？因为涉及到的工作表有50来个

fanyoulin · 发表于 2023-6-30 10:59

小年玩卡发表于 2023-6-30 10:38
有没有更便捷的方法呢？因为涉及到的工作表有50来个

你的规则定义不明确，不好说；
你这明显是临时性的结构，正常来说参数表需要有比较规范的存放规则，这是其一；其二是输入规则你也没说，是所有的c列都有输入的可能还是只有c列的局部有输入的可能？为什么要用selectchang，也是考虑到c列的输入没有规则，那就根据你对c列的选择来自动适应；
如果输入规则是：c7:c100的范围，可以先把所有表的这个区域先全部定义为数据有效性，这个定义的过程不需要代码，而代码仅仅要做的只是及时替换有效性的内容，这个替换过程可以关联到“条件”上，即你在更改d3条件的时候立即替换有效性的内容就行了；

小年玩卡 · 发表于 2023-6-30 14:22

fanyoulin 发表于 2023-6-30 10:32
代码在工作表事情selectchang中，你把代码复制到每一个你需要这种效果的工作表的selectchange上面就行；

您好，发现一个问题，就是怎么每一列都显示下拉选择了？怎么修改只对C列做下拉呢

边缘码农 · 发表于 2023-6-30 15:32

使用 Workbook_SheetSelectionChange事件

fanyoulin · 发表于 2023-6-30 16:00

小年玩卡发表于 2023-6-30 14:22
您好，发现一个问题，就是怎么每一列都显示下拉选择了？怎么修改只对C列做下拉呢

下面这行代码写错了：
If Target.Column <> 3 and Target.Row < 7 Then

改成：
If Target.Column <> 3 Or Target.Row < 7 Then

		自动登录	找回密码
密码			免费注册

[已解决] 如何根据指定条件做数据有效性的下拉选择呢