最大到最小或相反

Kalsefar · 发表于 2022-7-6 21:00:23

你好

我需要VBA代码自动排序数据从最大到最小或反之亦然。

Kalsefar · 发表于 2022-7-6 22:52:43

私有子工作表_更改（ByVal目标为Excel.Range）
If目标。列=2，则

将最后一行变暗为长
lastrow=单元格（Rows.Count，2）。结束（xlUp）。一行
范围（“B2:C”和lastrow）。排序键1：=范围（“B2:B”和lastrow），顺序1：=xlAscending，标题：=xlNo


如果结束

末端接头

如果将来有人需要，这就是代码。

[编程交流] 最大到最小或相反

发表回复

精选推荐