Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Ensuring Autofilter arrows are visible at end of macro
Hi,
I've been struggling with this one for a while -- I have a spreadsheet where the user may or not have the Autofilter arrows being displayed prior to running a macro. I always want to have the Autofilter arrows displayed for all columns with values in Row 1 when the macro completes, regardless of if the Autofilter arrows were on display prior to the person running the macro. Below is the code I have tried, but I am getting an error (See error message below). Any help is appreciated! Error: Run-time error '1004: AutoFiler method of Range class failed Code: With Sheets("Patent data with family data") If .FilterMode Then .ShowAllData Else .Range("A1:V1").AutoFilter VisibleDropDown:=True End If End With -- Robert |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Ensuring Autofilter arrows are visible at end of macro
Sometimes your code needs to see all the data.
So I turn off the autofilter, do the work, and reapply data|Filter|autofilter With Sheets("Patent data with family data") .autofiltermode = false 'do the work 'apply the autofilter to all the columns in the used range .usedrange.columns.autofilter End With robs3131 wrote: Hi, I've been struggling with this one for a while -- I have a spreadsheet where the user may or not have the Autofilter arrows being displayed prior to running a macro. I always want to have the Autofilter arrows displayed for all columns with values in Row 1 when the macro completes, regardless of if the Autofilter arrows were on display prior to the person running the macro. Below is the code I have tried, but I am getting an error (See error message below). Any help is appreciated! Error: Run-time error '1004: AutoFiler method of Range class failed Code: With Sheets("Patent data with family data") If .FilterMode Then .ShowAllData Else .Range("A1:V1").AutoFilter VisibleDropDown:=True End If End With -- Robert -- Dave Peterson |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Ensuring Autofilter arrows are visible at end of macro
Try:
..Range("A1:V1").AutoFilter Field:=1, VisibleDropDown:=True instead of: ..Range("A1:V1").AutoFilter VisibleDropDown:=True -- p45cal "robs3131" wrote: Hi, I've been struggling with this one for a while -- I have a spreadsheet where the user may or not have the Autofilter arrows being displayed prior to running a macro. I always want to have the Autofilter arrows displayed for all columns with values in Row 1 when the macro completes, regardless of if the Autofilter arrows were on display prior to the person running the macro. Below is the code I have tried, but I am getting an error (See error message below). Any help is appreciated! Error: Run-time error '1004: AutoFiler method of Range class failed Code: With Sheets("Patent data with family data") If .FilterMode Then .ShowAllData Else .Range("A1:V1").AutoFilter VisibleDropDown:=True End If End With -- Robert |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Autofilter: jump from visible row to visible row by command button | Excel Programming | |||
Formula Auditing Arrows Not Visible | Excel Worksheet Functions | |||
red autofilter arrows instead of blue in Excel? | Excel Discussion (Misc queries) | |||
excel formula auditing arrows not visible | Excel Worksheet Functions | |||
Invisible AutoFilter Drop-Down Arrows | Excel Programming |