[[20141127131150]]　『日付の置換』（ナビ）　ページの最後に飛ぶ

『日付の置換』（ナビ）

日付の置換についてお伺いします。

Ｃ列に標準書式で西暦の４桁の数値、Ｄ列に日付書式で年月日が入っています。

数が多いので一括で変換出来る方法はないでしょうか？

Ｃ列　　Ｄ列
2009　　2014/3/25
2011　　2014/4/6
2010　　2014/11/12
・　　　・
・　　　・
・　　　・

Ｄ列の西暦は、全て2014です。

宜しくお願いします。

＜使用 Excel：Excel2013、使用 OS：Windows7 ＞

 =DATE(C1,MONTH(D1),DAY(D1))
 ということでしょうか？

 ※追記
 もし作業列を使いたくないなら

 Sub 置換()

     Dim r As Range

     For Each r In Selection
        r.Value = DateSerial(r.Offset(0, -1), Month(r.Value), Day(r.Value))
     Next

 End Sub

 D列の必要範囲を選択した状態でマクロを実行すると年の部分が置換されます。
（se_9） 2014/11/27(木) 13:20　追記13:39

（se_9）さん

早速のアドバイス有難う御座います。

最初の関数をＥ列に入力しましたが、計算されず数式がそのまま表示されてしまいます。

書式も標準でも、日付でも同じです。

Ｃ列とＤ列の書式が違うせいでしょうか？

マクロはまだ実行していません。

出来れば、関数だけで行いたいので。
（ナビ） 2014/11/27(木) 14:27

 Ｅ列の表示形式が文字列になっていませんか？
 標準にしてから再度関数を入れてみてください。
（se_9） 2014/11/27(木) 14:58

時間が出来たので、再度チャレンジしたら出来ました。

原因は、=の前に半角スペースが入っていました。

お騒がせしました。

有難う御座いました。

（ナビ） 2014/11/27(木) 15:27

コメント返信：