• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:ユーザーフォームに今日の日付を)

ユーザーフォームに今日の日付を設定する方法

このQ&Aのポイント
  • ユーザーフォームでの日付の表示方法について質問があります。現在のマクロでは、ユーザーフォームを立ち上げるとテキストボックスに日付が表示されない状況です。原因を特定し、日付が正しく表示されるようにする方法を教えてください。
  • WIN7 EXCELL2010を使用しているユーザーフォームで、テキストボックスに今日の日付を表示させる方法を知りたいです。現在のマクロでは日付が表示されず、正しく動作していません。どの部分に問題があるのか、正しい表示方法を教えてください。
  • ユーザーフォームのテキストボックスに今日の日付を表示する方法がわかりません。マクロを作成しましたが、テキストボックスに日付が表示されません。どのように修正すればいいのか、詳しい手順を教えてください。

質問者が選んだベストアンサー

  • ベストアンサー
  • keithin
  • ベストアンサー率66% (5278/7941)
回答No.2

>上のマクロのどこがいけないのか そのマクロはコマンドボタン1をクリックしたときに実行される内容です。 >USERFORM1 を立ち上げたときに TEXT BOX1 に今日の日付が出るようにしたい private sub UserForm_Initialize()  me.textbox1 = format(date, "yy/mm") end sub とかで。 敢えて今のマクロを活かすなら,initializeイベントの中にcommandbutton1をクリックさせる(という動作に相当するマクロ)を代わりに書いても構いませんが。

dorasuke
質問者

お礼

早速ご回答いただきありがとうございました。 試させていただいた結果上手くできました。

その他の回答 (1)

回答No.1

1行目のコマンドボタンクリックの記述を、以下のように書き換えてください。 Private Sub UserForm_activate() 要は、コマンドボタンのクリックイベントとして書いてあるので、ボタンを押さないと実行されないのです。 あとは、ユーザーフォームにきちんとテキストBOXが設置されているか(連番が1~4になっているか)などを確認してください。

dorasuke
質問者

補足

折角ご回答いただき試しましたが B列に 「FALSE」 とエラーが出ます。

関連するQ&A