EXCEL如何自动排序

来源:百度知道 编辑:UC知道 时间:2024/06/22 10:20:12
A1~A100 A1=10 A2=13....在A3输入8 自动排列到A1前面 能设置吗?不是手动那种,是只要输入数字自己就按顺序排列
简单点不会弄,降序和升序都要

这用代码很好解决
在你的工作表名称那里——右键——查看代码
把下面的代码全部复制进去,就可以了

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then '当A列的数据有改变时
i = Selection.Row
j = Selection.Column

Columns("A:A").Select '选中你要排序的列,这是A列,如是是ABC三列,则换为"A:C"
Selection.Sort Key1:=Range("A1"), Order1:=xlDescending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _
:=xlPinYin, DataOption1:=xlSortNormal
'Key1:=Range("A1"), 表示用A列进行排序
Cells(i, j).Select
End If
End Sub

'这是你输入一个数,按回车后,自动排序,然后把光标移到下一个单元格

用宏来解决.worksheet的change事件,按A列升序排序.

“dhf104109”的答案已经很好了, 为什么不选呢

你自己试一试 很好用的