The following is the code I have for moving the blank rows located throughout a table in Excel. When I run the code, it is only moving the 1st and 3rd column blanks down. I have 7 total columns. Any help on this would be much appreciated.
Public Sub main()
Dim oRange As Range
Set oRange...