エクセルの表で、元号を数字にして入力しているセル（平成20年5月5日だったら4200505）の列があります。これを西暦表示（2008/05/05）に一括変換するにはどのようにすればよいでしょうか。 お知恵を貸してください。
エクセルの表で、元号を数字にして入力しているセル（平成20年5月5日だったら4200505）の列があります。これを西暦表示（2008/05/05）に一括変換するにはどのようにすればよいでしょうか。 お知恵を貸してください。
数学・1,565閲覧・25
ベストアンサー
A1 セルに 4200505 B1 セルに =DATEVALUE(IF(MID(A1,1,1)="4","H",IF(MID(A1,1,1)="3","S",IF(MID(A1,1,1)="2","T",IF(MID(A1,1,1)="1","M"," "))))&MID(A1,2,2)&"."&MID(A1,4,2)&"."&MID(A1,6,2)) とすれば4200505 は日付シリアル値に換わります。 後は、B1の書式を日付の書式にすれば表示は指定の日付書式に変わります。 一括ということであれば、後はこの式を各セルにコピーすればいいです。 状況に応じて、他にも方法はいろいろありますがこれが一番手っ取り早いかなと思います。 尚、元号は 1=明治 , 2=大正 , 3=昭和 , 4=平成 としています。 【補足】計算式の内容は 先頭1 文字をM , T , S ,Hに置換え、のこりの６桁を 2桁ずつ間に 「.」ピリオドを挿入したものをシリアル値に変換しています。 以上
NEW! この回答はいかがでしたか？ リアクションしてみよう
質問者からのお礼コメント
さっそくやってみました。ありがとうございました。 すっごくたすかりました。
お礼日時：2012/9/24 23:02
