狐狸爸爸还有一个问题是在上表设定一个快捷按钮指定某列的数值筛选 请问代码如何写
With Tables("表的名称") Dim c As Integer= .Cols("应收货款").Index . Select(.RowSel, c, .RowSel, c) Syscmd.Filter.Equal(False)End With
其实没有必要做按钮的,右击这一列的某个单元格就可以筛选。