Excel VBA中的排序货币柱降

Question

我有2列的有shopnames和B具有货币值

我想按降序排列B列

这里排序工作表的我做了什么：

With Sheets("helpsheet") 
    .Sort Key1:=Range("A"), Order1:=xlDescending, Header:=xlYes  
End With 

它不起作用。我有什么不同的做法？

Answer 1

在VBA中有一些可用的排序选项。提高代码质量的最简单方法是添加您想要排序的一系列数据。因此，你需要提高你的代码如下：

With Sheets("helpsheet").Range("a1").CurrentRegion 
    .Sort Key1:=Range("B1"), Order1:=xlDescending, Header:=xlYes 
End With 

我做了什么：

1. 假设您的数据范围Range("A1")开始，使一个区域（因此我在With线使用CurrentRegion property
2. 根据您提问的信息，我设置了排序键为Range("B1")

如果需要，您可以根据自己的情况更改这些要点。