Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

26947 / 76732

←次へ　｜　前へ→


	【55111】文字列のデータをソートしたいのですが、、

しげ - 08/4/15(火) 15:45 -


	引用なし

	パスワード

いつもお世話になっております。

CSVファイルを取り込み、９列あるデータを、
H、I、A、B、C、D、E列の順番でソートしたところ、

1148
1292
1544
1700
2096
2348
248
2492
2600
2744
2996
3392
3548
3800
3944
4196
4448
4592
4844
500
644
896
92

のように一桁目でソートされてしまい、実際の数字とは関係なくソートされてしまいました。
調べたところ、文字列で扱われているため、桁数が違うとこのようになることはわかったのですが、
実際の解決法まではわかりませんでした。。

方法を教えていただけると助かります。

いらないかもしれませんが、以下ソースです。

　　'---ワークシートへ取り込んだデータを以下の項目でソートする(すべて昇順)---
　　With Worksheets("newSheet")
　　　　.Activate
　　　　With .Range(Cells(1, 1), Cells(5000, 9))
　　　　　　'優先度７の列を昇順ソート
　　　　　　.Sort Key1:=Worksheets("newSheet").Cells(1, 5), order1:=xlAscending
　　　　　　'優先度４、５、６を昇順ソート
　　　　　　.Sort Key1:=Worksheets("newSheet").Cells(1, 2), order1:=xlAscending, _
　　　　　　　　　Key2:=Worksheets("newSheet").Cells(1, 3), order2:=xlAscending, _
　　　　　　　　　Key3:=Worksheets("newSheet").Cells(1, 4), order3:=xlAscending
　　　　　　'優先度１、２、３を昇順ソート
　　　　　　.Sort Key1:=Worksheets("newSheet").Cells(1, 8), order1:=xlAscending, _
　　　　　　　　　Key2:=Worksheets("newSheet").Cells(1, 9), order2:=xlAscending, _
　　　　　　　　　Key3:=Worksheets("newSheet").Cells(1, 1), order3:=xlAscending
　　　　End With
　　End With

3 hits

▼

【55111】文字列のデータをソートしたいのですが、、 しげ 08/4/15(火) 15:45

≪