VBA Delete all empty cells in between

[piva.francesco]

Hi all,

I have a sheet that contains data from Column A to AF, although not all columns are filled.
I would need to have a rather quick macro that deletes all empty cell (by shifting the cells on the left) line by line.

Here is a template of what I have at the start, and what i'd need at the end result.

START

Capture.PNG


END

Capture1.PNG


Not to forget this macro has to run on over 40k lines and columns from A to AZ
So here is a little code I have been trying to make, but with no success.

Please Login or Register  to view this content.

Any help would be very welcome from you guys.

Thank you very much...

[alansidman]

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here



(This thread should receive no further responses until this moderation request is fulfilled, as per Forum Rule 7)

[piva.francesco]

Hi

Sorry I have made mistakes, although I have used the CODE (#) tags.
Could you please change the subject to : "VBA Delete all empty cells in between"

Thank you.

[FDibbins]

Tite changed, as requested.

For future reference, to change a Title on your post, click EDIT POST then Go Advanced and change your title, if 2 days have passed ask a moderator to do it for you.