Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


12453 / 13646 ツリー ←次へ | 前へ→

【10424】日付を漢数字で koshimizu 04/1/26(月) 12:56 質問
【10427】Re:日付を漢数字で ichinose 04/1/26(月) 13:42 回答
【10431】Re:日付を漢数字で koshimizu 04/1/26(月) 15:34 お礼

【10424】日付を漢数字で
質問  koshimizu E-MAIL  - 04/1/26(月) 12:56 -

引用なし
パスワード
   皆様こんにちは。

日付を漢数字に変更は可能でしょうか?。
A列に下記のようなデータが600行あり、B列のようになりませんか。

    A列             B列
昭和61年12月11日   昭和六十一年十二月十一日
昭和60年3月5日     昭和六十年三月五日
昭和59年10月31日   昭和五十九年十月三十一日

変更後、縦書で使用するのですが良い方法がありましたなら、回答をお願いします。

【10427】Re:日付を漢数字で
回答  ichinose  - 04/1/26(月) 13:42 -

引用なし
パスワード
   ▼koshimizu さん:
こんにちは。

>日付を漢数字に変更は可能でしょうか?。
>A列に下記のようなデータが600行あり、B列のようになりませんか。
>
>    A列             B列
>昭和61年12月11日   昭和六十一年十二月十一日
>昭和60年3月5日     昭和六十年三月五日
>昭和59年10月31日   昭和五十九年十月三十一日
>
>変更後、縦書で使用するのですが良い方法がありましたなら、回答をお願いします。

Jakaさんがご教授下さったNumberstringを使用すれば、

「=TEXT(A1,"gggg")&NUMBERSTRING(TEXT(A1,"ee"),1)&"年"&NUMBERSTRING(MONTH(A1),1)&"月"&NUMBERSTRING(DAY(A1),1)&"日"」

こんな感じでしょうか?

【10431】Re:日付を漢数字で
お礼  koshimizu E-MAIL  - 04/1/26(月) 15:34 -

引用なし
パスワード
   ichinose さん
こんにちは。

早速の解答ありがとうございました。
全て打ち変えなければならないと思っていましたが、僅か1分で終わってしまいました。
今後ともよろしくお願い致します。
Jakaさんにもよろしくです。

以上
koshimizuより

12453 / 13646 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free