点击下拉框里指定条件，便能显示查询结果的VBA

WYS67 · 发表于 2018-10-5 17:30

本帖最后由 WYS67 于 2018-10-5 17:32 编辑

lss001 发表于 2018-9-29 18:33
→_→→_→

老师：下面附件是33楼的代码完善而定型。今天我把这个代码复制进工作簿后，发现无法执行查询，还以为是我操作不当。于是我直接在33楼下载的附件里测试，结果发现：如果复制其它数据到条件列标a列里，代码不能识别，下拉框里依然还是条件11~20。

怎样才能让下拉框里自动显示去重升序后的指定条件【就是A5:A83836里的数字】？

02 点击按钮便可数据查询的sub过程lss001 33楼附件已完善并定型.zip (436.71 KB, 下载次数: 10)

WYS67 · 发表于 2018-10-6 09:18

lss001 发表于 2018-9-29 18:33
→_→→_→

老师：本帖67、68楼反映的问题怎样解决？

WYS67 · 发表于 2018-10-6 10:20

lss001 发表于 2018-9-29 18:33
→_→→_→

老师：请看 68楼附件里的问题，

Video_20181006100927.zip (982.72 KB, 下载次数: 1) 明明条件区域A列是112~566组成的三位数，下拉框里应该显示从112到566的30个不重复三位数，却全部显示11，这是怎么回事？

怎样才能在E1:E2输入表名和条件列标后，下拉框里就会自动显示---指定条件区域从小到大的所有不重复数据？

WYS67 · 发表于 2018-10-6 11:52

本帖最后由 WYS67 于 2018-10-6 11:53 编辑

lss001 发表于 2018-9-29 18:33
→_→→_→

急盼老师诊断http://club.excelhome.net/forum. ... 728&pid=9677629附件出现的问题，找出解决办法---- 怎样才能在E1:E2输入表名和条件列标后，下拉框里就会自动显示---指定条件区域从小到大的所有不重复数据？

WYS67 · 发表于 2018-10-6 14:13

本帖最后由 WYS67 于 2018-10-6 14:15 编辑

lss001 发表于 2018-9-29 18:33
→_→→_→

老师：我真是笨死了！方法测试了一上午，终于对下拉框有了更深刻的了解：截图--设置控件格式--下拉显示项数(D) 里的数字，控制项数的个数，默认为“8”个。

1.设置控件格式--下拉显示项数(D)里面的数字设置为：修改默认数值“8”为条件区域里的实际个数【指定条件的不重复个数【A列里共有指定条件30个】，下拉框里就会自动显示所有的指定条件。
2。每次点击宏按钮时，必须同步刷新E8指定的结束行号。不然，当地本次指定的E8小于上次指定的结束行号时，结果输出列F的最下面会留存上次多出的数据，造成显示的数据结果多于指定条件拥有的实际数据个数。

恳请老师帮忙，修改代码，解决1、2描述的问题。

点击按钮便可数据查询的sub过程lss001.zip (455.79 KB, 下载次数: 10)

WYS67 · 发表于 2018-10-6 15:40

嗯。请老师帮忙解决

WYS67 · 发表于 2018-10-6 18:24

本帖最后由 WYS67 于 2018-10-6 18:52 编辑

lss001 发表于 2018-10-6 16:08可以刷新，条件E1:E8
要刷新条件只需双击相对应条件单元格

老师：每次工作表关闭后重新打开，原先设置的下拉显示项数就重新恢复成了8个，还得重新设置。再次关闭工作簿后又恢复了默认。关键是默认状态下，看不到下拉框里的全部数字，无法进行指定数字的点击查询，只得重新设置......周而复始，无穷尽也！

Video_20181006181440.zip (1.59 MB, 下载次数: 2)

我想打开工作簿，点击下拉框，就全部显示指定条件的。

另外，当E8指定的数值小于上次时，由于不能及时清除最下边多出来的上一次数据，混淆在一起，很容易导致本期查询结果最后几行【越往后越重要！】出现错误！

WYS67 · 发表于 2018-10-6 19:59

恳请老师帮忙完善75楼想要的功能。

WYS67 · 发表于 2018-10-6 21:04

恳请老师帮忙完善75楼想要的功能。

lss001 · 发表于 2018-10-6 21:06

WYS67 发表于 2018-10-6 21:04
恳请老师帮忙完善75楼想要的功能。

刚刚上传见上楼

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

[求助] 点击下拉框里指定条件，便能显示查询结果的VBA