ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

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

[原创] 补焊区域自动记录,自动打印

[复制链接]

TA的精华主题

TA的得分主题

发表于 2010-9-24 18:24 | 显示全部楼层 |阅读模式
我的一个女同事,每天忙一个统计铸件补焊区域记录的工作,每天一张记录单,同一铸件可能在好几张记录单中出现,有14个补焊区域,1区和2区又细分为6个区域,在每个铸件去照X光底片的时候,需要把这个铸件所有的记录统一到一块,合并到一条记录。工作量很大,需要一张一张的翻记录,很头痛。后来,我就自告奋勇的给她做了这样一个工作表,加了一个用户窗体。实现了自动记录和打印功能。现在她只需把每天的记录添加到工作表中,在打印表中只需输入要照X光的件号,所有补焊区域都搜出来了,,而且原记录表自动删除。按下打印补照单就出来了,有原来的每天半个小时的工作量,缩短为不到5分钟的时间,我想起来就有一种自豪感。虽然她承诺我请我吃饭一直没实现。
    今天我又更新了一下,更直观明了,拿出来给大家分享一下,希望帮到某个朋友。
    简单使用说明:
    1:打开工作簿就显示窗体,按从上到下的顺序操作完成,所有的操作都是CHANGE事件完成,无需确定按钮。
    2:打印表在件号列输出件号即可。
    3:有一个自动备注每次打印的结果,以备日后待查。
    有一个缺陷就是不能再窗体中删除记录和单个补焊区域,没有实现这个功能其中一个最大的原因就是,让做记录的人抱着认真的态度,还有就是在添加的时候可以看到你添加的结果,窗体是无模式的,工作表可以编辑。
     有不足的地方,请各位大侠指正,望不吝赐教。

补照区域更新版.rar

63.87 KB, 下载次数: 30

附件

TA的精华主题

TA的得分主题

 楼主| 发表于 2010-9-24 18:37 | 显示全部楼层
补充说明一下:当件号第三位数不是2,4,5时,没有 全底 和 深低 选项,所以是灰的,不能编辑状态。
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

关闭

最新热点上一条 /1 下一条

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

GMT+8, 2024-6-17 12:27 , Processed in 0.023375 second(s), 9 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

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

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

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