title: Rename a sheet with TextBox value
body: <p>I have a Form, and I wnat to rename the sheet. Actually, program does it correctly, but when I want to use .Activate function I get an error : Type mismatch</p>
  
  <pre><code>Worksheets.Add().name = UserForm1.txtNameSur
  
  Worksheets(UserForm1.txtNameSur).Activate
  </code></pre>
  
  <p>I've also tried </p>
  
  <pre><code>Worksheets("&amp;UserForm1.txtNameSur&amp;").Activate
  </code></pre>
  
  <p>Still the same.</p>
  
  <p>Thanks!</p>