Copy destination:= is extremely slow with small range???

Thank you for the suggestion. Unfortunately it didn't make any difference, still takes 31 seconds.

What about adding

Please Login or Register  to view this content.

at the start of the code &

Please Login or Register  to view this content.

at the end.

Unfortunately no change.

Can you share a desensitised version of your workbook, as your code takes 0.5 seconds for me.


Click on GO ADVANCED and then scroll down to Manage Attachments to open the upload window.

Probably should've done that from the beginning...I've attached test.xlsx to the original post.
Thanks.

Thanks for the file, but it still only takes me 0.5 seconds for your code to run.
So there must be something else going on.
If you step through the code using F8 where does it get hung-up?

It doesn't hangs anywhere for the most part, but sometimes it takes a second or two on SR.Copy Destination:=DR line.
I've added

Please Login or Register  to view this content.

before the "copy" line and held F8 button, it only revealed that it hands inconsistently through out the loop and only on that line.

Just tested on another computer also with MS Office 2019 and it does exactly same thing. Maybe it's this version related? I didn't change any settings in the application itself. Also maybe worth mention, task manager shows 0% usage from excel.exe

As the suggestions already made don't make a difference to the time & there's no obvious point at which your code gets hung-up, I'm afraid I'm at a loss & cannot help any further.

I took the liberty of reformatting your form to remove merged cells. With it, this code ran instantaneously...

Please Login or Register  to view this content.

@vanown
Hi
we understand you value your privacy, but, OTOH, using " here" as location does not help other members when they try to help you, as, in some cases, regional settings can play an important part in helping you.
So , please adapt your profile.
Thank you

Very interesting, your code works lightning fast even with my original template (with merged cells), except it doesn't copy rows height, a minor issue, which can be fixed.
It does however changes data in each copy by increasing all found numbers, which also easily fixed by changing autofill line to

Please Login or Register  to view this content.

So far all evidences point out something wrong with my Office/computer...just tested with different version on virtual computer it worked fine there, installed exactly the same OS and Office on this computer and..same issue..

Your new profile does not help much...