Hallo Excel-Profis,
Ich kopiere über Kriterien von Blatt "Basis" ins aktivierte Blatt "Blatt2"
Worksheets("Blatt2").Activate
Sheets("Basis").Columns("A:J").AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Sheets("Kriterien").Range("A1:E3"), CopyToRange:=Range("A6:J6") _
, Unique:=False
Die kopierten Daten werden ja ab "A7" eingefügt.Ich möchte anschließend das kopierte absteigend sortieren,- "B7" und drunter sind Datumswerte.
Kann mir jemand bei der "Ergänzung" helfen?
Mit freundlichen Gruß
Fred Neumann