title: Simple Copy/Paste Loop not working on each worksheet
body: <p>I'm trying to loop through all the worksheets in my workbook. On each sheet, I'd like to copy a value from one cell, and paste the value on a different cell in that worksheet, and then continue on through the workbook. The code I've written loops through all the worksheets but only performs the copy paste on the sheet its on when the macro is run...</p>
  
  <pre><code>Sub CleanUp()
  
  Dim ws as Worksheet
  
  For Each ws in ThisWorkbook.Sheets
      Range("BB2").Copy Range("A1")
  Next ws
  
  End Sub
  </code></pre>
  
  <p>In actuality, I want to run a more complicated series of alterations, but I can't even get this to work right.</p>