Linking Cell value to the value in a text Box

[behrensf84]

Hi, does anyone know how to link a cell value to what is typed in to a text box? what I need is to be able to type into a text box, and then have the cell value update automatically. thanks

 

[BrianExcel]

I don't know that there is a way to do it with the "standard" text box that you use from the "Insert" menu, but you can insert a textbox ActiveX object from the Developer tab, then tie the updated textbox to a cell and do it that way.

Here is some code that updates cell A1 with whatever you place in TextBox1.

Sub TextBox1_LostFocus()Dim sValue As String


sValue = Sheets("Sheet1").TextBox1.Value


With Sheets("Sheet1")
    .Cells(1, 1).Value = sValue
End With


End Sub

 

[Jonmo1]

Also with the ActiveX version of a TextBox
You can right click the textbox and choose Properties, and set the 'LinkedCell' property of that textbox to a range.

 

[BrianExcel]

Very true Jonmo - I forgot to mention that. Great call out.

 

[behrensf84]

Thank you Brian. that works!

 

[behrensf84]

Yes. thanks That Works too!