Transferring Data from Code to a Textbox in the Form

[TomP]

I have a value collected from a code and have cell assignment.

Dim SMPL as String

Range "A1" = String

I started to create a form and textbox along with the common OK and cancel
button, but is there a simple way to pass a string value to a form?

When I ran the code and initialized the form the text box would show
Me.Change1.Value=(SMPL).

*** From a Form ***

Private Sub Change1Text_Change()

Me.Change1.Value = (SMPL)

End Sub

My intention is to create a checkbox next to the texbox. If the checkbox =
true then the string will be placed in the cell. If the checkbox = false,
then the string will be null and not printed.

The reason I am asking this because at times, the "user" will need to have
the option to select all or portions of the data collected.

Thank you,

Tom

 

[JLGWhiz]

Assumiong that SMPL is the variable in the basic code. If your code to
assign the value is in the UserForm code module somewhere:

Me.TextBox1.Value = SMPL

If you want to assign the value from another code module, you would have to
make the UserForm run modeless or hide it so that the othe code would ruin.
And you would have to specifically use the UserForm name instead of Me.

 

[JLGWhiz]

P.S. SMPL would have to be a public variable to be used between modules.

 

[TomP]

I initialized the form at the beginning of the module and hide to give it a
chance to find a value. I entered the the code as shown in your example and
when the form appears, no text will appear on the textbox. I even made sure
that the variables are public. Is there anything else I need to check for on
the form or properties?

Thank you,

 

[TomP]

Thank you for your help! I got it to work...

Tom