EXCEL中是否可以自动排序

来源：百度知道 编辑：UC知道 时间：2024/06/13 18:30:58
EXCEL中是否可以通过某公式对输入的数据自动排序，
如我在A1输入1，A2输入3，A3输入2，这时输完后不用做排序处理，A3的2自动上升到A2中，原A2的3自动降到A3中
To: cnmhdzc
这样只能对每一列进行自动排序,但是我想要只对我需要的一列进行自动排序,其他跟着动,但要保持每一行的对应关系可以吗?

将下列代码放到相关工作表的代码中即可。

Private Sub Worksheet_Change(ByVal Target As Range)
If IsNumeric(Target.Value2) And Not IsArray(Target.Value2) Then
For Each vv In Range(Cells(1, Target.Column), Cells(ActiveSheet.UsedRange.Rows.Count, Target.Column)).Cells
If Target.Row > vv.Row And Target.Value2 < vv.Value2 Then
Target.Cut
vv.Select
Selection.Insert Shift:=xlDown
End If
Next vv
End If
End Sub

本段代码是对选中单元格所在列进行排序，你可以改为宏，在需要的地方执行。

但是部分代码要修改。

这个还是要你选择个“排序”功能的。

在另一列还差不多,
原来的列排的话你用VBA能实现
关于VBA不是很懂,无法回答你.

在A1中输入：=row()
然后向下填充就可以了。