有偿求助:入出库例子,改为窗体模式进行录入: 400元,可议,感谢

micch · 发表于 2023-6-8 08:21

只是单独做一个出库单窗体版，倒也不难，问题是整体模板做的太简陋，单做一个窗体，也不配套，如果整套模板都重新做一下，内容又有点多了

suntao2000 · 发表于 2023-6-8 11:19

YANWEI82123300 发表于 2023-6-7 19:48
suntao2000老师谢谢您的帮助,例子报错找不到库,修改引用也不行,您再看看

你是说我改了点后出现找不到库？我只加了两句你在你原表上加上去也行，加入的位置看图片！~
drr = Sheets("库存表").Range("A1", Sheets("库存表").[D36656].End(3)) '注1：在循环之前把原库存表数据装入数组drr

Sheets("库存表").Range("A1:D" & UBound(drr)) = drr '注2：当出现“数量小于库存”时，还原库存表

leeson7502 · 发表于 2023-6-8 15:50

提示: 作者被禁止或删除内容自动屏蔽

YANWEI82123300 · 发表于 2023-6-8 17:42

首先谢谢大家的关注，如果方便的话，请将您做的例子录个视频发发上来先看看效果和一些建议吧！感谢大家帮助

YANWEI82123300 · 发表于 2023-6-12 08:42

谢谢各位老师请尽量不要推荐其他软件,由于本人是菜鸟,因此想好好的学习一下EXCELVBA,同时我想在这个1楼的例子基础上进行重建,谢谢了,如果有精通access也可以考虑使用access制作的,谢谢大家了

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

leeson7502 leeson7502 当前离线性别保密 UID 66230 阅读权限 0 注册时间 2005-2-19 在线时间小时最后登录 1970-1-1 积分 446 财富分享技术精华头像被屏蔽 TA的精华主题 TA的得分主题	发表于 2023-6-8 15:50 \| 显示全部楼层 [广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件 ★免费下载 ★ ★ 使用帮助★ 提示: 作者被禁止或删除内容自动屏蔽

	回复举报

[求助] 有偿求助:入出库例子,改为窗体模式进行录入: 400元,可议,感谢