
Excel表格中如何添加排序按钮
以Office2016为例,添加排序按钮步骤如下:
我们需要的根据有:电脑、Office2016
1、首先打开Excel表格,进入到主界面。
2、选中需要添加排序按钮的单元格。(可以是第一行的单元格,也可以是任意位置的单元格,根据自身内容选择)
3、接着点击在上方菜单栏的”数据“菜单,然后点击”筛选“选项按钮。
4、这时选中的单元格就已经添加好排序按钮了。
5、接着点击按钮,在弹出框里则可选择进行排序的方式,也可进行筛选。
推荐于2017-10-03 · 知道合伙人软件行家

将常用的排序模式定制为宏,然后将该宏附加在一个按钮上。今后只要点击这个按钮就可以实现自动排序。
第一步:创建宏。(本例用记录宏的方式)
点击开发工具-录制宏。如图:
手动设定排序。关键字选择产品代码-业务员。如图:
排序完成后,点击停止录制宏。如图:
这样排序的宏就创建好了。对代码稍作修改(多余的删除,如果是初学者确定不了的情况下不调整的话问题也不大)代码如下:
Sub 我的排序()
'
' 我的排序 Macro
'
'
Range("A1:G699").Select
ActiveWorkbook.Worksheets("高级筛选").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("高级筛选").Sort.SortFields.Add Key:=Range("D2:D12"), _
SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
ActiveWorkbook.Worksheets("高级筛选").Sort.SortFields.Add Key:=Range("C2:C12"), _
SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("高级筛选").Sort
.SetRange Range("A1:G12")
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
End Sub
第二步:创建按钮后附加宏。点击开发工具-插入-选择按钮。如图:
插入按钮后制定宏。如图:
对按钮重新命名为:我的排序。这样就完成了。数据变动后需要再排序时,只要点击这个按钮就可以了。如图:
广告 您可能关注的内容 |