Excel VBA で日付を4ケタの数値に変換させるには？

ある日付データを 『月』と『日付』のみの4ケタの"文字列"にさせて表示処理させたいのですが、困っております。

現在、VBAを使用しないで処理させると…こんな感じで困っています。

１．日付を　yyyy/mm/dd　表示
２．編集～ 『/』のみを全て『0』に変換
３．RIGHT関数で4ケタ(または5ケタ)抜き取る

*データ*
日付　　　 yyyy/mm/dd　　変換　　　　　　RIGHT(4ケタ)
1月5日　　2005/1/5 　　　　20050105　　　0105
1月10日 　2005/1/10　　　 200501010　　 0110
　・　　　　・
　・　　　　・

▲不具合状況
１．"1月10日" のように日付が2ケタになる日は "1010" のように表示がずれる。RIGHT(○,5) で対処する方法もあるが…効率があまり良くない。

２．"yyyy/mm/dd"　のデータを直で "RIGHT( )" で処理させると思ったとおりの値が戻ってこない。

yyyy/mm/dd　　　　　　RIGHT()
2005/1/5　　　　→　　　8537　…変な値が戻ってくる？

VBAで一気にやる方法ありますでしょうか？
お知恵を拝借ください！

No.1 ベストアンサー 回答者： AloneAgain 回答日時： 2005/01/17 01:25

こんばんは。

VBAでなくてもいいんですよね？

"2005/1/10" と表示されているセルをA2として、
↓でどうでしょうか？
------------------
=TEXT(A2,"mmdd")
------------------

この回答へのお礼

おおっ！　こんな方法もあったのですか【・_・ ホーなるほど
アドバイスありがとうございました!!!

お礼日時：2005/01/17 01:40