10/02/27 22:28:51
流れを無視してすみません
VBA初心者ですが質問させてください
Userformでの話なのですが
ボタンが押された際に
TextBoxにセルの値を代入し表示
2秒間隔をあけ、その後フォームを閉じる
という処理を行いたいのですがTextBoxに表示される前にフォームが閉じられてしまいます。
フォームが閉じられる前にTextBoxにテキストを表示させるにはどのような方法をとればいいのでしょうか？
サンプルコードは以下のとおりです。
Private sub CommandButton1_Click()
TextBox1.text = sheets("sheet1").range("A1").value
call delay(2) '2秒ディレイするという命令
Unload Me
endsub
分かりづらいコードで申し訳ないですがご指導のほどお願いいたします。