[[20030123161501]]　『昭和３３年０３月０３日の０を表示しないように』（けん）　ページの最後に飛ぶ

『昭和３３年０３月０３日の０を表示しないように』（けん）

はじめまして

生年月日の表示方法について教えて下さい

昭和３３年０３月０３日を昭和３３年　３月　３日と”０”を表示しないようにしたいのですが…（けん）

 セルの書式設定「表示形式」【ユーザー定義】でggge"年"mm"月"dd"日"に設定されています。

「表示形式」【日付】平成○年○月○日を選択すれば、ggge"年"m"月"d"日"に設定されて

昭和３３年３月３日となります。

昭和３３年　３月　３日と”０”を表示しないようにして、空白と置換え桁揃えをしたいであれば

書式設定では出来ないようです。

そこで、実験的に関数でやってみました。

パターンは月日が一桁、月が二桁と日が一桁、月が一桁と日が二桁、月日が二桁の４パターンになるので

H1:H4に下記のように書式を入力

ggge"年　"m"月　"d"日"

ggge"年　"m"月"d"日"

ggge"年"m"月　"d"日"

ggge"年"m"月"d"日"

A1に日付入力しB1に次の式を入力すれば表示されます。

 =IF(AND(MONTH(A1)<10,DAY(A1)<10),TEXT(A1,$H$1),IF(AND(MONTH(A1)<10,DAY(A1)>=10),TEXT(A1,$H$2),IF(AND(MONTH(A1)>=10,DAY(A1)<10),TEXT(A1,$H$3),TEXT(A1,$H$4))))

しかし、この表示は文字列表示になりますから、年齢を求めたり、経過日数を求めることはできません。

どうして、このような表示にこだわれるのか理由をお聞かせ下さい。

 （シニア）

シニアさんと同じ疑問がありますが、表示が文字列（テキスト）表示でよければ下記の関数でも表示できますので下記関数をセルＢ１に入れて

セルＡ１に日付を入力してみて下さい。(シニアさん割り込みご容赦願います）

 =IF(A1="","",SUBSTITUTE(SUBSTITUTE(TEXT(A1,"ggge""年""mm""月""dd""日"""),"年0","年 "),"月0","月 "))

和暦の年まで桁揃え（昭和５年を昭和　５年と）したい場合は関数が長くなりますが下記です

=IF(A1="","",IF(MID(TEXT(A1,"gggee""年""mm""月""dd""日"""),3,1)="0",REPLACE(SUBSTITUTE(SUBSTITUTE(TEXT(A1,"gggee""年""mm""月""dd""日"""),"年0","年 "),"月0","月 "),3,1," "),SUBSTITUTE(SUBSTITUTE(TEXT(A1,"gggee""年""mm""月""dd""日"""),"年0","年 "),"月0","月 ")))

 ／／以上（老人ライダー）　ところでこの掲示板に１行改行が入れられないですが、小生のＰＣ設定でしょうか？

たぶん今更でしょうが、私も質問者と同様のことをしたくここにたどりつきました。

日本での年月日にはあまり０表示はしないと思います。

そこまでは疑問にあまり持たないかと思います。

疑問に思ってしまうのは、普通に文字をつなげればいいじゃんと思うからでしょう。

しかし、届出書や契約書等などのフォーマットは　年　月　日の位置が固定で

そこに手書きをするのがアナログ時代の書き方かなと思います。

とすると、昭和33年 3月 3日も昭和 3年12月31日も同じ位置に年月日を表示させたくなります。

私がそうです。だから質問者と同様の表示にこだわりたくなるのです。

つまりもともとの

以下できたらPのつかない等幅フォントなどで見ていただきたいです。
昭和33年 3月 3日
昭和 3年12月31日
昭和33年3月3日
昭和3年12月31日
このがたがたをなくしたい・・

(とある事務員)

 古いスレですが面白そうなんで

 =SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(TEXT(A1,"あee年mm月dd日"),"年0","年 "),"月0","月 "),"あ0","あ "),"あ",TEXT(A1,"gggg"))

 =TEXT(A1,"gggg")&TEXT(TEXT(A1,"ee"),"?0")&SUBSTITUTE(SUBSTITUTE(TEXT(A1,"年mm月dd日"),"年0","年 "),"月0","月 ")

 (GobGob)

 これはどうか？
 =IF(A1="","",TEXT(A1,"gggg")&TEXT(TEXT(A1,"e"),"??年")&TEXT(MONTH(A1),"??月")&TEXT(DAY(A1),"??日"))
 (ねむねむ)

 ＞たぶん今更でしょうが

 今更ってことではないかもです。

 現在は、2007以降のバージョンが出ているので、書式で対応できます。

 (条件付き書式ですけどね。)

 春日野馨さんの回答が余所の板にあります。
 【日付の和暦表示を0を表示させずに二桁にそろえるには】
http://www.efcit.co.jp/cgi-bin2/exqalounge.cgi?print+201210/12100012.txt

 (半平太) 2013/05/17(Fri) 14:02

 ＞半平太さん

 これは便利ですねー。

 いまだExcel2010に慣れていないｗｗｗ

 (GobGob)

 ただ、設定がめんどーではあります。

 一つのセルに作っておけば、必要になった都度、
 そのセルのコピーで行けるのでしょうけどね。

 兎に角、めんどーの一言に尽きます。
 誰かが、マクロを作ってくれるのを待っている状況です。

 ちなみに、マクロの自動記録では、まともなコードが出来上がってこないです。
 ExecuteExcel4Macro なんてのが出てきて、動かないです。
  (おいおい、最新版の機能に何でそんなもんが出てくんの、って感じ。）

 (半平太) 2013/05/17(Fri) 16:47

コメント返信：

[ 一覧(最新更新順) ]

[[20030123161501]] 『昭和３３年０３月０３日の０を表示しないように』（けん） ページの最後に飛ぶ

[[20030123161501]]　『昭和３３年０３月０３日の０を表示しないように』（けん）　ページの最後に飛ぶ