VBA_カレンダーコントロールの和暦表示

現在、フォーム上にカレンダーコントロールを作成して
クリックされた日付をテキストボックスに返すものを作成しているのですが
カレンダーコントロールの年の表示は西暦になっています。
この部分を和暦にしたいのですが、いじくるところがまったく見当たりません。
何か方法はあるのでしょうか？
ご教授お願いいたします<(_ _)>

No.3 ベストアンサー 回答者： imogasi 回答日時： 2008/07/15 10:18

VBAというからにはエクセルVBAなどでしょう。

（１）フォームやシート状のテキストボックスなどの上
（２）シートのセルの上
などなら、（１）はFormat関数
（２）はセルの表示形式の設定で済むことでは。
（１）（２）で済むことなのか質問にはっきりさせること。
既存カレンダーコントロールの体裁や仕様はいじくれないことになっているはず。
その点どうしても不満なら（趣味の世界と思うが）、拡張機能のコントロールをWEB上で探すとか、カレンダーコントロールなら自作も可能ではと思う。

この回答への補足

説明不足がありまして申し訳ございません。
http://www.h3.dion.ne.jp/~sakatsu/Excel_Tips06_2 …
こちらのページの最上段にあるフォームの絵を使って説明すると
フォームの右上部分に「2003」とコンボボックスで西暦が表示されていますが
この表示形式自体（コンボボックスの表示）を和暦で行いたいのです。

imogasiさんの文章を読むとここはいじくれないのかなと
感じてますがいかがでしょうか。
アドオンなどは使用できないため、いじくれないとなると
和暦カレンダーの自作が必要なのでしょうか。

補足日時：2008/07/15 14:22

No.4 回答者： n-jun 回答日時： 2008/07/16 16:13

横から失礼して。

>和暦カレンダーの自作が必要なのでしょうか。
自作が必要になるかと思います。

リンク先のＶＢ関連の方も和暦への変更は出来ないようです。
アドインもダメだとすると、他には・・・自作かな？っと。

No.2 回答者： n-jun 回答日時： 2008/07/15 07:28

>この部分を和暦にしたいのですが

”この部分”が示すのはTextBox？
それともカレンダーコントロールそのもの？

後者であれば、
Tips06: カレンダーコントロール色々
http://www.h3.dion.ne.jp/~sakatsu/Excel_Tips06.htm
あたりを一読されては？

No.1 回答者： redfox63 回答日時： 2008/07/14 23:43

DateValueとFormatを使えば変換可能ですよ

TextBox1.Text = Format( DateValue( Calendar1.Value ), "gge/mm/dd")
といった具合でしょう
この例ですと平20/07/14 といった具合になります

書式文字列についてはヘルプなどで確認してください