ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 1429|回复: 6

求用VBA录入数据

[复制链接]

TA的精华主题

TA的得分主题

发表于 2015-12-20 09:29 | 显示全部楼层 |阅读模式
要求在录入表中点保存按钮,数据保存在明细表对应的品种下,批号不重复  。用VBA实现

新建 Microsoft Office Excel 工作表.rar

8.78 KB, 下载次数: 132

数据录入

TA的精华主题

TA的得分主题

发表于 2015-12-20 10:53 | 显示全部楼层
做了一个,不知是否符合楼主的要求?
录入表的品种建议不要做下拉菜单,预留了两个空列,以备增加品种。仅供参考!

副本Xl0000037.rar

10.98 KB, 下载次数: 149

评分

1

查看全部评分

TA的精华主题

TA的得分主题

 楼主| 发表于 2015-12-20 13:44 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
谢谢及时的答复。
还有就是我的原始录入表品种单元格有限,而明细内要求所有品种,(品种比较多)不是按顺序排列的,要查找对应品种录入数据

TA的精华主题

TA的得分主题

发表于 2015-12-20 21:09 | 显示全部楼层
这次不知是否能用上,对批次不得重复输入限制的同时,对下拉菜单品种选择重复的情况也做了考虑。
但总感觉假如一个批号需要录入数据的品种超过5种,就会出现问题,因为未看到你的原始表格,仅供参考。

副本Xl0000038.rar

11.96 KB, 下载次数: 119

TA的精华主题

TA的得分主题

 楼主| 发表于 2015-12-24 15:19 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
老师帮忙给改改吧,我 写的又臭又长,自己看了都不舒服,就是想把总表分到个表记录,还能提取, 打印就更好了

Book2 (自动保存的).rar

67.1 KB, 下载次数: 123

TA的精华主题

TA的得分主题

 楼主| 发表于 2015-12-27 14:51 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2015-12-29 07:21 | 显示全部楼层
轻快 发表于 2015-12-24 15:19
老师帮忙给改改吧,我 写的又臭又长,自己看了都不舒服,就是想把总表分到个表记录,还能提取, 打印就更好 ...

呵呵,楼主的表太专业了,不是从事与你相同专业的很难读懂。
其实楼主的vba水平,应付这个表应当绰绰有余。
提个建议:
1.表的顺序最好按你的工作流程展开,录入数据的表在前,储存数据的数据在后,参数表一次设定可能再不调整,就把它放在僻静处待命,使用起来更方便;
2.代码中对工作表的引用,个人见解不赞同批量设置为S1,S2..........它会让你在编代码时将自己绕进去,with语句就是你的好帮手啊;
3.楼主完善表格后还需帮助,最好能将求助的内容进一步明确,如:在那个表录入数据、录入数据的要求、数据录入的到哪些表及区域、查询是查询哪些数据、打印是打印哪张表等等,这样才有人帮得了你。
帮你顶一下帖子,避免沉下去。
本人是菜鸟,建议仅供参考。
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-11-25 09:28 , Processed in 0.035110 second(s), 9 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表