具有Alpha排序和行扩展的Excel宏

Question

我对excel宏有点熟悉（不是很熟悉，因为这对某些人来说似乎是一个明显的代码）而且我被赋予了组织列表的任务。我必须每周组织这个列表，因此我不希望每周都进行手动alpha排序，并且我正在尝试开发一个可以为我设置的宏。

要求是我可以按列进行字母排序，并将该排序扩展到列的其余部分，以便行不会错位。有什么建议吗？

提前致谢！

Answer 1

假设您的数据位于列A：E中，您可以在您想要对对象排序的工作表上输入以下代码（假设您希望对列进行排序）

Sub sortme()
Columns("A:E").sort key1:=Range("A1"), Order1:=xlAscending, Header:=xlYes
End Sub

如果您在模块中输入它，则需要首先像这样引用工作表

Sub sortme()
Sheets("MySheet").Columns("A:E").sort key1:=Range("A1"), _
Order1:=xlAscending, Header:=xlYes
End Sub