Text box last entry

[art]

Hello:

How can I make that a textbox in a userform should remember the users entry
even when it was unloaded already?

Thanks
Art

 

[Simon Lloyd]

You need to assign a public variable on a standard module and have tha
variable equal the textbox, when the userform is unloaded the publi
variable unless set to nothing will be the last value of the textbox

--
Simon Lloy

Regards,
Simon Lloyd
'www.thecodecage.com' (http://www.thecodecage.com

 

[Mike H]

Hi,

You could capture the value when the iserform closes and store it and then
re-load the value when the userform next loads.

Private Sub UserForm_Activate()
TextBox1.Text = Sheets("Sheet1").Range("A1").Value
End Sub

Private Sub UserForm_Terminate()
Sheets("Sheet1").Range("A1").Value = TextBox1.Text
End Sub

Mike