エクセルの日付表示について

質問

エクセルの日付を1桁ずつ別のセルに表示したいのですが、
何か方法があるでしょうか？

たとえばH20.7.25の場合、
1つのセルに1桁ずつ
シートに↓のように表示したいのですが。
　|　　A　　|　　B　　|　　C　　|　　D　　|　　E　　|　　F　　｜
１|H20.7.25|
２|　　2　　|　　0　　|　　0　　|　　7　　|　　2　　|　　 5　　|
A1の日付を2列目に1桁ずつ表示。
（わかりづらいかもしれませんが・・）

よろしくお願いします。

回答No.5

hallo-2007 · ベストアンサー

No2です。
>平成２０年のように元号での表示はできないものでしょうか？
でしたね
=MID(TEXT($A1,"yyyymmdd"),COLUMN(A1),1)
のTEXT($A1,"yyyymmdd")を
"eemmdd"とか"geemmdd" "ggeemmdd" "gggeemmdd"とかにしてみてください。

お礼

ありがとうございました！
"geemmdd"で、きちんと表示できました。
何度もご回答いただきありがとうございました。

回答No.4

mshr1962

A2=MID(TEXT($A$1,"eemmdd"),COLUMN(),1)
で右へF1までコピー

回答No.3

mu2011

次の方法は如何でしょうか。
A1は日付シリアル値の場合、
A2に=MID(TEXT($A1,"yyyymmdd"),COLUMN(A1),1)を入力、右方向にコピー
A1は日付が文字列の場合、
=MID(TEXT(DATEVALUE($A1),"yyyymmdd"),COLUMN(A1),1)

回答No.2

hallo-2007

A1セルがシリアル値であるとして　
A2セルに
=MID(TEXT($A1,"yyyymmdd"),COLUMN(A1),1)
入れて　右へコピイします。

お礼

ご回答ありがとうございます。
早速試してみたところ、きちんと表示されました。
でもこの場合、西暦で表示されてしまいます。
平成２０年のように元号での表示はできないものでしょうか？

回答No.1

bluepenguin

A2　　=MID(TEXT($A$1,"ge"),2,1)
B2　　=MID(TEXT($A$1,"ge"),3,1)
C2　　=MID(TEXT($A$1,"mm"),1,1)
D2　　=MID(TEXT($A$1,"mm"),2,1)
E2　　=MID(TEXT($A$1,"dd"),1,1)
F2　　=MID(TEXT($A$1,"dd"),2,1)

■A2の式の説明：
TEXT($A$1,"ge")→「H20」と表示されるので、MID関数で、2文字目から1文字だけ切り抜いてます。

識者から、もっといい回答がありそうですが、
こんなのはいかがでしょう？

お礼

ご回答ありがとうございます。
この方法できちんと表示することが出来ました。
まだまだ知らない、使ったことのない関数がたくさんあります。
勉強になりました。