Excel VBA按日期排序的替代方法

我目前正在编写一个文档，它有大约25列，每个列的标题都是日期。 现在我必须按日期对这些列进行排序。但是，排序不应该从1月份开始，一直到12月份。在我的文档中，排序应该从9月开始，一直到6月（可以省略7月和8月，因为我的文档涉及到一个学年，在比利时从9月到6月）

有没有人能帮我处理这种分类的代码？ 我首先选择所需的范围，然后使用Selection.Sort，但它总是从1月份开始排序

非常感谢

亲切问候,，

---

Marc

比如说，你在第一行有从1到12的月数。 添加包含公式的辅助行

=MOD(A1-8+12,12), =MOD(B1-8+12,12), ...

（在第一个单元格中添加公式并向右拖动；“8”表示“9月”）

---

按此值对列进行排序。

一种可能的替代方法是在日期中包含年份，这样内置的排序就可以工作了。2010年9月将在2011年1月之前排序。如果愿意，可以将日期格式设置为不显示年份。