2列のシートがありますAにはショップ名があり、Bには通貨の値があります
B列を降順にソートしたい
これが私がやったことです:
With Sheets("helpsheet")
.Sort Key1:=Range("A"), Order1:=xlDescending, Header:=xlYes
End With
うまくいきません。どうすればいいですか?
VBA で使用できる並べ替えのオプションがいくつかあります。コードを改善する最も簡単な方法は、並べ替えたいデータの範囲を追加することです。したがって、コードを次のように改善する必要があります。
With Sheets("helpsheet").Range("a1").CurrentRegion
.Sort Key1:=Range("B1"), Order1:=xlDescending, Header:=xlYes
End With
私がしたこと:
Range("A1")
あなたのデータ範囲がで始まり、地域を作ると仮定しました(したがって、私はインラインで使用CurrentRegion property
しましWith
た.Range("B1")
あなたの質問からの情報に従って、ソートキーを設定しました。必要に応じて、状況に応じてこれらのポイントを変更できます。