質問編集履歴

3

画像を変更しました

2020/09/16 14:19

投稿

qqkf
qqkf

スコア10

test CHANGED
File without changes
test CHANGED
@@ -70,17 +70,9 @@
70
70
 
71
71
 
72
72
 
73
- ![イメージ説明](dc52569e44e1ec01eb13d14413b0234c.jpeg)
73
+ ![イメージ説明](4773e1ef9b8251cbb10aac946b562baf.jpeg)
74
74
 
75
75
  画像3 比較一覧表.xlsの画面
76
-
77
-
78
-
79
- 画像の関係上一つのシートで纏めした。
80
-
81
- 実際には、シート2は、"2_比較一覧"、シート3は、"3_比較一覧"に記載しています。
82
-
83
- この比較一覧表のタイプ一覧を含めてランク付けしたいです。
84
76
 
85
77
 
86
78
 

2

分からないところ再編集

2020/09/16 14:19

投稿

qqkf
qqkf

スコア10

test CHANGED
File without changes
test CHANGED
@@ -10,7 +10,9 @@
10
10
 
11
11
  ・チェックボックスにチェックを入れた後、
12
12
 
13
- ファイル(比較一覧表.xls)の中にあるタイプ一覧項目をどうやってチェックし、比較しているか分からないです。
13
+ ファイル(比較一覧表.xls)の中にあるタイプ一覧項目をどうやってチェックし、
14
+
15
+ 手順①の緑枠Sampleデータと比較一覧表ファイルのSampleデータを比較しているか分からないです。
14
16
 
15
17
 
16
18
 

1

質問したいことが伝わりづらかったため再編集しました。

2020/09/16 13:42

投稿

qqkf
qqkf

スコア10

test CHANGED
@@ -1 +1 @@
1
- VBA チェックボックスにチェックを入れてランク付けをしたい
1
+ VBA チェックボックスにチェックした項目だけ選んで、その中でランク付けをしたい
test CHANGED
@@ -1,24 +1,30 @@
1
- チェックボックスに比較したい項目チェックを入れ、チェック入れたものに対して比較をしたいです。
1
+ ■実現したいことは以下なります。
2
2
 
3
- 結果、画像1の黄色枠チェック入れたものだけがランク付けさせたいです。
3
+ ・手順②(画像1)で指定したファイル(比較一覧表.xls)あるタイプ一覧項目(画像3)
4
4
 
5
- 前回、読み込んだデータと他ブックを比較しランク付けを行い、全ての項目に対して比較を行い、上位7位まで表示させました。
6
-
7
- 今回は、タイプ一覧の項目から比較したい項目対してチェックし、その中でランク付けをたいです。
5
+ 手順③で必要なタイプ一覧だけにチェックし、その中でランク付けし、黄色枠にも結果表示させたい
8
6
 
9
7
 
10
8
 
11
- 実現したいことは以下になります。
9
+ ■分からないこと
12
10
 
13
- 1':「自動比較ツール.xlsm」の手順③のチェックボックスにチェックを入れて比較させい。
11
+ チェックボックスにチェックを入れた後、
14
12
 
15
- 2':チェック項目に全てチェックが入ってない場合は全て比較するようにい。
13
+ ファイル(比較一覧表.xls)の中にあるタイプ一覧項目をどうやってチェック、比較しるか分からないです
16
-
17
- 3':比較後、黄色枠タイプ一覧にも表示させるようにしたいです。
18
14
 
19
15
 
20
16
 
17
+ ■前提
18
+
19
+ ・今までは、タイプ一覧項目を作らずに手順①の緑枠(画像1)のSampleデータと
20
+
21
+ 手順②のSampleデータを比べてランク付けをしました。
22
+
23
+
24
+
25
+
26
+
21
- 実際の画像が以下になります。
27
+ 画像が以下になります。
22
28
 
23
29
 
24
30
 
@@ -28,21 +34,15 @@
28
34
 
29
35
 
30
36
 
31
- 手順③に比較したい項目にチェックを入れ、その中で比較をしたいです。
32
-
33
- 比較後、黄色枠にも比較した項目を入れて表示させたいです。
34
-
35
-
36
-
37
37
  ![イメージ説明](d23247cb485ca81cc22691c7f4775d20.jpeg)
38
38
 
39
39
  画像2 自動比較ツール.xlsmの画面 順位付けシート
40
40
 
41
41
 
42
42
 
43
- データ比較シートの緑枠と手順②比較項目一覧を絶対値の差で比較しました。
43
+ データ比較シートの緑枠(画像1)のSampleデータと手順②のSampleデータを絶対値の差で比較しました。
44
44
 
45
- 差を出した後、P2~V16で点数評価し、合計が一番少ないのがランク上位に表示させています。
45
+ 差を出した後、P2~V16でRANK関数で点数評価し、合計が一番少ないのがランク上位に表示させています。
46
46
 
47
47
  i2=ABS(B2-I$1)
48
48
 
@@ -164,44 +164,4 @@
164
164
 
165
165
  ```
166
166
 
167
-
168
-
169
- ```VBA
170
-
171
- '標準モジュールからチェックボックスのコードを入れたのですが、
172
-
173
- 'ここからどうやってチェックしたものに対して比較したらいいのか分からないです。
174
-
175
- '文字列比較方法が分からないです。
176
-
177
- Option Explicit
178
-
179
-
180
-
181
- Sub abc_1_Click()
182
-
183
-
184
-
185
- End Sub
186
-
187
- Sub abc_2_Click()
188
-
189
-
190
-
191
- End Sub
192
-
193
- Sub def_1_Click()
194
-
195
-
196
-
197
- End Sub
198
-
199
- Sub def_2_Click()
200
-
201
-
202
-
203
- End Sub
204
-
205
- ```
206
-
207
167
  よろしくお願いいたします。