I have a macro to delete blank cells in each row and shift the next cell to the left. The code is not showing any errors, but does nothing.