エクセルで生没年グラフ

質問

社会の便覧に載っていたような人物の生没年グラフを作成したいと思っています。
↓イメージとしてはこんな感じです。
http://www3.kcn.ne.jp/~tomate/JavaScript/startend.html

こういったものをエクセルで作成する方法を教えてください。
よろしくお願いします。

回答No.4

Bubuca

こんにちは　＃３です。

オフィス２００４なんですが、グラフを選ぶときにユーザー設定の中に
「フローティング横棒」というのがあります。

これだと「生年」と「生存年数（没年齢）」でグラフがかけます。
立体的な表現になってますが、底面の４角（マウスポインタを持って行くと
コーナーと表示される）をドラッグして奥行きを０にして平面のグラフにできます。色もお好みに変えれば、それなりのグラフになると思います。

＃３で書いたような面倒なことは必要なかったですね　(^_^;

回答No.3

Bubuca

こんにちは

積み上げ横棒グラフを応用するといいかもしれません。
一番早く生まれた人よりも前の切りのいい年を基準にして、そこから生まれ
た年までの年数を計算してダミーデータとします。
没年から生年を引いて生存年数を出します。
どちらも日付フォーマットではなくて４桁の数字として扱います。
ダミーデータと生存年数を重ね横棒グラフにします。
ダミーデータの塗りつぶしと線をなしにして、凡例も消します。
こうすれば、だいたいお望みのグラフになると思います。
生没年が必要ならテキストボックスで入れて行けばいいんじゃないでしょうか。
問題は軸目盛ですね。表示しなければいいのですが、どうしても年号として
表示したい場合はXY Chart Labelerというユーティリティを試してください。
http://appspro.com/Utilities/ChartLabeler.htm

エクセルのグラフのテクニックをたくさん教えてくれるサイトがあります。
http://peltiertech.com/Excel/Charts/index.html

この中のフローティングカラムというところが参考になると思います。
http://peltiertech.com/Excel/Charts/FloatingColumns.html

前にも一度紹介したことがあるのですが、驚くようなテクニック満載です。

回答No.2

imogasi

VBAでやれば簡単です。
セルのA列に氏名
B列に生年
C列に没年
を「西暦」で入れておく。
ーーーー
等高（.Height)の長方形のバーをシートに貼り付ける。生年の位置（.Left)から,享年（没年ー生年）の長さにします。
次の人に行くために等間隔下（.Top)に,上記のことを繰り返す。
氏名、生年、没年はラベル等で貼り付ける。
良ければVBAコードをつくリますが。
ーーー
セルを直接使うと１セルの途中から色変えなどできないので、２、３
年の違いが表しにくいでしょう。

補足

ご回答ありがとうございます。
VBA、私でも扱えるでしょうか？

>良ければVBAコードをつくリますが

お気持ちは嬉しいのですが、仮にVBAコードをつくっていただいたとして、私に使いこなせるでしょうか？ちなみにVBAは一度も使ったことのない初心者です。

回答No.1

toshi_2000

例えばB列に生年、D列に没年、C列にその平均値の式を入力します。
そのデータを元に株価チャートを使用すればどうでしょう。

補足

ご回答ありがとうございます。
株価チャートを使用するということはバーが縦になってしまいますよね。
欲をいえば横棒グラフにしたいのです。