Improve Efficiency of VBA Code

[jonsonbero]

I thank u sincerely for your effort to help me

First of all, thank you so much for your time. Really appreciate that.I tested it on the real data and it works fine. but takes 30 seconds.
I think it would be worthwhile using arrays or using any alternative approach to speed this up. Because I deal with a lot of data.
Is it possible to achieve that? your cooperation is highly appreciated.