title: Function to get SheetName in Cell
body: <p>I am using this function to enter the sheetname in a cell if cell A1 is not blank. The problem is, when I try to update all sheets with this formula at once, each time I recalculate it renames the cells in ALL sheets to the active sheetname. How can I apply this to a column in ALL sheets so it shows 'that' sheetname?</p>
  
  <pre><code>Function SheetName()
   SheetName = ActiveSheet.Name
  End Function
  </code></pre>
  
  <p>Call using:</p>
  
  <pre><code>=IF(A2="","",SheetName())
  </code></pre>