排序失败

jasson_luck · 发表于 2023-4-6 07:40

各位大侠：

请问我的区域数据排序为何失败了？该如何修改？

盼盼198310 · 发表于 2023-4-6 07:59

..............

jasson_luck · 发表于 2023-4-6 08:34

盼盼198310 发表于 2023-4-6 07:59
..............

试了，貌似也没成功。

zxsea_7426 · 发表于 2023-4-6 08:43

jasson_luck 发表于 2023-4-6 08:34
试了，貌似也没成功。

那是你没有表述清楚需求

zxsea_7426 · 发表于 2023-4-6 08:45

盼盼198310 发表于 2023-4-6 07:59
..............

应该再加个升序或者降序的选框就更完美

ykcbf1100 · 发表于 2023-4-6 08:58

你没代码，别人怎么改；你也没有说明如何排序，你让人怎么帮你。

盼盼198310 · 发表于 2023-4-6 10:28

zxsea_7426 发表于 2023-4-6 08:45
应该再加个升序或者降序的选框就更完美

这样还好点吧

tanglf188 · 发表于 2023-4-6 10:54

你先用Set ss = Application.InputBox("请选择排序列", Type:=8)选择单元格区域，再用
If k <> 1 Then
MsgBox "不能选择多个区域"
Exit Sub
End If
排除多单元格区域
那么也就是你想对单个单元格排序？

jasson_luck · 发表于 2023-4-6 13:28

zxsea_7426 发表于 2023-4-6 08:43
那是你没有表述清楚需求

确实没说清楚。不过附件里有代码，我是想按C列来排序（降序），排完序后整行数据位置随之变化。

jasson_luck · 发表于 2023-4-6 13:29

盼盼198310 发表于 2023-4-6 10:28
这样还好点吧

可以。谢谢了！

		自动登录	找回密码
密码			免费注册

[求助] 排序失败