2017-01-27 3 views
0

У меня есть книга с 15 листами для разных бизнес-линий.объединить несколько листов в два основных листа

Эта книга представляет собой шаблон с несколькими пустыми рядами на каждом листе.

Я хотел бы объединить листы 1, 4, 7, 10 и 13 в мастер-лист, который добавляет только строки, которые не пусты.

Кроме того, я хотел бы объединить листы 2, 5, 8, 11 и 14 в мастер-лист, который добавляет только строки, которые не пусты.

Я считаю, что это можно сделать с помощью VBA, но я не знаю, как это сделать.

+0

Хороший вопрос. Я забыл, что использую Excel для Mac –

+0

Если вы загрузите [драйвер ODBC] (https://support.office.com/en-us/article/ODBC-drivers-that-are-compatible-with-Excel-for -Mac-9FA6BC7F-D19E-4F7F-9BE4-92E85C77D712) для Mac Excel, вы можете запускать SQL-запросы в книгах, в частности, объединять запросы с предложениями WHERE, чтобы отфильтровать пустую строку. – Parfait

ответ

0

Ниже приведена только часть вашей проблемы.

Этот код использует фильтр для устранения пробелов в первом столбце и копирования данных на новый лист.

Sub SelectNonBlankAndPasteonNewSheet() 

    Cells.Select 
    Selection.AutoFilter 

    With Selection 

     .AutoFilter Field:=1, Criteria1:="<>" 
     .SpecialCells(xlCellTypeVisible).Copy 

    End With 

    Sheets.Add After:=ActiveSheet 
    ActiveSheet.Paste 
End Sub 
Смежные вопросы