[[20040516065507]] 『1900年以前に生まれた人の生年月日』(名無し0516) >>BOT

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

 

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

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


 ↑相談者様、()には名前を入れてくださいね。
ボード検索ではこちらが見つかりました。↓
[[20031222180236]]『年齢101歳以上』(クンクン)
 
ユーザー定義関数ならこんな感じかな?
 
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.