EXCEL 自动排序

发布网友 发布时间：2022-02-23 18:12

我来回答

共5个回答

热心网友 时间：2022-02-23 20:15

楼主，您好。

首先, 钱非万能之物。

其次，不收钱的我，愿意帮您试一下VBA。
回答者： lxlzmh2002 - 魔导师 十一级 2009-9-14 19:37
=================================================
打错字也被你挑出来~~~HI我一下吧
回答者： lxlzmh2002 - 魔导师 十一级 2009-9-14 19:37
=================================================
再复本贴:
程序功能: 文件打开时启每隔两秒对表一按A列进行排序操作

过程一代码:

Sub sortontime()
Dim thetime As Date
thetime = Now() + TimeValue("0:0:2")
Sheets(1).UsedRange.Sort key1:=Range("A1"), order1:=xlAscending, Header:=xlYesApplication.OnTime thetime, "sortontime"
End Sub

关闭计时
Sub timestop()
On Error Resume Next
Application.OnTime Now() + TimeValue("0:0:2"), "sortontime", , False

End Sub

打开启动计时
Private Sub Workbook_Open()
Call sortontime
End Sub

关闭保存处理
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.EnableEvents = False
Call timestop
ThisWorkbook.Save
Application.EnableEvents = True
End Sub

热心网友 时间：2022-02-23 22:06

这个不需要使用VBA吧,输入完后,按一下排序不就可以了吗?
后面的数据也会随之一起排的,只要里面没有空列就可以.
点数据>排序后,有个选项,你点进去看看,能满足你要求的.

热心网友 时间：2022-02-24 00:14

把你要排序的数字所在的行或列全部选中，再单击“数据”“排序”在对话框中选中以哪一列就行了，后面的数据会都随着一起排的。

热心网友 时间：2022-02-24 02:39

简单的排序就可以解决的问题，为什么要用vba，排序要选择所有的数据，不要只选一两列，这样会只排列这一两列的！！

热心网友 时间：2022-02-24 05:20

好 我加你qq上告诉你