ich habe ein Makro geschrieben welches mir aus einer Datenbank spaltenweise Inhalte auf Knopfdruck in ein anderes Tab ("Export") übernimmt:
x = (WorksheetFunction.CountA(Sheets("Tabelle1").Range("B2:B5000")))
Sheets("Export").Range("A4:A" & x).Value = Sheets("Tabelle1").Range("B2:B10000").Value
Sheets("Export").Range("B4:B" & x).Value = Sheets("Tabelle1").Range("L2:L10000").Value
Sheets("Export").Range("C4:C" & x).Value = Sheets("Tabelle1").Range("I2:I10000").Value
Sheets("Export").Range("D4:D" & x).Value = Sheets("Tabelle1").Range("J2:J10000").Value
Wie kann ich nun verhindern, dass auch die in der Tabelle 1 mittels Filter ausgeblendeten Zeilen kopiert werden?
Danke & VG
KH