エクセル 日付の変換

エクセルで日付の書式を変えたいのですが、一括でできる方法はないでしょうか。現在二つ書式がありまして。それをＨ○○　Ｓ○○とうふうにしたいです。

○○○○年→Ｈ○○

○○/○○/○○→Ｈ○○

No.6 回答者： mshr1962 回答日時： 2006/11/06 14:03

最初のなら

=TEXT((A1&"12月31日")*1,"gee")
後のなら
=TEXT(A1,"gee")

最初の場合　1989年は"H01"になります。
後の場合　1989/1/7まで"S64"、1989/1/8以降は"H01"になります。

No.5 回答者： ham_kamo 回答日時： 2006/11/06 13:53

セルの書式設定で、表示形式のユーザー定義で　ge　とすればいいのでは。

○○○○年、というのが文字列だとすると、数値の部分を取りだして
=DATE(LEFT(A1,4),1,1)
として、表示形式を同じく ge と設定すればいいと思います。

No.4 回答者： ZEBRRA 回答日時： 2006/11/06 13:48

一括変換ということであれば、変換したいセルを一まとめにして右クリックの”セルの書式設定”のユーザー定義で直接　ge"年"　と入力すれば変わると思いますが。

No.3 回答者： koko88okok 回答日時： 2006/11/06 13:44

セルの表示形式を変更する方法です。

1) 対象のすべてのセルを選択します。
2) メニューバーの「書式」→「セル」をクリックします。

3) 表示されるダイアログで「表示形式」タブを開きます。
4) 左の「日付」をクリックし、H13.3.14 をクリックして「OK」を押します。

No.2 回答者： hirorin00 回答日時： 2006/11/06 13:03

１番です。

昭和もありですか…

では
下の回答の順番で…
「=TEXT((VALUE(LEFT(A1,4))-1899)*365,"gyy")」
「=TEXT((A1-1899)*365,"gyy")」
「=IF(VALUE(LEFT(A3,2))<20,TEXT((VALUE("20"&LEFT(A3,2))-1899)*365,"gyy"),TEXT((VALUE("19"&LEFT(A3,2))-1899)*365,"gyy"))」
「=TEXT(A1,"gyy")」

ただし３番目のは19年までは2000年代、20年から99年は1900年代ということにしました。

今度は大丈夫と思います。

No.1 回答者： hirorin00 回答日時： 2006/11/06 12:48

はじめまして

A1にもとデータがありB1に変換するとして…

>○○○○年→Ｈ○○
元のデータが文字列でしたら
B1セルに「="H"&VALUE(LEFT(A1,4))-1988」

元データがただの数値だったら
B1セルに「="H"&A1-1988」

>○○/○○/○○→Ｈ○○
元のデータが文字列だったら
B1セルに「="H"&VALUE("20"&LEFT(A1,2))-1988」

元のデータが数値だったら
B1セルに「=TEXT(A1,"gyy")」

これでいかがでしょうか？