ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

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

[分享] excelhome中有关BOM的部分内容

  [复制链接]

TA的精华主题

TA的得分主题

发表于 2011-7-4 21:41 | 显示全部楼层
谢谢~正好可以参考

TA的精华主题

TA的得分主题

 楼主| 发表于 2011-7-5 08:39 | 显示全部楼层
http://blog.csdn.net/zeroDun/article/details/2503707
分级分类与交叉分类是对生产与生活中的事物进行分类时的基本思想,这种思想与面向对象基本一致,但各有侧重点:
1)        事物经常是可以按照一定的层次来归类的,这与面向对象思想中的抽象或继承不谋而合。
2)        事物经常是可以按照不同的标准来归类,因而从属于不同的事物体系。
基于以上思想的主要观点,对工厂业务涉及的主要要素及其联系,可以给出如下的分析:
1)        物料按照层次来分类,例如对于某一制造企业来说,物料可以分成零部件与辅材,而零部件可以分成曲轴、连杆、发动机总成等,这样就形成了两个分类层次。
2)        对于需要按不同的分类标准来划分的事物,如设备、设备故障类型、设备维修类型、设备停台原因类型、生产线停工类型、零件返修类型、零件报废类型等,则可以依据不同的标准划分为多个不同的小的事物体系。
3)        将以上两点分析与前面说到的工厂模型树结合起来,这棵树将会产生一些变形,但基本结构不变。

综合以上的分析,我们可以得到以下的典型的数据库设计:
表对象及说明                                       关键字段及描述
节点表-node                
用来描述工厂模型树中的所有节点                                          标识-ID
                                                                                               编码-code
                                                                                               描述-descr

关系准则表-relationPrinciple               
用来描述对工厂事物分类的依据                                              标识-ID
                                                                                               编码-code
                                                                                               描述-descr

节点关系表-XnodeRelationship               
用来描述工厂模型树中的所有节点之间的关系                          序号-ID
                                                                                                父节点-parentNode
                                                                                                子节点-node
                                                                                                关系准则-relationPrinciple
                                                                                                描述-descr

节点属性表-nodeProperty                
用来描述工厂模型树中的所有节点的信息项,即属性                标识-ID
                                                                                                编码-code
                                                                                                描述-descr

节点与属性关系表-XnodeAndPropertyRelationship               
用来描述工厂模型树中的所有节点                                            序号-ID
与其信息项之间对应关系及值                                                  节点-node
                                                                                                属性-nodeProperty
                                                                                                属性值-propertyValue
                                                                                                描述-descr

这样的数据组织结构,条理清楚,一层层细化、深入
而且,比较有利于使用事物特性表SML(有国家标准)

[ 本帖最后由 yiyiyicz 于 2011-7-5 09:25 编辑 ]
数据组织.JPG

TA的精华主题

TA的得分主题

发表于 2011-7-5 08:40 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
很好的汇总帖,工作中经常碰到BOM之间的转换,收藏了!

TA的精华主题

TA的得分主题

 楼主| 发表于 2011-7-5 09:39 | 显示全部楼层
这样汇总,一来方便自己。二来,在VBA软件使用中,多蒙excelhome的启发和帮助,以此略表谢意

TA的精华主题

TA的得分主题

发表于 2011-8-11 23:14 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
先谢谢楼主,我收下慢慢学习,正被BOM搞得头晕眼花中。我的工作是查找已有物料编码,增加新料号。可工程BOM的物料名称及规格均不规范。晕倒

TA的精华主题

TA的得分主题

 楼主| 发表于 2011-9-20 10:29 | 显示全部楼层
plmei 发表于 2011-8-11 23:14
先谢谢楼主,我收下慢慢学习,正被BOM搞得头晕眼花中。我的工作是查找已有物料编码,增加新料号。可工程BOM ...

“物料名称和规格极不规范”
我认为,这不是软件问题。
很有可能是上信息化系统之初,没有做前期工作,直接把现有的资料放进系统中了。
前期工作是指  1,名称分析和统一;2,在分类的基础上再做好编码方案
在系统上线后,要做到一次录入,多次使用。

如果是机械制造业,或者离散型制造业。可以试着用对照表把这个麻烦情况逐步改过来
对照表,一般ERP,PDM软件都能支持
如果方便,我们可以详细讨论

TA的精华主题

TA的得分主题

 楼主| 发表于 2011-9-27 08:47 | 显示全部楼层
本帖最后由 yiyiyicz 于 2011-9-27 08:54 编辑

一次提取符合要求的产品编码
http://club.excelhome.net/forum.php?mod=viewthread&tid=712496
编码特点是:10位编码中,前4位相同,
类似于分级编码,各级编码赋值后,写成一串码。这时在检索时需要分辨层级
Sub Macro1()
    Dim d As Object, arr, brr(), crr(), lc$, i&, m&, s$
    Set d = CreateObject("scripting.dictionary")
    arr = Sheets("数据源").Range("A1").CurrentRegion
    ReDim brr(1 To UBound(arr), 1 To 255)
    ReDim crr(UBound(arr))
    For i = 2 To UBound(arr)
        If Left(arr(i, 3), 4) = "0727" Or Left(arr(i, 3), 4) = "0754" Then
            s = arr(i, 2)
            If Not d.Exists(s) Then
                m = m + 1
                d(s) = m
                brr(m, 1) = s
                brr(m, 2) = arr(i, 3)
            Else
                crr(d(s)) = crr(d(s)) + 1
                lc = IIf(crr(d(s)) > lc, crr(d(s)), lc)
                brr(d(s), crr(d(s)) + 2) = arr(i, 3)
            End If
        End If
    Next
    ActiveSheet.UsedRange.Offset(1).ClearContents
    [b2].Resize(m, lc + 2) = brr
End Sub
zhaogang1960 编写》

TA的精华主题

TA的得分主题

 楼主| 发表于 2011-9-27 09:41 | 显示全部楼层
本帖最后由 yiyiyicz 于 2011-9-27 10:04 编辑

物料自动编码
http://club.excelhome.net/thread-614082-1-1.html
编码原则为
前4位为一段,大分类
中间2位为一段,中分类
后3位为一段,小分类(实际上就是流水码)
每段之间用“-”隔开
BOM层阶,用“层次”中的数字来表示

VBA的编码实现比较简单。采用case判断语句

TA的精华主题

TA的得分主题

 楼主| 发表于 2011-9-27 10:50 | 显示全部楼层
本帖最后由 yiyiyicz 于 2011-9-27 10:51 编辑

在查询物料中的模糊查询
http://club.excelhome.net/thread-598304-1-1.html
在下拉菜单中加入模糊查询的VBA编码实例,蓝桥玄霜

TA的精华主题

TA的得分主题

 楼主| 发表于 2011-9-27 10:55 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
本帖最后由 yiyiyicz 于 2011-9-27 10:55 编辑

下拉菜单的牛贴
下拉菜单在编码操作中是常用的工具,牛贴中有  有效性、函数、VBA
http://club.excelhome.net/thread-160679-1-1.html
《无拘无束的数据有效性》  山菊花
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

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

GMT+8, 2024-11-19 07:49 , Processed in 0.043967 second(s), 7 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

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

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

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