Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macros with AutoFiltering
If I have Autofiltering turned on, how can I tell from within a macro which
lines are selected? for i = 1 to nRows if row i is displayed then .... next i |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macros with AutoFiltering
Check the row height - filtering just sets the height to
zero to hide the row. For i = 1 to nRows If Sheets(MySheet).Rows(i).RowHeight 0 Then... Next i -----Original Message----- If I have Autofiltering turned on, how can I tell from within a macro which lines are selected? for i = 1 to nRows if row i is displayed then .... next i . |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macros with AutoFiltering
Thanks for the reply. It answered the question and I got my code written.
However, I think I could have asked the question in a better way and learned more. If I have autofiltering turned on, how can I write code to acccomplish: For each displayed row Do something Next displayed row Thanks again. On Fri, 16 Apr 2004 09:31:31 -0700, "K Dales" wrote: Check the row height - filtering just sets the height to zero to hide the row. For i = 1 to nRows If Sheets(MySheet).Rows(i).RowHeight 0 Then... Next i -----Original Message----- If I have Autofiltering turned on, how can I tell from within a macro which lines are selected? for i = 1 to nRows if row i is displayed then .... next i . |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macros with AutoFiltering
This code increments down the visible cells in an AutoFiltered list. Wish I
could take credit, but I'm nowhere near that smart! Tom Ogilvy gave it to me. Sub Increment1() Dim rng As Range, rng1 As Range Dim icol As Long icol = ActiveCell.Column Set rng = ActiveSheet.AutoFilter.Range Set rng = Intersect(rng, Columns(icol)) Set rng = Range(ActiveCell.Offset(1, 0), rng(rng.Count)) On Error Resume Next Set rng1 = rng.SpecialCells(xlVisible) On Error GoTo 0 If Not rng1 Is Nothing Then rng1(1).Select End If End Sub Ed wrote in message ... Thanks for the reply. It answered the question and I got my code written. However, I think I could have asked the question in a better way and learned more. If I have autofiltering turned on, how can I write code to acccomplish: For each displayed row Do something Next displayed row Thanks again. On Fri, 16 Apr 2004 09:31:31 -0700, "K Dales" wrote: Check the row height - filtering just sets the height to zero to hide the row. For i = 1 to nRows If Sheets(MySheet).Rows(i).RowHeight 0 Then... Next i -----Original Message----- If I have Autofiltering turned on, how can I tell from within a macro which lines are selected? for i = 1 to nRows if row i is displayed then .... next i . |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Autofiltering again | Excel Discussion (Misc queries) | |||
autofiltering | Excel Worksheet Functions | |||
AutoFiltering | Excel Discussion (Misc queries) | |||
autofiltering | Excel Discussion (Misc queries) | |||
Autofiltering | Excel Discussion (Misc queries) |