2017-01-27 23 views
0

Ich habe eine Arbeitsmappe mit 15 Blatt für verschiedene Geschäftsbereiche.konsolidieren mehrere Blätter in zwei Master-Blätter

Diese Arbeitsmappe ist eine Vorlage mit mehreren leeren Zeilen auf jedem Blatt.

Ich möchte die Blätter 1, 4, 7, 10 und 13 in einem Masterblatt zusammenführen, das nur Zeilen hinzufügt, die nicht leer sind.

Zusätzlich möchte ich die Blätter 2, 5, 8, 11 und 14 in einem Masterblatt zusammenführen, das nur Zeilen hinzufügt, die nicht leer sind.

Ich glaube, dass dies mit VBA getan werden kann, aber ich weiß nicht, wie das geht.

+0

Gute Frage. Ich habe weggelassen, dass ich Excel für Mac verwende –

+0

Wenn Sie einen [ODBC-Treiber] herunterladen (https://support.office.com/en-us/article/ODBC-driver-that-are-compatible-with-Excel-for -Mac-9FA6BC7F-D19E-4F7F-9BE4-92E85C77D712) für Mac Excel, können Sie SQL-Abfragen auf Arbeitsmappen, insbesondere Union-Abfragen mit 'WHERE'-Klauseln ausführen, um leere Zeile herauszufiltern. – Parfait

Antwort

0

Das Folgende ist nur ein Teil Ihres Problems.

Dieser Code verwendet Filter, um Leerzeichen in der ersten Spalte zu entfernen und die Daten auf einem neuen Blatt zu kopieren.

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 
Verwandte Themen