Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12178 / 76734 ←次へ　｜　前へ→
【70082】Re:アルファベットのソート
回答  UO3  - 11/10/14(金) 10:27 -
引用なし
パスワード
   ▼ごん さん：

おはようございます

要件としてはアルファベットの桁は２桁までということですが、
仮に３桁あれば　AB より AAA が下に来るということでしょうかね。
つまり「アルファベットの桁数」を２番目の優先度、アルファベットそのものを
３番目の優先度にすることになりますか。

作業列を作ります。ここでは簡単にＣ列にしています。
適宜変更願います。（動的に使用領域の右側の列を取得して使うこともできますが）

Sub Sample()
　　Dim z As Long
　　z = Range("A" & Rows.Count).End(xlUp).Row
　　With Range("C1:C" & z)
　　　　.Formula = "=LEN(B1)"
　　　　.Value = .Value
　　End With
　　Cells.Sort Key1:=Range("A1"), Order1:=xlAscending, _
　　　　　　　 Key2:=Range("C1"), Order2:=xlAscending, _
　　　　　　　 Key3:=Range("B1"), Order3:=xlAscending, _
　　　　　　　 Header:=xlNo
　　Columns("C").ClearContents
End Sub
6 hits
▼ 【70079】アルファベットのソート ごん 11/10/14(金) 9:21 質問
【70080】Re:アルファベットのソート ichinose 11/10/14(金) 10:09 発言
【70084】Re:アルファベットのソート ごん 11/10/14(金) 11:51 質問
【70082】Re:アルファベットのソート UO3 11/10/14(金) 10:27 回答≪
【70085】Re:アルファベットのソート ごん 11/10/14(金) 12:19 質問
【70089】Re:アルファベットのソート ごん 11/10/14(金) 14:41 質問
【70093】Re:アルファベットのソート UO3 11/10/14(金) 17:41 発言
【70100】Re:アルファベットのソート ごん 11/10/15(土) 10:55 質問
【70102】Re:アルファベットのソート UO3 11/10/15(土) 13:11 回答
【70131】Re:アルファベットのソート ごん 11/10/17(月) 9:31 質問
【70134】Re:アルファベットのソート UO3 11/10/17(月) 9:53 発言
【70139】Re:アルファベットのソート ごん 11/10/17(月) 10:35 お礼
【70137】Re:アルファベットのソート UO3 11/10/17(月) 10:16 回答
【70140】Re:アルファベットのソート ごん 11/10/17(月) 11:05 お礼
【70138】Re:アルファベットのソート kanabun 11/10/17(月) 10:26 発言
【70142】Re:アルファベットのソート ごん 11/10/17(月) 11:12 お礼
【70096】Re:アルファベットのソート kanabun 11/10/14(金) 20:43 発言
【70101】Re:アルファベットのソート ごん 11/10/15(土) 11:09 お礼
【70107】Re:アルファベットのソート kanabun 11/10/15(土) 19:09 発言
【70130】Re:アルファベットのソート ごん 11/10/17(月) 8:16 お礼
【70133】Re:アルファベットのソート UO3 11/10/17(月) 9:44 発言
【70135】Re:アルファベットのソート kanabun 11/10/17(月) 10:10 発言
【70188】Re:アルファベットのソート n 11/10/18(火) 23:23 発言
【70195】Re:アルファベットのソート kanabun 11/10/19(水) 10:43 発言
【70196】Re:アルファベットのソート kanabun 11/10/19(水) 11:01 発言
【70262】Re:アルファベットのソート ごん 11/10/24(月) 17:14 お礼
【70083】Re:アルファベットのソート kanabun 11/10/14(金) 11:31 発言
【70086】Re:アルファベットのソート ごん 11/10/14(金) 12:30 お礼
【70087】Re:アルファベットのソート kanabun 11/10/14(金) 13:40 発言
【70088】Re:アルファベットのソート ごん 11/10/14(金) 14:05 発言
【70090】Re:アルファベットのソート kanabun 11/10/14(金) 15:39 発言
【70091】Re:アルファベットのソート ごん 11/10/14(金) 17:00 質問
【70092】Re:アルファベットのソート kanabun 11/10/14(金) 17:15 発言
【70265】Re:アルファベットのソート ちん 11/10/24(月) 19:29 発言
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12178 / 76734 ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free