（讨论）用VBA根据数据表生成组织结构图（或控股结构图）

livil

由于工作原因，需要制作树状图形，主要涉及公司控股结构图、组织结构图等。
    一直在希望能通过数据表，描述组织结构状况，然后通过VBA代码在另一张空表上自动生成对应的垂直树状结构图。
    这里可能涉及两个步骤：1、数据表的格式如何设计，即如何在一张表上反映较为清晰的结构关系，同时，该格式又要方便程序的实现；2、程序具体实现做图，并要通过定期更新数据表，自动更新结构图。  
    感觉关键是第一个步骤要设计合理，后面程序具体实现方式到是可多样式的。  
    是否有人可设计符合要求的步骤1中的数据表格式，主要涉及到层级间关系的表达方式设计，请赐教。

Admin

   

很遗憾通知楼上朋友，您的帖子在24小时之内没有任何回复！

通常情况下，本论坛发布的主题帖会在8小时被回复或处理。您的帖子在24小时之内未被回复，其中的原因可能是：

1、问题表述不清、模棱两可，难以理解，帮助者被搞晕了，夺帖而出；
2、没有上传必要的附件，或附件被遗忘在某个角落；
3、发帖提问时，语气带棱角、带挑衅，不幸被列入不受欢迎的帖子；
4、所提问题不成立，或提不合理的要求，乐于助人者使出“走为上”之计；
5、话题较偏、较冷或者发布到了不合适的版块，暂时无人问津，顾影自怜。


为了提高您的问题解决效率，我们推荐您阅读以下文章：
* 如何发表新话题和上传附件：http://club.excelhome.net/thread-45649-1-1.html
* 发帖的技巧：http://club.excelhome.net/thread-176339-1-1.html
* EH技术论坛的最佳学习方法：http://club.excelhome.net/thread-117862-1-1.html

godshit

觉得这个问题有价值，友情支持下。
假设没有交叉持股，表的结构：
A 50%
            AA  30%
            AB 20%
B 50%
树状结构图暂时没想法

livil

关于这个问题，我又想了一下：我们的目的是画成图，那么图与表之间有一定对应关系才可成立。

能否先想个办法，先把一个典型的控股关系结构图，转换成关系数据表？

如附件图， 感觉图不是什么大问题，最差也可以在excel单元格里画出简单效果。 关键是转换方式，关系表如果制作便于这种转换。   附件就只是一个表格里的单元格样式而已，转成什么样式的关系表方便用呢？

[ 本帖最后由 livil 于 2010-10-1 09:45 编辑 ]

livil

将上图转成了本质上并没什么变化的表格形式（仍以Tree结构表现的）。
突然想到：如果再把这个表分拆，按数据库第一范式的要求，变成四张表，即第一张表只有某人A，第二张表只有母公司，第三张表只有子公司，第四张表只有孙公司（当然还需要相应外键）。
是否这样关系结构就算是构成了？
在此基础上，是否可编程画图了？
还是说，在此基础上，还需要加点什么才更便于编程制图？
继续冥想。。。。。

[ 本帖最后由 livil 于 2010-10-1 10:10 编辑 ]

livil

Go on
将上面那张表拆成四张了，为了方便显示，放在一张附件上了，实际情况应该是第四独立表格。
假定名称分别为：第一层级、第二层级、第三层级、第四层级。在此基础上，能编程制图了吗？呵呵，继续想。

[ 本帖最后由 livil 于 2010-10-1 10:38 编辑 ]

livil

上个附件：  没完成，主要是框框定位成问题。  哪位大大支持一下？

[ 本帖最后由 livil 于 2010-10-1 15:44 编辑 ]

ruier3314

我也 感兴趣

mchscofield

哎，高手不出现。。。坐等高手

联谊会

搜索堆栈应用，论坛里有成果可以利用