VBA - Jak przyspieszyć makro liczące przerwy między datami dla 340000 wierszy?

Witam,
Napisałem makro które wylicza mi przerwy pomiędzy datami wystawionych faktur, wszystko działa tak jak chciałem ale tylko na małej ilości danych. Mam do sprawdzenia 340000 wiersz i trwa to za długo. Proszę o pomoc.

Powinno to pomóc.

spróbuj to wpisać zaraz na początku oraz na końcu przed End


ja mam w swoim arkuszu tylko do sprawdzania kolumny od A do ZZ i 25000 wierszy i czasami makro trwało od 5 do 30 minut :/
Teraz śmiga w sekundach.

A wstaw no spakowany plik z przykładowymi danymi...