將多個工作表合併到兩個主工作表中

我有一張工作簿，其中包含15個工作表，用於不同的業務線。將多個工作表合併到兩個主工作表中

此工作簿是在每張紙上有多個空行的模板。

我想將工作表1,4,7,10和13合併到主表中，只添加非空的行。

此外，我想將表2，5，8，11和14合併到主表中，僅添加非空的行。

我相信這可以用VBA完成，但我不知道該怎麼做。

2017-01-27 Britt C

好問題。我遺漏了我使用Mac的Excel –

如果您下載[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

以下只是您問題的一部分。

該代碼使用過濾器消除第一列上的空白並將數據複製到新工作表中。

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

來源

2017-01-29 14:57:59

將多個工作表合併到兩個主工作表中

回答

相關問題