I am having trouble automating the copying from a spreadsheet after a filter is applied. For example 1.) filter for containing "test" in a column 2.) copy results in column from range (First Cell:Last Cell) in filtered results. Currently I use code that due to differing results of files, I am selecting a huge range (11000) and as a result, the code is running slow due to size of data on the clipboard. How do I copy from the first to the last occurrence from results after a filter using VBA?
Code:
Rows("3:3").Select
Selection.AutoFilter
ActiveSheet.Range("A3:G11000").AutoFilter Field:=1, Criteria1:= _
UsrRef, Operator:=xlAnd
'Copy members of group (DC has more than 3,000 rows)
Range("A3:G11000").Select
Application.CutCopyMode = False
Selection.SpecialCells(xlCellTypeVisible).Copy