Удаление всех пустых строк в таблице

Для автоматизации подобной задачи проще всего использовать простой макрос. Делаем следующее:

Выберите в меню Сервис - Макрос - Редактор Visual Basic (Tools - Macro - Visual Basic Editor).

В открывшемся окне редактора выберите в меню Insert - Module и в появившийся пустой модуль скопируйте и вставьте следующие строки:

Sub DeleteEmptyRows()
LastRow = ActiveSheet.UsedRange.Row - 1 + _
ActiveSheet.UsedRange.Rows.Count
Application.ScreenUpdating = False
For r = LastRow To 1 Step -1
If Application.CountA(Rows(r)) = 0 Then Rows(r).Delete
Next r
End Sub

Закройте редактор и вернитесь в Excel командой File - Close and return to Microsoft Excel.

В Excel выберите в меню Сервис - Макрос - Макросы (Tools - Macro - Macros). В открывшемся окне будут перечислены все доступные Вам в данный момент для запуска макросы, в том числе только что созданный макрос DeleteEmptyRows. Выберите его и нажмите кнопку Выполнить (Run).

При желании этот макрос можно назначить на любое свободное сочетание клавиш, нажав кнопку Параметры (Options).

Знаете ли Вы, что любой разумный человек скажет, что не может быть улыбки без кота и дыма без огня, что-то там, в космосе, должно быть, теплое, излучающее ЭМ-волны, соответствующее температуре 2.7ºК. Действительно, наблюдаемое космическое микроволновое излучение (CMB) есть тепловое излучение частиц эфира, имеющих температуру 2.7ºK. Еще в начале ХХ века великие химики и физики Д. И. Менделеев и Вальтер Нернст предсказали, что такое излучение (температура) должно обнаруживаться в космосе. В 1933 году проф. Эрих Регенер из Штуттгарта с помощью стратосферных зондов измерил эту температуру. Его измерения дали 2.8ºK - практически точное современное значение. Подробнее читайте в FAQ по эфирной физике.