excel cannot complete this task with available resources -
when i'm trying copy data in 1 of worksheets new sheet using below code in excel 2007, windows 7, i'm facing error "excel cannot complete task available resources. choose less data or close other applications".
when close other applications, showing same message. how resolve issue? please advise.
with activesheet .range("a1").select .usedrange.specialcells(xlcelltypevisible).copy end thisworkbook set ws = .worksheets.add(after:=.sheets(.sheets.count)) newsheet = activesheet.name end activesheet .range("a1").select selection.pastespecial paste:=xlpastecolumnwidths selection.pastespecial xlpasteall .range("a1").select end
when save xls .xls (97-2003) working fine. want run more data 65k
i tested code on newly created excel document , copied 80k rows new sheet. code works...
i did create macro sub routine , run multiple times check.
but said saved document once xls. maybe got limitations also.
please , create new excel document , save xlsx...
Comments
Post a Comment