Macro to copy data from one sheet to another

[howard]

I have a macro below to copy data from sheets 996235 & 078925

If Am on aon shet Statement, the macro copies the data from sheets 996235 & 078925 and pastes the data to ssheet "Statement"

However if I run the macro from another sheet the data is not pastes on to sheet Statement

t would be appreciated if someone could amend my code

 Sub Copy_Statement()
Sheets("statement").Range("A1:R2000").ClearContents
Application.ScreenUpdating = False
     Sheets("Import 996235").UsedRange.Copy Destination:=ThisWorkbook.Sheets("statement").Range("A" & Rows.Count).End(xlUp).Offset(1)
    Sheets("Import 078925").UsedRange.Copy Destination:=ThisWorkbook.Sheets("statement").Range("A" & Rows.Count).End(xlUp).Offset(1)
 Application.ScreenUpdating = True

End Sub

 

[shinigamilight]

I ran your code and it worked perfectly fine even from other sheets. What type of error you're getting?

 

[howard]

The Sheet "Statement" is blank when running the macro from another Sheet

Could this be because sheet 078925 is blank ?

 

[howard]

Thanks for your reply

I sorted out the issue. The source data was importing the data from the incorrect folder