copy range from sheet to another with all formatting

[MKLAQ]

Hi
can anybody help to copy range A2:E from sheet DATA to range E2:I for sheet MAIN with the same formatting ? I don't want loop just copy and paste , there is no condition .
here is the code

Please Login or Register  to view this content.

[davesexcel]

You haven't explained what the problem is.

Please Login or Register  to view this content.

[MKLAQ]

You haven't explained what the problem is.

the problem is error application defined or object defined error with my way
your way works greatly .
thanks very much