A 回答 (2件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
こんばんは!
無理矢理って感じでやってみました。
データはA列の2行目以降にあるとします。
とりあえず最初の2文字だけで並び替えしています。
Sub test()
Columns("B:E").Insert
Dim i, j As Long
For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row
For j = 1 To 2
Cells(i, j + 1) = Mid(Cells(i, 1), j, 1)
Next j
Next i
For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row
For j = 2 To 3
If Cells(i, j) <> "" Then
Cells(i, j + 2).FormulaR1C1 = "=Code(RC[-2])"
End If
Next j
Next i
i = Cells(Rows.Count, 1).End(xlUp).Row
j = Cells(1, Columns.Count).End(xlToLeft).Column
Range(Cells(2, 1), Cells(i, j)).Sort _
, key1:=Cells(1, 4), order1:=xlAscending _
, key2:=Cells(1, 5), order2:=xlAscending
Columns("B:E").Delete
End Sub
こんな感じではどうでしょうか?m(__)m
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) マクロを教えてください。 7 2023/06/01 19:47
- Excel(エクセル) エクセルデーターの並び替え 5 2022/08/06 09:59
- その他(自転車) この自転車用ヘルメット、安全なヘルメットではないですか。 10 2023/04/16 07:34
- 宇宙科学・天文学・天気 反物質がほとんどなくて、ほぼ物質だけの宇宙になったのは偶然ですか? 3 2022/11/13 14:37
- 宇宙科学・天文学・天気 反物質がほとんどなくて、ほぼ物質だけの宇宙になったのは偶然ですか? 1 2022/07/04 16:02
- 電気・ガス・水道 ソーラーパネル初心者です 1 2023/01/01 13:46
- 政治 福島の処理水について中国や韓国がいちゃもんをつけてくる問題って…… 9 2023/07/11 17:18
- その他(ネットショッピング・通販・ECサイト) 骨伝導ヘッドセットで この二つは値段が違うだけでは同じですか? 1 2023/02/13 19:13
- 飲み物・水・お茶 え!これ100%、ならば買おうかな。…しかし実際は… 10 2022/09/06 20:37
- 人類学・考古学 ドローンを飛ばして間近で古墳調査をするのって、宮内庁の許可は必要なのかな? 5 2023/03/04 09:07
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
1の行を固定した上でVBAを用い...
-
ファイルメーカーでソート後の...
-
エクセル、並び替え正しくソー...
-
ファイルの漢数字の順番につい...
-
並べ替えについて
-
Selectした時のレコードの取得順
-
テーブルレーコードをソートし...
-
MySQLで行番号を得たい
-
アクセスの並べ替えについて
-
リストボックス内を昇順並べる方法
-
SQLのORDERBY句について質問です。
-
SQLで曜日のソートを月火水木金...
-
文字型の順番がうまく並ばない。
-
Excelのオートフィルタでソート...
-
MSDOS ソート sortf 使用方法
-
ソート。内容の一部を置換して...
-
EXCEL 「並び替え」の誤動作に...
-
レコードの登録順がおかしい
-
エクセルVBAでデータ並べ替え
-
ソート(PL/SQL)
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
レコードの登録順がおかしい
-
並べ替えについて
-
1の行を固定した上でVBAを用い...
-
ファイルの漢数字の順番につい...
-
テーブルレーコードをソートし...
-
エクセル、並び替え正しくソー...
-
SQLで曜日のソートを月火水木金...
-
月末日のみソートしたい
-
ハイフンの入ったデータの並べ替え
-
リストボックス内を昇順並べる方法
-
Selectした時のレコードの取得順
-
アクセスに関して。クエリの並...
-
accessでDISTINCT 句と矛盾
-
都道府県順、北からソートした...
-
コンボボックスのソートについて
-
SQLデータベースの処理
-
上から何番目か。
-
文字型の順番がうまく並ばない。
-
ファイルメーカーでソート後の...
-
Excelの並び替え(文字数と画数...
おすすめ情報