title: How to add a named sheet at the end of all Excel sheets?
body: <p>I am trying to add an Excel sheet named "Temp" at the end of all existing sheets, but this code is not working:</p>
  
  <pre><code>Private Sub CreateSheet()
      Dim ws As Worksheet
      ws.Name = "Tempo"
      Set ws = Sheets.Add(After:=Sheets(Sheets.Count))
  End Sub
  </code></pre>
  
  <p>Can you please let me know why?</p>