ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Setting initial value on text box? (https://www.excelbanter.com/excel-programming/385736-setting-initial-value-text-box.html)

Chet

Setting initial value on text box?
 
Does anyone know how to set an initial value on a text box? I want
to go to a specific place on my worksheet and get the value that will
be the initial value and put it into the form that the user will then
either keep or change.

I read a post saying to use a private sub_initialize in my userform
code section that excel created for me and I put this code into it but
the value of Loc never shows up in the actual userform when I run my
code.

Private Sub UserForm1_Initialize()
Dim Loc As Range
Set Loc = Worksheets("Internals").Range("B4").CurrentRegion
TextBox1.Text = Loc
End Sub

Thanks,
Chet


merjet

Setting initial value on text box?
 
Private Sub UserForm_Activate()
TextBox1.Text = Worksheets("Internals").Range("B4")
End Sub

Hth,
Merjet



Tyla

Setting initial value on text box?
 
A non-VBA way of doing this would be simply to set the "ControlSource"
of the TextBox to a named range. The default downside here (or upside,
depending on what you want) is that any change to the value in the
textbox would also change the value in the cell. To prevent that
automatic update behavior, you can set the 'Enabled' property of the
textbox to 'False'

/ Tyla /


On Mar 20, 2:35 pm, "merjet" wrote:
Private Sub UserForm_Activate()
TextBox1.Text = Worksheets("Internals").Range("B4")
End Sub

Hth,
Merjet





All times are GMT +1. The time now is 08:42 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com