输入代号选择排列对应区域数据

非常谢谢 · 发表于 2018-6-20 20:52

请老师们帮写个VBA代码完成填入区域代号选择排列相关对应区域数据详情见附件,谢谢

代码.rar (17.27 KB, 下载次数: 10)

不知道为什么 · 发表于 2018-6-20 21:06

需要排序的数字都没填，你想哪能？

非常谢谢 · 发表于 2018-6-20 21:59

本帖最后由非常谢谢于 2018-6-20 22:11 编辑

不知道为什么发表于 2018-6-20 21:06
需要排序的数字都没填，你想哪能？

老师你可能没注意
从76至118还有许多表格框中数据说是
示例中0132 对应区域为AT98:BA107 此区域的数据为 359
同理1050 对应区域为AB76:AI85 此区域的数据为024 025 028 048 156 178 369
........................
最后选择排列后就得到示例数据
若输入代号区域无数据,则选择填列数据为空就是[如单独在表框(范围为W10:AD37)中只输入5010则AF1:AM60中无数据]

不知道为什么 · 发表于 2018-6-20 22:17

非常谢谢发表于 2018-6-20 21:59
老师你可能没注意
从76至118还有许多表格框中数据说是
示例中0132 对应区域为AT98:BA107 此区域的数 ...

如图

非常谢谢 · 发表于 2018-6-20 22:49

不知道为什么发表于 2018-6-20 22:17
如图

每个代码对应区域的数据是不同的,有的可能也就两三个有的可能为零,有的可能有几十个数据,比如如果输入0033和1500那么就要把 1500代表区域中49个数和0033代表区域中的42个数据进行从小到大排列,而当1500区域中不在是49个数据而是只有10个或其他个数时,运行代码时也能自动按实有数据进行排列,这若甘个区域中的数据多少是不确定的(可能为零个也可能几个数十个,) 关件是输入那些代码表示那几个区域就统计那几个区域数据,即写代码时考虑可能只输入一个代码,也可能输入全部74个代码的数据填列选择,谢谢

非常谢谢 · 发表于 2018-6-20 22:55

不知道为什么发表于 2018-6-20 22:17
如图

W10:AD37框中输入代码有空是因为输入代码是从另表得到数据复制粘贴而来,但需删除某些不需用代码,所以留下空格,因为有些代码没有考虑有空格情形 ,有空格时会出现错误,所以模拟时在W10:AD37框中输入代码之间有空格

不知道为什么 · 发表于 2018-6-21 00:19

非常谢谢发表于 2018-6-20 22:55
W10:AD37框中输入代码有空是因为输入代码是从另表得到数据复制粘贴而来,但需删除某些不需用代码,所以留 ...

如图，供参考！

非常谢谢 · 发表于 2018-6-21 11:13

不知道为什么发表于 2018-6-21 00:19
如图，供参考！

大致就是这个意思，但和我的请求还是有一点差别，我举的例是当输入几个不同代号时，对所有数据进行从小到大排列，可能是我没说明白，所以你理解还有一点误差，你是把它们单独罗列出来，我W10区域中填列的0132 1050 0600 1032 2310这5个代号得出的AF1区域中数据024 025 028 037 048 059 123 124
156 178 267 359 369 568就是前面所有代号区域内数据从小到大

不知道为什么 · 发表于 2018-6-21 11:28

非常谢谢发表于 2018-6-21 11:13
大致就是这个意思，但和我的请求还是有一点差别，我举的例是当输入几个不同代号时，对所有数据进行从小到 ...

那就更简单了，你可以试着在我的基础上修改。

不知道为什么 · 发表于 2018-6-21 12:39

非常谢谢发表于 2018-6-21 11:13
大致就是这个意思，但和我的请求还是有一点差别，我举的例是当输入几个不同代号时，对所有数据进行从小到 ...

对2中情况分别进行了排序，供参考！

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

[求助] 输入代号选择排列对应区域数据

评分

评分