首页 办公 正文

excel筛选自动关闭

弹出的筛选界面并没有自动关闭,我们可以手动关闭弹出的筛选框。单击筛选框的关闭按钮即可。功能关闭在Excel的菜单栏中,3.利用VBA代码实现自动关闭对于使用频率较高的筛选功能:面板中选择要添加代码的工作簿”会发现筛选框自动关闭“...

Excel作为一款优秀的电子表格软件,使用广泛。在数据处理中,筛选功能是必不可少的功能之一。然而,很多人都会遇到一种情况:当他们对表格进行筛选后,弹出的筛选界面并没有自动关闭,导致视觉上的不美观和操作上的不便捷。本文将介绍如何解决这个问题。

1. 筛选后手动关闭

在进行筛选后,我们可以手动关闭弹出的筛选框。就像打开弹出框时所做的一样,单击筛选框的关闭按钮即可。

2. 利用“设置-高级”功能关闭

在Excel的菜单栏中,选择“数据”->“排序和筛选”->“高级”。在弹出的窗口中,勾选“只复制筛选结果”,再勾选“将筛选结果复制到:”,最后选择一个空白单元格即可。

3. 利用VBA代码实现自动关闭

对于使用频率较高的筛选功能,我们可以使用VBA代码实现自动关闭。步骤如下:

(1)按下“Alt+F11”键打开VBA编辑器;

(2)在左侧“项目”面板中选择要添加代码的工作簿;

(3)点击菜单栏的“插入”->“模块”,在新建的模块中输入如下代码:

```

Private Sub Workbook_SheetCalculate(ByVal Sh As Object)

Dim rng As Range

Set rng = Application.Selection

If rng.Rows.Count = 1 And rng.Columns.Count = 1 Then Exit Sub

If rng Areas.Count > 1 Then Set rng = rng.Cells(1)

If Intersect(rng, Range("A1").CurrentRegion) Is Nothing Then Exit Sub

With rng.Font

.ThemeColor = xlThemeColorDark1

.TintAndShade = -0.249977111117893

End With

rng.Activate

ActiveCell.AutoFilter

End Sub

```

(4)按下“Alt+Q”键返回Excel表格,此时关闭VBA编辑器;

(5)选中要筛选的单元格并执行筛选操作,会发现筛选框自动关闭。

Excel是一款功能强大的电子表格软件,在实际应用中能够帮助我们很好地处理数据。筛选功能是其中之一,但如果弹出的筛选框不能自动关闭,将会给我们造成不便。本文介绍了三种方法来解决这个问题,读者可以根据实际需要进行选择。

本文转载自互联网,如有侵权,联系删除