Missing Table-Drop Down Arrows

[John]

I have a Table set up in Excel 2007, and I am using the following code to
extract data to another sheet, using advanced filter:

Sub FilterAllNames()
Worksheets("DBase").Range("DBase").AdvancedFilter Action:=xlFilterCopy,
_
CriteriaRange:=Worksheets("Reports").Range("CritNames"), _
CopyToRange:=Worksheets("Reports").Range("Output"), Unique:=False
End Sub

The sub works, but it strips my table (in the DBase worksheet) of the
drop-down arrows. The table
is apparently still there because the Table Tools Design tab is still
displayed, and the Total Row box still works. Why do I lose my drop-downs,
or how do I get them back???

 

[CurlyDave]

I have a Table set up in Excel 2007, and I am using the following code to
extract data to another sheet, using advanced filter:

Sub FilterAllNames()
    Worksheets("DBase").Range("DBase").AdvancedFilter Action:=xlFilterCopy,
_
       CriteriaRange:=Worksheets("Reports").Range("CritNames"),_
       CopyToRange:=Worksheets("Reports").Range("Output"), Unique:=False
 End Sub

 The sub works, but it strips my table (in the DBase worksheet) of the
drop-down arrows. The table
 is apparently still there because the Table Tools Design tab is still
displayed, and the Total Row box still works. Why do I lose my drop-downs,
or how do I get them back???

By drop down arrows, do you mean drop down arrows from the filter? if
so, advance filter does not have drop down arrows, just auto filter

 

[John]

I mean the drop down arrows in my original table. The arrows are there until
I use advanced filter with the "copy to another location" option, then the
arrows immediately disappear.

I have a Table set up in Excel 2007, and I am using the following code to
extract data to another sheet, using advanced filter:

Sub FilterAllNames()
Worksheets("DBase").Range("DBase").AdvancedFilter Action:=xlFilterCopy,
_
CriteriaRange:=Worksheets("Reports").Range("CritNames"), _
CopyToRange:=Worksheets("Reports").Range("Output"), Unique:=False
End Sub

The sub works, but it strips my table (in the DBase worksheet) of the
drop-down arrows. The table
is apparently still there because the Table Tools Design tab is still
displayed, and the Total Row box still works. Why do I lose my drop-downs,
or how do I get them back???

By drop down arrows, do you mean drop down arrows from the filter? if
so, advance filter does not have drop down arrows, just auto filter

 

[Ron de Bruin]

Hi John

If you turn on Autofilter again do you see them then ?
No time to test it now myself

Maybe you like this add-in
http://www.rondebruin.nl/table.htm