删除Format as Table中的排序图标

Question

我使用“格式为表格”每列的顶部都有排序图标。如何从某些行中删除排序图标并保留剩余的？

Answer 1

您可以删除所有排序按钮（解决方法）

1-选择数据范围

2-格式为表

3-右键单击 - ＆gt;选择Table - ＆gt; Convert to Range

这将保留格式，但排序按钮将被删除。

或者，如果你想保留一些排序图标，那么你必须使用VBA

1-假设这是您的格式化表格

2-编写此功能

Sub RemoveSortArrows()
    Application.ScreenUpdating = False

    For Each col In Range("A1:J1")
        If Not (col.Column = 1 Or col.Column = 4) Then
            col.AutoFilter Field:=col.Column, Visibledropdown:=False
        End If
    Next

    Application.ScreenUpdating = True
End Sub

3-这应该是结果

Answer 2

我想在 Pankaj的回答中添加一件事。您可以使用

而不是硬键入标题范围

Dim myTable As ListObject

Set myTable = ActiveSheet.ListObjects([the name of your table goes in here])

在For循环签名中键入

For Each Cell In myTable.HeaderRowRange