以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]再求个助,看例子吧。 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=48424) |
||||
-- 作者:shipangzi -- 发布时间:2014/3/28 15:33:00 -- [求助]再求个助,看例子吧。
|
||||
-- 作者:shipangzi -- 发布时间:2014/3/28 15:35:00 -- 关于单元格匹配填充的问题。 |
||||
-- 作者:狐狸爸爸 -- 发布时间:2014/3/28 15:59:00 -- For Each dr1 As DataRow In DataTables("表C").DataRows For Each dr2 As DataRows In DataTables("BOM明细表").Select("订货号 = \'" & dr1("订货号") & "\'") Select Case dr2("物料名称") Case "气缸体预装配" dr1("气缸体") = dr2("物料编码") Case "气缸盖分总成" dr1("气缸盖") = dr2("物料编码") Case "飞轮" dr1("飞轮") = dr2("物料编码") End Select Next Next |
||||
-- 作者:shipangzi -- 发布时间:2014/3/28 17:36:00 -- 谢谢 |