Results of 1 - 1 of about 2689 for 並べ替え (0.002 sec.)
- [[20200630145201]]
- #score: 4561
- @digest: 846e8f8ff6bd0a565917effe47560d3a
- @id: 84267
- @mdate: 2020-07-02T23:14:47Z
- @size: 2108
- @type: text/plain
- #keywords: 子福 (42959), 福袋 (40599), 袋- (26192), 択並 (14111), 菓子 (13735), お菓 (9104), 袋-※ (7748), スナ (7016), ョコ (6944), ミ0 (6907), 板チ (6721), コ13 (6309), ン個 (6198), コ4 (5293), コ10 (4741), アソ (4525), 列優 (4279), コバ (4077), ク- (3605), 番行 (3484), 子b (3372), ー11 (3257), 2g (3163), 子a (3151), グミ (3054), チョ (2968), ナッ (2711), ー8 (2648), ー7 (2637), ト12 (2538), ゴチ (2306), ロケ (2220)
- 『VBA 不規則なデータの並べ替え』（ちょん丸）
A B C D E 1 ID ロケーション 個数 型番 行 2 お菓子福袋-1 O-04-01 2 ジュース 2 3 2A-09-11 2 スナック-カレー 4 2B-03-25 2 スナック-BBQ 5 お菓子福袋-2 5E-01-13 1 キャンディー 2 6 5E-01-13 1 キャンディー 7 5E-01-13 1 キャンディー 8 お菓子福袋-3 2G-02-31 3 板チョコ 4 9 2G-03-35 3 チョコ 10 2G-02-32 3 チョコバー 11 2H-02-35 3 チョコ-アソート 12 2G-03-31 3 イチゴチョコ 13 お菓子A 5E-01-32 5 グミ 0 14 お菓子B 2B-02-71 2 せんべい 0 15 お菓子C 4H-03-37 10 マシュマロ 0 16 お菓子福袋-4 2H-02-25 8 ラスク 4 17 2H-02-22 8 クッキー 18 2G-02-23 8 ラムネ 19 2H-02-21 8 ゼリー 20 2G-03-23 8 ガム 上記のようなデータがあり、 A列のお菓子福袋-※、（※は数字）に付随してるBCD列をB列優先で昇順で並べ替えを順次行いたいのですが、 とっかかりすらわからない状態です。 上記データであれば、 B2:D4 選択して並べ替え、次にB5:D7 選択並べ替え、B8:D12 選択並べ替え、B16:D20 を並べ替え という風にしていきたいのですが、データの行数やお菓子福袋の場所が毎回変わる為 現在は1つづつ手作業で並べかえしてる状態です。 ＜ 使用 Excel:Office365、使用 OS:Windows10 ＞ ---- とっかかり Sub test() Dim tbl As Range Dim a As Range Set tbl = Cells(1).CurrentRegion For Each a In tbl.Columns(1).SpecialCells(xlCellTypeBlanks).Areas MsgBox a.Resize(a.Count + 1, 4).Offset(-1, 1).Address Next End Sub （マナ） 2020/06/30(火) 19:09 ---- とっかかり ありがとうございます!! CurrentRegion こんなのあるんですね。 ちょっと頑張ってみます。 （ちょん丸） 2020/07/01(水) 11:26 ---- できました! マナさん ありがとうございました。 （ちょん丸） 2020/07/03(金) 08:14... - https://www.excel.studio-kazu.jp/wiki/kazuwiki/202006/20200630145201.txt - [detail] - similar
PREV
NEXT
Powered by Hyper Estraier 1.4.13, with 97047 documents and 608232 words.
訪問者：