vba help to shorten the my code...

[malleshg24]

Hi Team,


I want to Copy Paste Data from Dataworkbook to Masterworkbook.
copying of 4 Datasheet one by one and pasting in Masterworkbooks sheets one by one excluding header.

My code works but is it possible to shorten the code?... 

Thanks in advance for your precious time. 






Regards,
Mallesh