エクセルで指定位置に文字を挿入する関数！

エクセルを使用しているのですが、どうしてもわからなかったため
質問させて頂きました。

1000ぐらいのセルに日付が挿入されているのですが、この日付に
指定した位置に文字を挿入したいのですがやり方がわかりません・・・。

H140302　⇒　H14.03.02
20020212　⇒　2002.02.12

上記のようにしたいのですが、どなたかこれを可能にする関数をご存じの方はいらっしゃらないでしょうか。

わかるかたがいらっしゃいましたら宜しくお願いします。

No.2 ベストアンサー 回答者： merlionXX 回答日時： 2009/05/13 09:56

H140302形式の変換なら

=LEFT(A1,3)&","&MID(A1,4,2)&","&RIGHT(A1,2)

20020212形式の変換なら
=LEFT(A1,4)&","&MID(A1,5,2)&","&RIGHT(A1,2)

両者が混在しているなら
=IF(ISERROR(LEFT(A1,1)*1),LEFT(A1,3)&","&MID(A1,4,2)&",",LEFT(A1,4)&","&MID(A1,5,2)&",")&RIGHT(A1,2)

No.4 回答者： imogasi 回答日時： 2009/05/13 15:58

質問の表現が不適当。

＞1000ぐらいのセルに日付が挿入されているのですが
エクセルの話では、日付でなく、日付を表した文字列では無いか。
エクセルでいう日付は、2009/5/15のように入力して、セルの値は日付シリアル値という正の整数がセットされる。
もしそうなら
H14.03.02
のような見た目（表示形式）にするなら
ge.mm.dd
の書式設定でよい。
日付シリアル値というエクセルの重要な概念を理解せずして、こんな質問の正しい表現や問題解決も出来ないのだ。
ーーーー
もし文字列なら一旦日付シリアル値に直して、そこから前記のような書式を設定する。また文字列にしたいときは
=TEXT(A1,"ge.mm.dd")
などを使う。例H14.03.02の場合。
ーーー
H140302を日付シリアル値にするには
A3は'H210515
C3に式
=DATEVALUE(MID(A3,1,3)&"/"&MID(A3,4,2)&"/"&MID(A3,6,2))
C3書式を日付にする

No.3 回答者： mu2011 回答日時： 2009/05/13 10:53

一例です。

=IF(LEN(A1)>7,TEXT(A1,"00!.00!.00"),LEFT(A1,1)&TEXT(RIGHT(A1,LEN(A1)-1)*1,"0!.00!.00"))

No.1 回答者： magician_1 回答日時： 2009/05/13 09:55

A列に日付が入っている物として、B列を挿入し、B列に

=IF(LEFT(A1,1)="H",LEFT(A1,3) & "." & MID(A1,4,2) & "." & RIGHT(A1,2),LEFT(A1,4) & "." & MID(A1,5,2) & "." & RIGHT(A1,2))
この式を下にコピーしてください。