求VBA的实现

图片一是一张未打开的表格，路径及文件名为“桌面\采购清单.xls”

图片二是一张入库单
我现在想通过在不打开一表的情况下查找到入库单中订单号为100001，名称和规格都与上表对应的采购量的值，并以进货仓为订单库，订单号为100001为约束条件，限制入库数量，如果大于2000则不允许保存并提示输入者允许输入的数量以msgbox的形式。
鉴于自己初学VBA，只会把表一用GetObject调用到二里面的空SHEET,然后在M15用SUMPRODUCT求得2000这个值，再将数量下面的单元格有效性设置为不大于M15.这样做完全是不合理的，因为每次在入库的时候可能入的订单号不同，后台所需调用的表格以及变量很多。
所以请大神帮我看看，给一个一步到位的方法，真心感谢！

自己顶一下，是我的问题太过繁琐还是表达的不够清楚，在贴吧这么长时间，发帖总是没人帮助我。。。

不感兴趣

开通SVIP免广告

是你的问题太深刻了，只能看看

嗯

最好把样表上传共享出来。懒得去输入文字和数据。

一表的结构描述的不清楚.
订单100002 100003 分别是如何存放的?
同一sheet的不同range? 还是每个订单一个sheet? 或者是每个订单一个workbook?
如果在同一sheet的不同range 如何判断记录的首尾?

不好意思，到现在才回复，一表的订单我现在都是放在"桌面\采购单"文件夹下,是以每个订单为一张表的形式存放在里面，每张请购单的文件名都被我定义为订单号，类似“100001.xls,100002.xls,......
我能不能不打开这张表直接把我所需要的变量专递过来形成判断数量的有效性。
举个例子：比如，在一表未打开的情况下，表二中的Forms.ComboBox1.value我选择”订单库“然后输入1004会自动跳出后面的扁管和规格16*2*642以及库位MM-F3，而当我输入订单号100001的时候，前面”数量“一栏的有效性就自动根据表一中订单号、扁管、16*2*642等条件传输”采购量“的数字2000，然后数量的有效性条件设置为
<=X-$L9(此处假设采购量的变量定义为X,库存量的显示单元格为L9）,如果不在有效性范围内提示”超出范围“，重新输入。
第二条输入1003，当订单号我输入100002就自动将此订单中的数据传递过来供我作有效性判断。问题比较繁琐，望各位费点心，我QQ446437967，如有意帮助，请加QQ传文件帮看看。

扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频！

6回复贴，共1页

<<返回excel吧

分享到:

日	一	二	三	四	五	六