如何使用VBA代码建立2000多行物料的分级显示?(已解决)

zhouxiao · 发表于 2012-4-26 14:35

本帖最后由 zhouxiao 于 2012-8-8 14:18 编辑

图片.jpg

如图所示,图中的分级显示,是用shift+alt+方向键建立的,很费劲
论坛中也搜索过很多类似的贴,未找到想要的答案.
VBA代码能否快速建立分级显示(如图所示的结果).?请各位同学给予指导.谢谢
以下为手工分级的逻辑:
1. 第1层级中所对应的图号为" ***.数字 "
2. 第2层级中所对应的图号为" ***.数字.数字 "
3. 其它层级以此类推(后面的层级我嫌麻烦,没有做)
4. 如第1层级中不存在" ***.数字 "的图号, 图号" ***.数字.数字 "归类到第1层级中.
详见附件.

发出商品.rar (34.59 KB, 下载次数: 23)

zhouxiao · 发表于 2012-4-26 14:55

看过一个很多类似的帖,多数是将除第1层级外的所有物料隐藏起来.

zhouxiao · 发表于 2012-4-26 16:04

哇,沉得好快

Zamyi · 发表于 2012-4-26 16:13

试试

zealotte · 发表于 2012-4-26 16:26

楼主看看附件是不是你要的结果。
代码已经在文件里了

zealotte · 发表于 2012-4-26 16:43

忘记说了，请在Sheet1中执行下Breakdown过程。

zhouxiao · 发表于 2012-4-26 16:54

zealotte 发表于 2012-4-26 16:26
楼主看看附件是不是你要的结果。
代码已经在文件里了

谢谢,答案很接近
稍微有一点瑕疵
如图所示图片2.jpg

(图1)

(图2)
图1不是第1层级,图2才是第1层级,这是我不是很明白由什么原因导致的.
以下哪种方法可以解决:
1.我的数据格式还需要标准化?
2.增加代码避免上面情况出现?
谢谢

zhouxiao · 发表于 2012-4-26 17:03

Zamyi 发表于 2012-4-26 16:13
试试

谢谢,可能是我的操作有误
如图所示
第1层级.jpg

(图1)
这是第1层级,只有1个物料.
第2层级.jpg

(图2)
这是第2层级,有2个物料.
第3层级.jpg

(图3)
这是第3层级,物料归类的时候错位了.

zealotte · 发表于 2012-4-26 17:22

空行我没考虑，可能需要手动处理一下。

zhouxiao · 发表于 2012-4-26 17:38

zealotte 发表于 2012-4-26 17:22
空行我没考虑，可能需要手动处理一下。

你的代码能全部注释一下嘛?
我想学习学习

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

[求助] 如何使用VBA代码建立2000多行物料的分级显示?(已解决)

评分