Как автоматически удалить пустую строку / ячейки при экспорте на другой лист?

У меня есть несколько файлов необработанных данных, которые некоторые строки / ячейки не имеют данных. Как автоматически удалять эти пустые строки / ячейки при перемещении / экспорте данных в другой рабочий лист. какую формулу я должен использовать для этого?

я прикрепил изображение ниже. для более ясного объяснения.

Picture example

17
задан fixer1234
27.02.2023 6:27 Количество просмотров материала 3296
Распечатать страницу

2 ответа

Я хотел бы предложить Вам макрос (код VBA), поможет вам удалить все пустые строки из используемого диапазона, а затем после того, как вы можете экспортировать лист.

Sub DeleteEmptyRows()

  Dim lastRow As Long
  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
  End if

Next r

End Sub

как работает:

  • пресс Alt+F11 открыть редактор VB.
  • скопируйте и вставьте этот код в стандартный модуль.
  • наконец, запустите этот макрос.
1
отвечен Rajesh S 2023-02-28 14:15

Это можно легко сделать, если выбрать только ячейки с данными, а затем скопировать / вставить:

  1. выделите весь диапазон (A2: A13),
  2. Нажмите F5 (Перейти),
  3. Нажмите Кнопку Специальный...,
  4. выберите "константы", затем OK
  5. Ctrl-C копировать
  6. вставить в новое место (B2)

Если это формулы, а не константы, вы можете выбрать "формулы" на шаге 4.

1
отвечен Rob Gale 2023-02-28 16:32

Постоянная ссылка на данную страницу: [ Скопировать ссылку | Сгенерировать QR-код ]

Ваш ответ

Опубликуйте как Гость или авторизуйтесь

Имя
Вверх