エクセルのマクロでの満年齢および経過時間の表示

質問

はじめまして、初めて質問させていただきます。

私は、社会福祉施設に勤務しているのですが、
入所されている方のデータをユーザーフォームを使って
管理したいと考えています。
ユーザーフォーム自体は以前に作った事があるのですが
日付のデータは扱ったことがありませんでした。
自動で、入所時の年齢、現在の年齢、入所期間を表示させたいと
考えています。

エクセル上では
　 A 　　　　　　　　B 　　　　　 C 　　　　　　　　D 　　　　 E　　　　　　　　Ｆ
　名前　生年月日　　入所年月日　入所時年齢　現在の年齢　入所期間
1　Aさん　2007/02/21　2008/02/21　　50歳　　　51歳　　　3ヶ月
2　Bさん　2007/02/21　2008/02/21　　55歳　　　62歳　　　6ヶ月
3　Cさん　2007/02/21　2009/02/21　　60歳　　　73歳　　　7ヶ月
4　Dさん　2007/02/21　2010/02/21　　65歳　　　84歳　　　8ヶ月
5　Eさん　2007/02/21　2012/02/21　　70歳　　　90再　　　9ヶ月

というようなデータになっています。（数字は適当です）
マクロでは、datediffを使えば、計算させることはできるのですが
満年齢ではないと、入所した時の年齢などに不整合が生じてしまい
ます。（たとえば、月をまたぐと、一日し変わらないのに入所期間が一月分増えているなど。）
エクセルの関数ではdatedifを使えて楽なのですが…
（datedifを使って上の表を作ることはできます）
マクロで扱うやり方がわかりません。

いくつかのサイトで答えらしきものも見たのですが、
ユーザーフォームを作る以上、変数でも処理しなくてはいけないので
たとえば
Ｃells(gyou,1)
（gyouは行番号をあらわす変数）など
このように変数も使って扱うのでさらに混乱しております。

http://okwave.jp/qa2511599.html
なども参考にしては見たのですが

長々としたので質問の要旨は
1マクロで満年齢、満経過日数を扱う方法
2その際に、変数を使えるのかrenge("a1")などのセル指定以外の　
指定の仕方、cells(1.1)などでも扱えるのか
です。

マクロに関しては、初心者なので、なにとぞよろしく御願いします。

回答No.10

Wendy02

こんばんは。

#2さんの方法の延長として、#8のzap35さんの方法のイベント方式も、試してみる価値はあると思います。

かなり本をお持ちのようですね。VBAの勉強は、体系的に覚えるのがよいのですが、あまり体系的に書かれたものがありません。

>『かんたんプログラミングＥＸＣＥＬＢＶＡ』
>→基礎的な内容らしく、フォームには触れられていません。

私が、長年お勧めしているのは、この本のシリーズですが、フォームは、次の「コントロール・関数編」にあります。ただ、どうも、この本は、細かすぎる傾向があって、まじめな人は、全部読もうとして、挫折する向きがあります。

このシリーズの三部(2007は、今の所、二部まで）の最後まで読み進めると、ちょうど、一通り、入門レベルが終わったことになります。それ以上に、特に、一般の人が何か書籍が必要とは思いません。もし、必要となると、コントロールの辺りは、どうしても、VB6の解説本がないと、何も解説がありません。Office 2003？からは、VB 6 のCommon Dialog Control が入っています。

>『やさしく学ぶエクセルＶＢＡ』
>→満年齢の表示にマクロのdateddiffは使うなと書いてありました。
----
>→満年齢の表示にdateddiffを使っていますが他に操作を
>　している様子があります。該当部分以外の内容もほとんど
>　理解できませんでした。全体的に敷居が高いようです。

私は、何度も、この件は書いていますが、この辺りは、非常に難しいです。人によって、正しいとか間違っているとか言う人がいますが、自分が何を求めているかであって、他に問題を摩り替えてしまうと、一般の人たちは、さっぱり訳がわからなくなってしまいます。

もともと、DATEDIF は、米国の商習慣や慣習の中から生まれたもので、わが国の慣習には、とても似ているものがあるのですが、それと合わないものがあってもしかるべきだと思っています。(この辺りは、インターネット検索してもよいとは思いますが、あまり付和雷同式に、参考にはしなくてよいと思います。）

民法の考え方を紹介しましたが、その中に書かれていた内容のように、「誕生日」や「満年齢」というものは、必ずしも、「365日」で完了になるというような考え方ではありません。そこに矛盾が生じてしまいます。