電子書籍の厳選無料作品が豊富!

仕事で使うようになったファイルにマクロが登録してありました。
一体、何をしているのかわかる方お願いします。

Selection.Sort Key1:=Range("A4"), Order1:=xlAscending, Key2:=Range("B4") _
, Order2:=xlAscending, Header:=xlYes, OrderCustom:=1, MatchCase:=False _
, Orientation:=xlTopToBottom, SortMethod:=xlPinYin
End Sub

と、あるのですが宜しくお願いします。

A 回答 (2件)

>Selection.Sort


選択された範囲を並べ替えろ
>Key1:=Range("A4"),
最優先の並べ替えはA列で行え
>Order1:=xlAscending
並べ替え順序は昇順で
>Key2:=Range("B4")
第2に優先するキー列はB列で行え
>Order2:=xlAscending
その昇順・降順は昇順で並べ替えろ
> Header:=xlYes
タイトル行を指定
>MatchCase:=False
大文字と小文字を区別しないでよい
>Orientation:=xlTopToBottom
並べ替えの方向
>OrderCustom:=1
並べ替えの順序の指定
>xlPinYin
読み(音読み)順
後半は並べ替えの操作の「オプション」の指定を反映している。
別シートで、マクロの記録をセットして、並べ替えの操作を行い、色々
操作を変えて記録し、どこがどう変わるか見てみてください。
Header以下があるところから、元のマクロはマクロの記録をとったか、それをコピーしものと思われます。
http://www.eurus.dti.ne.jp/~yoneyama/Excel/vba/v …
下記に上記回答に似た内容があります。
http://www.happy2-island.com/excelsmile/smile03/ …
    • good
    • 0

お使いのファイルのどこかに並べ替えが必要なシートはありませんか?


若しくは、マクロ作成時のテストやサンプル(記録マクロ等)にした残骸かも知れません。

>Selection.Sort

選択範囲の並べ替えをします。
それ以後は、並べ替えを行うためのパラメーターが続きます。(通常は全て指定する必要はありません。)

>Key1:=Range("A4"), Order1:=xlAscending,

一つ目の項目はシートのA4を基準にアスキー順に並べ替えます。

>Key2:=Range("B4") , Order2:=xlAscending

2つめの項目はシートのB4を基準にアスキー順に並べ替えます。

>Header:=xlYes

最初(一番上)のセルは項目名(見出し)

あとは、VBAのヘルプでSORTを見てください。
マクロの記録で並べ替えを登録してみるのも良いかも。
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!