[[20040516065507]]　『1900年以前に生まれた人の生年月日』（名無し0516）　ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

　

『1900年以前に生まれた人の生年月日』（名無し0516）

1900年以前に生まれた人物の生年月日の年齢を割り出す関数

---

 ↑相談者様、()には名前を入れてくださいね。
ボード検索ではこちらが見つかりました。↓
[[20031222180236]]『年齢１０１歳以上』（クンクン）
　
ユーザー定義関数ならこんな感じかな？
　
Function n19BF(ByVal Num As String) As String
    Num = DateValue(Format(Now(), "yyyy/mm/dd")) - _
          DateValue(Format(Num, "yyyy/mm/dd"))
    n19BF = "満" & Year(Num) - 1900 & "才"
End Function
　
生年月日の入ったセルをA1とすると、（"1899/10/3"のように入力されている場合）
=n19BF(A1) のように入力して使います。
(KAMIYA)

---

コメント返信：

---

[ 一覧(最新更新順) ]

---

YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.