ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   SELECTING AN ITEM FROM AUTO FILTER ! (https://www.excelbanter.com/excel-programming/427170-selecting-item-auto-filter.html)

Jay Dean

SELECTING AN ITEM FROM AUTO FILTER !
 
Hi -

In all the sheets of my workbook, I have a list in column Range("B:B").
For each list, I have created an autofilter by manually doing "Data"
"Filter" "AutoFilter". This allows me to manually go through each
sheet to use the autofilter to select the item I want in each list.

I need a macro that will loop through the sheets and just select any
item I have already made visible using the autofilter.

All the macro will do is just select that visible item in every sheet.


Thanks
Jay



*** Sent via Developersdex http://www.developersdex.com ***

Jay Dean

SELECTING AN ITEM FROM AUTO FILTER !
 
Please ignore this post....I have used the "hidden" property to solve
the problem and it works neatly!

Thanks
Jay


*** Sent via Developersdex http://www.developersdex.com ***

Per Jessen

SELECTING AN ITEM FROM AUTO FILTER !
 
Hi Jay

This should do it:

Sub SelectFilteredItem()
Dim TargetCol As String
Dim StartSh As Worksheet

Set StartSh = ActiveSheet
Application.ScreenUpdating = False
TargetCol = "B"
For Each sh In ActiveWorkbook.Sheets
sh.Activate
sh.Range(TargetCol & sh.Rows.Count).End(xlUp).Select
Next
StartSh.Activate
Application.ScreenUpdating = True
End Sub

If this question is related to your previous post the macro below might be
what you want:

Sub ConcatenateFilteredItems()
Dim TargetCol As String
Dim MyString As String
Dim StartSh As Worksheet

Set StartSh = ActiveSheet
Application.ScreenUpdating = False
TargetCol = "B"
For Each sh In ActiveWorkbook.Sheets
If sh.Name < "Display" Then
sh.Activate
MyString = MyString & sh.Range(TargetCol & _
sh.Rows.Count).End(xlUp).Value
End If
Next
Sheets("Display").Range("D12") = MyString
StartSh.Activate
Application.ScreenUpdating = True
End Sub

Best regards,
Per

"jay dean" skrev i meddelelsen
...
Hi -

In all the sheets of my workbook, I have a list in column Range("B:B").
For each list, I have created an autofilter by manually doing "Data"
"Filter" "AutoFilter". This allows me to manually go through each
sheet to use the autofilter to select the item I want in each list.

I need a macro that will loop through the sheets and just select any
item I have already made visible using the autofilter.

All the macro will do is just select that visible item in every sheet.


Thanks
Jay



*** Sent via Developersdex http://www.developersdex.com ***




All times are GMT +1. The time now is 12:17 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com