filter - Filtering excel rows in hidden mode (VB Code) -


i want filter extensive range of rows in excel , copy values without filter running in excel, in vb code without visual action in excel. procedure slow, want more agile alternative:

'         xlsheet.range("a1:z100000").autofilter(1, "criteria", , , false)          xlsheet.range("c1:f100000").copy()          xlsheet2.range("a1").pastespecial(paste:=xlpastetype.xlpastevalues, operation:=xlpastespecialoperation.xlpastespecialoperationnone, skipblanks:=false, transpose:=false)          application.cutcopymode = ctype(false, xlcutcopymode)          xlsheet.range("a1:z100000").autofilter(false) ' 

any suggestions? !

i suggest code issue,,

sub exception_review()

application.screenupdating = false dim filtercriteria dim currentsheetname string dim newfilename string 'get current sheets's name currentsheetname = activesheet.name range("a2:k25").select selection.autofilter selection.autofilter field:=13, criteria1:="no" selection.specialcells(xlcelltypevisible).select selection.copy worksheets.add activesheet.name = "exceptionreview" range("a1").select activesheet.paste application.cutcopymode = false cells.select selection.columns.autofit range("a1").select (currentsheetname).activate selection.autofilter field:=1 selection.autofilter
range("a1").select application.screenupdating = true end sub


Comments

Popular posts from this blog

php - Permission denied. Laravel linux server -

google bigquery - Delta between query execution time and Java query call to finish -

python - Pandas two dataframes multiplication? -