回答編集履歴
1
表現修正
test
CHANGED
|
@@ -4,11 +4,13 @@
|
|
|
4
4
|
|
|
5
5
|
|
|
6
6
|
|
|
7
|
-
1. 重複の無いコードリストを作成します。
|
|
7
|
+
**1. 重複の無いコードリストを作成します。**
|
|
8
8
|
|
|
9
9
|
[参考ページ](http://officetanaka.net/excel/vba/tips/tips80.htm)
|
|
10
10
|
|
|
11
|
+
|
|
12
|
+
|
|
11
|
-
2. コード別に件数を集計します。
|
|
13
|
+
**2. コード別に件数を集計します。**
|
|
12
14
|
|
|
13
15
|
｢1｣の参考ページに忠実に作ると次のようなリストになってしまうと思いますが
|
|
14
16
|
|
|
@@ -24,7 +26,9 @@
|
|
|
24
26
|
|
|
25
27
|
こんな感じの配列になるはずです。
|
|
26
28
|
|
|
29
|
+
|
|
30
|
+
|
|
27
|
-
3. 件数で降順にソートします。
|
|
31
|
+
**3. 件数で降順にソートします。**
|
|
28
32
|
|
|
29
33
|
[参考ページ](http://officetanaka.net/excel/vba/tips/tips40.htm)
|
|
30
34
|
|
|
@@ -34,7 +38,9 @@
|
|
|
34
38
|
|
|
35
39
|
['A264710ASR':6,'B44347846CE':2,'C96264BHVBC':2]
|
|
36
40
|
|
|
41
|
+
|
|
42
|
+
|
|
37
|
-
4. 出来上がったリストをセルに出力します。
|
|
43
|
+
**4. 出来上がったリストをセルに出力します。**
|
|
38
44
|
|
|
39
45
|
この配列のkeysをセルに出力すれば終了
|
|
40
46
|
|