title: VBA crashes when run, but works when stepped through
body: <p>Answered, see below.</p>
  
  <p>I have a block of code that open a file, copies date from open file, then pastes to a different file. When I step through the code, everything works. When I run through the code, it reboots excel. Thoughts?</p>
  
  <pre><code>Sub copyPastefile()
  Application.ScreenUpdating = False
  Application.Calculation = xlCalculationManual
  Dim currwb, wb1, wb2, wb3, wb4, wb5 As Workbook
  Set currwb= ThisWorkbook
  Set wb1 = Workbooks.Open(Filename:="FileLocation\workbook1.xls")
  
    wb1.Sheets("Sheet1").Range("C9:c11").Copy
    ThisWorkbook.Sheets("wb1").Range("k18").PasteSpecial Paste:=xlPasteValues
    wb1.Sheets("Sheet1").Range("o22:w22").Copy
    ThisWorkbook.Sheets("wb1").Range("e35").PasteSpecial Paste:=xlPasteValues
    wb1.Sheets("Sheet1").Range("b38:I48").Copy
    ThisWorkbook.Sheets("wb1").Range("a5").PasteSpecial Paste:=xlPasteValues
    wb1.Close
    currwb.Sheets("wb1").Range("A1").Activate
  
  Application.ScreenUpdating = True
  Application.Calculation = xlCalculationAutomatic
  
  ThisWorkbook.Activate
  ThisWorkbook.Sheets("Sheet6").Activate
  Range("A1").Activate
  currwb.Save
  MsgBox ("Done")
  </code></pre>
  
  <p>This code then repeats for wb2, wb3, etc, but now pastes into its respective sheet.</p>