title: Rename Excel Sheet with VBA Macro
body: <p>I want to ask about rename the excel sheet, i want to rename the sheet with new name : older name + _v1. </p>
  
  <p>So if my current sheet name is <em>test</em>, then I want the new name <em>test_v1</em>.</p>
  
  <p>I only know the standard vba for rename excel sheet which is renaming excel sheet by the sheet content.</p>
  
  <pre><code>Sub Test()
  
  Dim WS As Worksheet
  
  For Each WS In Sheets
     WS.Name = WS.Range("A5")
  Next WS
  End Sub
  </code></pre>