title: Replace Excel Cell Value with Text Box Input in VBA Form
body: <p>I have created a simple form in <strong>Excel 201</strong>0 in which I wish to replace the individual text string value in 11 cells in the cell range <code>B5 : B15</code></p>
  
  <p>I have used this code to test the first cell at <code>B5</code> which is referenced in <code>A5</code> by the Label Christian Name and I have labelled the text box on the form Christian_Input:</p>
  
  <pre><code>Private Sub Christian_Input_Change()
  
  ThisWorkbook.Worksheets("Sheet1").Cells(5, 1) = Christian_Input.Text
  End Sub
  </code></pre>
  
  <p>When I enter a new text string in the form and run it, the form simply appears over my Sheet1 with the replacement text in the input text box but the text string in cell <code>B5</code> is neither highlighted or replaced.</p>
  
  <p>Finally when I open the file the form is not visible.</p>
  
  <p>Can anyone please advise what alterations I need to make.</p>