Get only unique values?
Okay - I think I see. I get an idea of what I think I need to do, and
I get tunnel-visioned on that. So if my header is in Row 1, I apply
the filter, then just select the range of rows I've just been working
with in my code and print.
Thanks, Tom. I appreciate the boost.
Ed
On Mar 15, 11:39 am, Tom Ogilvy
wrote:
You haven't told me anything that would change the basic advice.
If you want to print out, then after applying the filter just select
J135:J210 and print selection. only the visible rows will be printed.
You can apply the autofilter with code if that is your consternation.
Assume you header row is in J134
Dim rng as Range
set rng = Range(Range("J134),Range("J134").end(xldown))
rng.AdvancedFilter Action:=xlFilterInPlace, Unique:=True
rng.Printout
Activesheet.ShowAllData
--
Regards,
Tom Ogilvy
--
Regards,
Tom Ogilvy
"Ed" wrote:
Tom: I'm sorry I wasn't clearer. I'm copying new info into an
exisiting workbook. When I'm done, I need to print out the unique
values from one column over the range of rows I just copied into.
Say, Col J, Rows 135 - 210. Can I set
Range("J135:J210") and get just the unique values from there to print
out?
Ed
On Mar 15, 10:31 am, Tom Ogilvy
wrote:
select the column (make sure it has a header in row 1)
then do Data=filterAdvanced filter
Select Filter in place and click the Unique checkbox in the lower left.
You don't need to specify a criteria.
to restore your list, do
Data=filter=Showall
--
Regards,
Tom Ogilvy
"Ed" wrote:
I have a range -one single single column. I'd like to print only the
unique values in this range. What's the best method to use to get the
unique values?
Ed- Hide quoted text -
- Show quoted text -- Hide quoted text -
- Show quoted text -
|