![]() |
Transferring Data from Code to a Textbox in the Form
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 |
Transferring Data from Code to a Textbox in the Form
Assumiong that SMPL is the variable in the basic code. If your code to
assign the value is in the UserForm code module somewhe 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. "TomP" wrote: 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 |
Transferring Data from Code to a Textbox in the Form
P.S. SMPL would have to be a public variable to be used between modules.
"TomP" wrote: 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 |
Transferring Data from Code to a Textbox in the Form
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, "JLGWhiz" wrote: Assumiong that SMPL is the variable in the basic code. If your code to assign the value is in the UserForm code module somewhe 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. "TomP" wrote: 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 |
Transferring Data from Code to a Textbox in the Form
Thank you for your help! I got it to work...
Tom "JLGWhiz" wrote: P.S. SMPL would have to be a public variable to be used between modules. "TomP" wrote: 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 |
All times are GMT +1. The time now is 06:45 AM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com