Improve efficiency of VBA Code

[SpeakEasy]

oops, yes, sorry that first line was an incomplete remnant of some editing nonsense, and should not have been in my post. at all I am going to edit and remove it, as it is misleading.

[menajaro]

Mr SpeakEasy and Mr DocAElstein Thank you very much for both of you.
I really don't believe myself ... The all code is working in high speed. I tested it on the real data and it takes only 2 seconds
Really appreciate you guys help.... Best Regards

[SpeakEasy]

Good to hear it worked with your real data.