エクセル家系図と三日坊主日記

変更点は、配置の微修正（配偶者の有無と子供の有無をチェックをし配置を修正するようにした）、罫線の一部修正、1年を元年と表示、VBAの変数記述の見直しなど。

また、前バージョンでマクロが実行できないとのコメントがあり
エラーが起きていると思われる箇所を書き換えてみました。
    ActiveSheet.Shapes("表題").Select
    Selection.Cut
    Cells(90, X - 10).Select
    ActiveSheet.Paste
　　　↓
    With Worksheets("家系図")
        .Shapes("表題").Left = Cells(90, X - 10).Left
        .Shapes("表題").Top = Cells(90, X - 10).Top
    End With

EXCEL2003のマクロの記録で作った部分でしたのでEXCELバージョンが違うとエラーが出るのかなと思い変えてみました。
おきさんこれでどうでしょう？
excelkakeizu_ver1.79.zipをダウンロード

罫線描画の追加修正と細かな修正をしました。
マクロによる自動レイアウトセンター配置バージョンほぼ完成かな
私の家の8世代約160人の家系図は、１００％自動描画できるようになりました。
（１００％表示できないことも考えられますし、見やすいように手修正してください）

印刷は、プリンターのポスター印刷機能などを利用して分割印刷し、のり付けすると一覧の巨大な家系図が完成します。

とりあえず、ほぼ完成バージョンをアップします。
excelkakeizu_ver1.68.zipをダウンロード

兄弟を並べて表示するのは、無理だなとあきらめていましたが、
「本人の兄弟は並べて表示してほしいな」とご意見をいただき、また、考えていたら、

ひらめきました

今までコード昇順に1代目から本人→配偶者関係→兄弟関係　2代目と表示してました。そのため、先代関係の子供や孫が次の世代に割り込んできて、兄弟を並べて表示できませんでした。コード降順とか直系からなどと考えましたが、これまた、どこから配置していいか難しく、手のつけようがありませんでした。

ふと、
若い世代から、今の方法で配置すれば兄弟が並ぶのではないか
ちょっと細工をしてやってみたら、兄弟が並んでくれました。今度、親関係が前の世代に割り込みますが、それほど見にくくないようです。
結構いい感じかな？

excelkakeizu_ver1.65.zipをダウンロード

バグ発見しました。列オーバーのとき表示が乱れることがあります。
いろいろ試しては、修正を重ねているため、
直していたはずが、直っていない。
というところが、多々あります
老化防止の趣味のエクセルですのであしからず。
バグ修正と列オーバー時の処理を追加しました。
ま、こんなところでしょう

excelkakeizu_ver1.61.zipをダウンロード

このバージョンからセンター配置にしました。
また、没年月日の表示不具合修正しました。（変な表示になっていました）
センター配置にすることでエクセルの列制限（256列）に引っかかりやすくなりました。
列オーバーの場合表示できませんが、センター位置を変更することで表示できることがありますので、センター位置を変更できるようにしてみました。

なんとか公開できるレベル？？かなと　
excelkakeizu_ver1.6.zipをダウンロード

１００％描画は無理ですね。主に罫線ですが少し手修正が必要です。あしからず。
次は、センター位置を変更しても表示できない場合、表示できなかった人をどこかに表示して手修正でなんとか家系図を完成できるようにすることかな～

また、頭の体操をしました。

配置をいろいろ考えていたら
兄弟関係と配偶者関係を左右に分けてセンターから表示するといいような感じがしました。

今までの配置

センター配置

磯野家は

どれも自動レイアウトの無修正です。
センター配置の方がわかりやすい感じがします。
もう少しすっきりしたら公開します。

気になっていた部分の細かな修正です。
①マクロ（VBA）の見直し修正
②入力シートの入力列と計算式列を整理し配置変更
③家系図の配色を条件書式で追加など

excellkakeizuver1.53.zipをダウンロード

また、頭の体操をしました。
罫線描画を少し修正し、マクロに説明ラベルをつけました。
結構いいところまで自動で描けます。

が、完璧を求めると
根本的なアルゴリズムというか、考え方を変えないとダメみたいです。

頭の体操の域を超えますので、
気が向いたら考えて見ます。
何か、ヒントがあったら教えてください。
エクセル家系図ver1.51.zipをダウンロード

一覧の家系図を手作業で作成するのは、やっぱり大変！
頭の体操をかねて、マクロを使い自動で家系図を描くようにしてみました。
全部自動でと、がんばってみましたが、やっぱりむずかしい
９０％くらいは自動でかけるようです。
微修正は、手作業でするしかありませんが、よければ使ってみてください。
エクセル家系図ver1.5.zipをダウンロード

Ver1.2以前のデータは生年月日及び没年月日を除きコピーして使えます。生年月日及び没年月日は再入力が必要です。

元号のリスト入力と元号の自動表示ができるようにしました。その他細かい部分の修正しました。
家系図全体表示は相変わらず手作業で作るものです。エクセルが使える人は試してみてください。
エクセル家系図ver1.3.zipをダウンロード