If you get this I am having trouble Debugging the first four lines.

Sub PrintReports9()
Dim myCell As Range

For Each myCell In Range("BALANCES04").Range("A9"), _
Worksheets("BALANCES04").Range("A65536").End(xlUp) )
With Worksheets("STATEMENT")
.Range("C11").Value = myCell.Value
.Range("D24").Value = myCell(1, 2).Value
.Range("J11").Value = myCell(1, 3).Value
.Range("H25").Value = myCell(1, 6).Value
.Range("J32").Value = myCell(1, 13).Value
.Range("J34").Value = myCell(1, 14).Value
.PrintOut
End With
Next myCell

End Sub

The Debug says Syntax Error. The only thing I changed was PrintReports from
2 to a 9 & The third line Range("2") to Range("9")

I don't know what to do.

Julian