Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Huge Worksheet
Hello,
I have a table that I filter and then copy to a new page. The problem is that the table is only about 20 rows long when I filter it. But, when I copy it to a new worksheet, the workbook becomes almost 3.5 MB in size. It is like the workbook thinks there is something all the way down to row 65,000. The code I use is: If ActiveSheet.AutoFilterMode = False Then Selection.AutoFilter Selection.AutoFilter Field:=1, Criteria1:=Branchname Call FindtheCol(ColName) finds a spefiic column NColl = ActiveCell.Column Union(Columns(2), Columns(NColl)).Copy Any ideas on how to avoid this? Thanks, Bill |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Huge Worksheet
You can try this rather than copying the whole column.
If ActiveSheet.AutoFilterMode = False Then Selection.AutoFilter Selection.AutoFilter Field:=1, Criteria1:=Branchname Call FindtheCol(ColName) finds a spefiic column NColl = ActiveCell.Column set rng = Union(Columns(2), Columns(NColl)) set rng1 = ActivesheetAutofilter.Range.Specialcells(xlVisible ) set rng2 = Intersect(rng2.EntireRow,rng1) rng2.copy -- Regards, Tom Ogilvy "Bill" wrote in message nk.net... Hello, I have a table that I filter and then copy to a new page. The problem is that the table is only about 20 rows long when I filter it. But, when I copy it to a new worksheet, the workbook becomes almost 3.5 MB in size. It is like the workbook thinks there is something all the way down to row 65,000. The code I use is: If ActiveSheet.AutoFilterMode = False Then Selection.AutoFilter Selection.AutoFilter Field:=1, Criteria1:=Branchname Call FindtheCol(ColName) finds a spefiic column NColl = ActiveCell.Column Union(Columns(2), Columns(NColl)).Copy Any ideas on how to avoid this? Thanks, Bill |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Sorting huge worksheet | Excel Discussion (Misc queries) | |||
Huge Repository!!! | Excel Discussion (Misc queries) | |||
FROM A HUGE SHEET, A PORTION OF IT IS SELECTED TO PASTE IT IN A NEW WORKSHEET BUT UNABLE TO | Excel Discussion (Misc queries) | |||
huge huge excel file... why? | Excel Discussion (Misc queries) | |||
Newbie: worksheet function advise (huge please) | Excel Worksheet Functions |