高效快速生成家谱世系图

pmfashi

非常好，感谢

askar1009

执行时询问工程或库不存在，然后 所有变量 都不认识。 不过 这个不是关键。 东西很好。非常管用学了不少东西

leelond

cyfx2288 发表于 2017-1-1 08:41
求人不如求己，终于还是搞定世系图展开的理想算法了。按顺序排列和长子居中排列都生成了理想的紧密宝塔图。 ...

你好，不知道可不可以分享一下，最近正在整理家谱，看到你这个非常有条理，谢谢！

cunfu2010

cyfx2288 发表于 2017-1-1 08:41
求人不如求己，终于还是搞定世系图展开的理想算法了。按顺序排列和长子居中排列都生成了理想的紧密宝塔图。 ...

能分享一下吗？正在整理相关的内容

kezhiye

谢谢分享，期待中

zhoudeping

能请教一下填充色具体使用方法？谢谢！！

zhoudeping

我试了下，除了“嗣入、嗣出、养子”分别是数字2、3、4外，其它就不知道怎么用了。

ktuizhan

路过，学习下

cyfx2288

cunfu2010   网友找我要最终版，此论坛中，我没有回复消息的权限，只能在这里回复。
我是边整理家谱，边改进这个表，截止现在，其中Word版谱书生成这部分还没改好，因此，还没有什么最终版。只有当前我正在使用的版本。我改进此表的唯一标准就是方便家谱录入、校对，准确反映家族成员关系。这表原计划父系、母系双谱系家族表，但是由于目前我重点先录入了自己家族父系家谱，所以母系家族方面的功能没有注意修正。
当前我自己使用的版本，与去年发布的版本又有了一些细节上改进，主要增加了如下内容：
记录姓氏（实际录谱才发现，族谱中居然真的有改姓他姓的亲族），录谱时记录纸质家谱页码、生按纸质家谱页码，生成单页世系图，世系图中增加了批注信息，用来显示每个人的附加信息，等等。
另外：录谱过程中，我遇到了“嗣孙”，同一人过继两次的情况，这是超出我原先预想的。“嗣孙”此表可处理。同一人两次过继，暂时不能处理。
相对于当前网上发布的，只是细节上的变化，没有质的变化，仅从录入的角度而言，没有区别。

这次我仅仅隐去了我家族成员的真实姓名，其他所有的一切，包括家族结构、数据全都与我当前正在使用的完全一致。
具体使用方法，请各位自己试偿试吧。
如果有人想清空此表数据，然后用它录入自己的家族信息，那么只要删除“成员”表中第三行之后的数据，手工修改第二行数据为自己家族先祖，即可开始录入了。
成员表中，第一行是标题行，第二行是虚拟数据，任何家族的第一个人，其父号指向第二行。第三行开始才是真正家族数据。
凡是没有父号的家族成员，点“建谱”按钮之后，都会自动将其父号指向第二行数据，其世次置为1世。AH列之后的信息，建谱时会自动重建。
此表没有设置数据删除的功能，若确实录错了数据，请按成员编号，在成员表中找到该行记录予以删除。若该家族成员后面还有子嗣，请手工修正，否则此表必然出错。此表数据检查方面做得不够，在录入时故意录入非法数据或不合理数据而造成的问题，此表处理不了。
此表配偶录入稍有点特别，录入时偿试一下就知道了。

cyfx2288

这表使用了VBA所以必须使用微软OFFICE，我测试过带VBA功能的WPS，虽然可以运行，但由于个别指令不兼容，导致部分功能异常。
建议用Win7+OFFICE2010以版版本打开此表。其他环境下不能保证正常。由于我在此论坛只有上传2M文件的权限，所以本次上传的附件打包成了两个小文件。