UserFormのTextBoxに入力した値を保存する方法がありますか

質問

UserFormのTextBoxに入力した値を保存する方法がありますか？

具体的には、UserFormのTextBoxに2010/6/10と入力したときに

シートのセルT13に表示されるように以下のマクロを作成しました。

Private Sub CommandButton1_Click()
Range("T13").Value = 日付.Value
If CloseMode = vbFormControlMenu Then
Cancel = True
Me.Hide
End If
End Sub

再度UserFormを開くと前の入力内容があるのですがExcelを保存

して閉じて再度シートを開くと空白になってしまいます。

UserFormを開いたタイミングで出力させたT13の値を返すという

ようなマクロにするにはどうしたらよいでしょうか。

初心者なので詳しく教えていただけませんか。

回答No.2

hige_082 · ベストアンサー

保存する機能はありません
今回のような場合なら

'userformモジュールへ
Private Sub UserForm_Initialize()
日付.Value = Range("T13").Value
End Sub

の追加で対応できると思います

参考まで

お礼

ありがとうございます。
うまくいきました。
今までは複数の入力をTextBoxに行うので
どれか一つが変更になったら全て最初から
入力しなければいけなかったのが今回の回
答で修正箇所のみの入力で済み非常に使い
易くなりました。
本当にありがとうございます。