The Sorting Macro below takes too much computing time. Help me make it more efficient,pls?

[Slone]

Hey, you all!
I wrote this macro myself, so I can only assume it is full of inefficiencies, but can you help me improve it?

It simply aligns an entire table to the right by copy pasting the values of the cells. Unfortunately the looping through the "if" statement makes it super slow, which looks to me like a rather easy task (check if empty, if not -> copy-paste, if yes ->next)
What am I missing here? Can anyone think of a faster way to do this? Funnily enough, I have been using this macro for a few months and I can swear that it used to be faster at the beginning! Either my computer has gone slower or I am getting nuts, neither option particularly exciting.

Please Login or Register  to view this content.

Please Login or Register  to view this content.

[nilem]

maybe something like this

Please Login or Register  to view this content.

[Slone]

It works great and it's obviously a much smarter way to do it.
Can you give me a 3-sentence explanation what is happening there, please? Would be awesome, because I am far away from being a pro and I don't understand how the Macro chooses the CurrentRegion and then resizes the SpecialCells? Also what is the error event that stops the loop?
I don't want to waste your time, just a quick explanation would be great, thanks!