Extracting Data To New Worksheet

  • Thread starter Thread starter Cogeco news
  • Start date Start date
C

Cogeco news

Hi all

I am attempting to filter a large data source to a new worksheet without
much success.
I want to filter the data by multiple paramenters.

I have built a Macro that sorts the data by value and then pastes in the new
sheet.
I only want to paste 3 of the columns, not all the data.

E.G Location, Value 1, Value 3 and Manufacturer

Is this as complicated as I am making it?

Location Model Value 1 Value 2 Value 3 Value 4 Value 5 Value 6 Value
7 Manufacturer
text/numerical text Numerical Numerical Numerical Numerical
Numerical Numerical text/numerical Text
text/numerical text Numerical Numerical Numerical Numerical
Numerical Numerical text/numerical Text
text/numerical text Numerical Numerical Numerical Numerical
Numerical Numerical text/numerical Text
text/numerical text Numerical Numerical Numerical Numerical
Numerical Numerical text/numerical Text
text/numerical text Numerical Numerical Numerical Numerical
Numerical Numerical text/numerical Text
text/numerical text Numerical Numerical Numerical Numerical
Numerical Numerical text/numerical Text
text/numerical text Numerical Numerical Numerical Numerical
Numerical Numerical text/numerical Text
text/numerical text Numerical Numerical Numerical Numerical
Numerical Numerical text/numerical Text


regards

TM
 
I'm not sure what your macro does, but maybe you can add some code that deletes
the columns you don't want after you create each page?
 
The attachment may explain it better, but lots of people (including me) won't
open attachments.

Debra Dalgleish has sample workbooks that extract (row by row) to new sheets
using data|filter. But there's no reason you can't just copy|paste the columns
you want.

http://www.contextures.com/excelfiles.html

Create New Sheets from Filtered List -- uses an Advanced Filter to create
separate sheet of orders for each sales rep visible in a filtered list; macro
automates the filter. AdvFilterRepFiltered.xls 35 kb

Update Sheets from Master -- uses an Advanced Filter to send data from
Master sheet to individual worksheets -- replaces old data with current.
AdvFilterCity.xls 55 kb

==========
But I didn't see anything in your text response that would exclude a line like
this:

With whateverworksheetjustgottheinformation
.Range("a1,c1,e1,H:iv").EntireColumn.Delete
End With

Right after you paste all the columns of data.
 
Back
Top