Help with VBA Code to Loop through Filtered Items

[mhague]

I've been trying to figure this out for some time now. If I set the autofilter ON in VBA, is there a way to loop through the values that appear in my desired filtered column and have all the rows in the filter display?

I guess the question is: In VBA, how do you loop through items that you have in an filtered column? My goal is to pull up all the rows of filtered data, copy each group to another sheet, then move on to the next filtered item in the column.

Any help would be much appreciated!

Thanks, Marcie

 

[Nimrod]

The following procedure looks for visible cells in colA that have a constant in it. Any cell that is not visible due to a filter will be excluded.


Sub Demo()
With Columns("A:A")
rg1 = .SpecialCells(xlCellTypeVisible).Address
rg2 = .SpecialCells(xlCellTypeConstants, 3).Address
End With
For Each C In Application.Intersect(Range(rg1), Range(rg2))
MsgBox C.Value
Next C
End Sub

 

[mhague]

Thank you! I will give this a try!
Marcie