试试这个vb程序吧,我也是现学现卖
Sub HideAutoFilterDropdowns()
Dim Rng As Range
Set Rng = ActiveSheet.Range("A1:D1")
With Rng
.AutoFilter Field:=1, VisibleDropDown:=True
.AutoFilter Field:=2, VisibleDropDown:=False
.AutoFilter Field:=3, VisibleDropDown:=True
.AutoFilter Field:=4, VisibleDropDown:=False
.AutoFilter Field:=5, VisibleDropDown:=True
.AutoFilter Field:=6, VisibleDropDown:=False
End With
End Sub
参考百度文库里面的这篇文章:隐藏自动筛选时出现的下拉箭头
哈哈!你的赏分也不低哦。
其实,表头一起设置筛选后,只选择你要的列(A、C、E列的倒▲下拉框)便行。
虽然那些不想用的倒▲(B、D、F列)觉得别扭,但没必要太介意它的存在吧。