dポイントプレゼントキャンペーン実施中!

Excel2007のVBAにて日付の置換ができなく困っております。

対象の複数列に入力されている下記の様なデータの内、日付の"yyyy/m/d"を
"yyyy年m月d日"に置換しなくてはなりません。
※書式設定ではなく、文字列として変換

入力例
1)2011/12/13
2)2011/12/1~2011/12/13
3)2011年12月13日
4)2011/12/1~2011/12/13の毎火曜

ヒントでも構いませんので、宜しくお願い致します。

A 回答 (11件中11~11件)

入力例にあるパターンだけでいいのならば以下のように処理しては如何でしょうか。



スラッシュの個数を調べる
 2個の場合
  1個目のスラッシュを"年"に置換
  2個目のスラッシュを"月"に置換
  2個目のスラッシュの後の文字を1文字ずつ調べて、数値で無くなった時そのひとつ前に"日"を挿入
(文字列終端に達した場合はそこに"日"を付け加える)
 4個の場合
  1個目のスラッシュを"年"に置換
  2個目のスラッシュを"月"に置換
  2個目のスラッシュの後の文字を1文字ずつ調べて、数値で無くなった時そのひとつ前に"日"を挿入
  3個目のスラッシュを"年"に置換
  4個目のスラッシュを"月"に置換
  4個目のスラッシュの後の文字を1文字ずつ調べて、数値で無くなった時そのひとつ前に"日"を挿入
(文字列終端に達した場合はそこに"日"を付け加える)

  
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています