Ich bräuchte da mal bitte Hilfe.
Also ich habe folgendes Makro, dass nach den Spalten N und M Filtert und diese dann in ein anderes Tabellenblatt kopiert:
Sub FilternKopierenTGA()
Dim rngAct As Range
With Worksheets("TGA")
.Cells.Clear
Range("N1").AutoFilter _
Field:=14, Criteria1:="TGA" 'Filtern Spalte N nach TGA
Range("M1").AutoFilter _
Field:=15, Criteria1:="26000"
Set rngAct = Range("A2").CurrentRegion.SpecialCells(xlCellTypeVisible)
rngAct.Copy .Range("A1")
Sheets("TGA").Range("1:1").AutoFilter
End With
End Sub
Nun würde ich aber gerne nur manche Spalten kopieren, unter anderem A,B,D,G,...Kann mir mal jemand nen Ansatz geben wo und wie ich das einbauen kann? Wär super.
Vielen Dank