Vba Code - Copy/Paste rows from one workbook to another

[ksamokovliev]

Dear All,

I'm newmember of your forum , but I use it very often to know more about vba codes.

I have read a lot of posts and comments about following issue , but I did not found solution for mine.

I want to create vba code which copy rows from one workbook to another workbook based on date criteria - one of column ( inputing - starting date /ending date)

If you help me to solve this issue I will safe a lot of time for copy and pasting information



Be healthy!

 

[Joe4]

There are a few reasons why the code could be slow.

Firstly, loops are generally slow and inefficient, and can be slow if you have a lot of data to go through.
It is possible to try to use Advanced Filters instead, though that would be a bit more complex.

But there are also other reasons your code could be slow, such as if you have any VBA code interfering with it, especialyl Event Procedure VBA code which is code that automatically runs on some event happening.

You can try temporarily disabling events and calculations while the code runs to see if that makes it any faster.

So at the top of the code where this line exists:

Application.ScreenUpdating = False

add these two lines:

Application.Calculation = xlCalculationManual
Application.EnableEvents = False

and then at the bottom of your code where you have this line:

Application.ScreenUpdating = True

add these two lines:

Application.Calculation = xlCalculationAutomatic
Application.EnableEvents = True

 

[ksamokovliev]

There are a few reasons why the code could be slow.

Firstly, loops are generally slow and inefficient, and can be slow if you have a lot of data to go through.
It is possible to try to use Advanced Filters instead, though that would be a bit more complex.

But there are also other reasons your code could be slow, such as if you have any VBA code interfering with it, especialyl Event Procedure VBA code which is code that automatically runs on some event happening.

You can try temporarily disabling events and calculations while the code runs to see if that makes it any faster.

So at the top of the code where this line exists:

Application.ScreenUpdating = False

add these two lines:

Application.Calculation = xlCalculationManual
Application.EnableEvents = False

and then at the bottom of your code where you have this line:

Application.ScreenUpdating = True

add these two lines:

Application.Calculation = xlCalculationAutomatic
Application.EnableEvents = True

U r the best!
Thank you Joe4 , now everything works as I want.
Cheers!!!

 

[Joe4]

Excellent!
Glad to hear it!


BTW, I am re-marking the original code reply as the solution, as the code worked, you just needed some other improvements. If a newcomer looked at the question and the last reply that was marked as the solution, it doesn't make much sense without the original code that worked.

 

[ksamokovliev]

Excellent!
Glad to hear it!


BTW, I am re-marking the original code reply as the solution, as the code worked, you just needed some other improvements. If a newcomer looked at the question and the last reply that was marked as the solution, it doesn't make much sense without the original code that worked.

Great! You are right.
My mistake.
I'm so glad that this forum offer me so professional helping with finding/creating solution. You and Mr Excel team are very helpful!
Be healthy !