- ベストアンサー
値が入るセル全体を下にコピーした後に検索する方法2
watabe007の回答
こんな事ですか? Sub Test() Dim i As Long, ii As Long, R As Long Dim j As Long, n As Long, Colors As Variant Colors = Array(vbWhite, vbYellow, vbRed, vbGreen, vbBlue, vbMagenta, 42495) Range("A11:R483").Clear For i = 1 To Range("T1").Value Cells(2, i + 19).Copy Cells(i * 11, "A") ii = i * 11 + 1 Range("A1:R10").Copy Cells(ii, "A") For R = ii To ii + 8 Step 2 For j = 1 To 16 Step 3 n = Application.CountIf(Cells(R, j).Resize(2, 3), Cells(i * 11, "A").Value) Cells(R, j).Resize(2, 3).Interior.Color = Colors(n) Next Next Next End Sub
関連するQ&A
- 値が入るセル全体を下にコピーした後に検索する方法
どなたかご存知でしたら回答をよろしくお願いします。 【質問】 下図の様に、a～ｎ、1～10の合計140個のセルに数字が1～99迄の重複有りで 入っています。a1,a2,b1,b2の４つのセルで１つのマスとみなすと、 140個のセルは縦：5マス、横：7マスの合計35マスとなります。 使い方としては、 (1)複写数欄と検索値欄それぞれに値を入れます。 (2)複写数欄の数だけ、a1～n10の140個のセルを１塊りとして下にコピーする。 検索値欄の検索値も１つコピーする。 (3)コピー後に検索値欄の値でコピーした側のマス（4つのセルの集合）を塗潰す。 具体的には、 (1)１つのマスに一致した数字が１個の場合は黄色く塗り潰す。 (2)１つのマスに一致した数字が２個の場合は赤く塗り潰す。 (3)１つのマスに一致した数字が３個の場合は緑色で塗り潰す。 (4)１つのマスに一致した数字が４個の場合は青色で塗潰す。 〇例題 a b c d e f g h i j k l m n 1 02 05 07 07 14 13 15 16 17 28 22 32 33 37 2 03 03 07 14 13 28 99 31 23 32 31 36 32 37 3 05 01 07 06 15 07 20 08 26 12 27 19 32 37 4 04 03 08 10 10 14 12 17 24 18 30 22 37 24 5 08 01 13 02 16 04 25 09 28 15 34 24 36 34 6 01 06 05 12 18 14 22 19 23 30 26 35 28 36 7 02 03 04 11 06 16 20 21 25 26 29 27 31 29 8 07 07 08 10 09 14 17 15 18 21 19 26 20 34 9 07 07 10 04 11 05 18 13 27 20 28 33 30 34 10 07 07 16 14 19 24 24 25 27 26 33 32 35 35 複写数：01 ※最大1~37の数字が入る。 検索値：07 ※最大37個の数字が右に並ぶ。 【結果】 検索値：07 ※上記、検索値の左から１つずつ値を取得して下記のセルを検索する。 02 05 07 07 14 13 15 16 17 28 22 32 33 37 03 03 07 14 13 28 99 31 23 32 31 36 32 37 05 01 07 06 15 07 20 08 26 12 27 19 32 37 04 03 08 10 10 14 12 17 24 18 30 22 37 24 08 01 13 02 16 04 25 09 28 15 34 24 36 34 01 06 05 12 18 14 22 19 23 30 26 35 28 36 02 03 04 11 06 16 20 21 25 26 29 27 31 29 07 07 08 10 09 14 17 15 18 21 19 26 20 34 07 07 10 04 11 05 18 13 27 20 28 33 30 34 07 07 16 14 19 24 24 25 27 26 33 32 35 35 a11に”検索値”が1個コピーされ、 次にa1~n10までのセルの内容がa12~n22にコピーされた後、 コピーされた検索値の07で検索後に07が入った下記の５マス（20セル）が塗潰される。 c12,d12,c13,d13 ・・・ 3個一致なので、緑色で塗潰される。 c14,d14,c15,d15 ・・・ 1個一致なので、黄色で塗潰される。 e14,f14,e15,f15 ・・・ 1個一致なので、黄色で塗潰される。 a18,b18,a19,b19 ・・・2個一致なので、赤色で塗潰される。 a20,b20,a21,b21 ・・・４個一致なので、青色で塗潰される。 ※複写数と検索値が複数件ある場合は、複写数の数だけ下にa1~n10の内容がコピーされて、 検索値の値の左側から１個ずつコピーされその値で検索される。 〇注意事項 ・使用するエクセルは2010です。 ・1マス＝4セルです。※a1,a2,b1,b2で１マスです。 ・セルに入っている数字はランダムで、同じ数字の重複は35マス（140セル）全体で 4個迄です（１マスに4個入る事も有るし、4マスに1個ずつ入る事もあります。） ・検索値欄に入力できる数字は最大37個で、1~37迄の数字です。 ・複写数欄に入力できる数字は1~37迄の１つです。 ※複写数と検索値の数は一致していない場合はエラーとして動作をSTOPします。 例1）複写数：3、検索値：2,5,4,37,18 →検索値の数と複写数が不一致。 例2）複写数：0 検索値：3 →複写数がゼロのため。 例3）複写数：1 検索値：0 →検索値がゼロのため。 ※複写数分、a1~n10の140個のセルは下にコピーされ、検索値の値は左から １つずづ使用して、実際の検索と結果としての値として使用します。 ・セルの数字は表示上、2桁で表しています。（例：1ではなく01） 以上、よろしくお願いします。
- ベストアンサー
- Excel（エクセル）
- 検索値と同じ値か、左右の数字と連続数字なら塗潰す。
どなたかご存知でしたら回答をお願いします。 【質問】 例題の様に５×６マスが４つあり、その中を1~43の数字が重複有りで入っています。 1つ目の５×６マス：A1~F5 2つ目の５×６マス：H1~M5 3つ目の５×６マス：A7~F11 4つ目の５×６マス：H7~M11 使い方としては、 (1)複写数欄と検索値欄それぞれに値を入れます。 (2)複写数欄の数だけ、上記４つの5×6のセルを１塊りとして下にコピーする （最大：43）。 検索値欄の検索値も１つコピーする。 (3)コピー後に検索値欄の値でコピーした側の４つの5×6のセル内を検索して塗潰す。 具体的には、 (1)検索値と同じ値を見つけたら、黄色でセルを塗潰す。 (2)検索値の左右が検索値との連続数字なら、検索値とその左右のセルを赤色で塗潰す。 〇例題 Ａ B C Ｄ Ｅ Ｆ G Ｈ Ｉ Ｊ Ｋ Ｌ Ｍ 1 06 21 23 36 37 43 01 08 16 31 35 41 2 07 12 14 23 26 27 06 10 13 20 31 37 3 09 17 20 29 32 39 02 15 18 30 34 38 4 03 05 13 25 27 40 01 09 25 30 42 43 5 04 11 22 28 35 38 11 16 18 24 29 42 6 7 03 17 27 36 40 41 07 21 22 23 33 37 8 03 04 08 24 26 39 02 03 07 14 18 38 9 10 12 22 32 37 42 05 10 13 28 36 40 10 02 09 25 32 41 42 07 13 22 40 41 42 11 08 14 23 24 30 39 03 29 31 32 33 40 複写数：01 ※最大1~43の数字が入る。 検索値：41 ※最大43個の数字が右に並ぶ。 〇結果 M1、F7：41が黄色で塗潰される。 E10、F10：連続数字（41、42）が赤色で塗潰される。 K10、L10、M10：連続数字（40、41、42）が赤色で塗潰される。 〇注意事項 ・使用するエクセルは2010です。 ・セルの数字は表示上、2桁で表しています。（例：1ではなく01） ・検索値欄に入力できる数字は最大43個で、1~43迄の数字です。 ・複写数欄に入力できる数字は1~43迄の１つです。 以上、よろしくお願いします。
- ベストアンサー
- Excel（エクセル）
- 検索値と同じ値か、隣接数字との差が０か１なら塗潰す
どなたかご存知でしたら回答をお願いします。 【質問】 例題の様に５×６マスが４つあり、その中を1~43の数字が重複有りで入っています。 1つ目の５×６マス：A1~F5 2つ目の５×６マス：H1~M5 3つ目の５×６マス：A7~F11 4つ目の５×６マス：H7~M11 使い方としては、 (1)複写数欄と検索値欄それぞれに値を入れます。 (2)複写数欄の数だけ、上記４つの5×6のセルを１塊りとして下にコピーする （最大：43）。 検索値欄の検索値も１つコピーする。 (3)コピー後に検索値欄の値でコピーした側の４つの5×6のセル内を検索して塗潰す。 具体的には、 (1)検索値と同じ値を見つけたら、黄色でセルを塗潰す。 (2)検索値と同じ値で隣接する８方向（上、下、左、右、右下、左下、右上、左上） の数字との差が0か１なら、検索値とそのセルを赤色で塗潰す。 〇例題 Ａ B C Ｄ Ｅ Ｆ G Ｈ Ｉ Ｊ Ｋ Ｌ Ｍ 1 06 21 23 36 37 43 01 08 16 31 35 41 2 07 12 14 23 32 43 06 10 13 20 27 32 3 09 17 20 29 42 40 02 15 18 30 34 38 4 03 05 13 25 27 41 01 09 25 30 42 43 5 04 11 22 28 35 39 11 16 18 24 29 42 6 7 03 17 27 36 40 41 07 21 22 23 33 37 8 03 04 08 24 26 39 02 03 07 14 18 38 9 10 12 22 32 37 42 05 10 13 40 41 42 10 02 09 25 32 41 42 07 13 22 40 41 42 11 08 14 23 24 30 39 03 29 31 40 41 42 複写数：01 ※最大1~43の数字が入る。 検索値：41 ※最大43個の数字が右に並ぶ。 〇結果 M1：41が黄色で塗潰される。 E3、F3、F4 ：40、41、42が赤色で塗潰される。 E7、F7 ：40、41が赤色で塗潰される。 F9、E10、F10：41、42、42が赤色で塗潰される。 K9、L9、M9、K10、L10、M10、K11、L11、M11：40、41、42が赤色で塗潰される。 〇注意事項 ・使用するエクセルは2010です。 ・セルの数字は表示上、2桁で表しています。（例：1ではなく01） ・検索値欄に入力できる数字は最大43個で、1~43迄の数字です。 ・複写数欄に入力できる数字は1~43迄の１つです。 以上、よろしくお願いします。
- ベストアンサー
- Excel（エクセル）
- 6つのセルを１つの塊り（マス）と捉えて塗潰す方法
どなたかご存知でしたら回答をよろしくお願いします。 【質問】 下図の様に、a～r、１～１０の合計１8０個のセルに数字が１～９９迄の重複有りで 入っています。a1,a2,b1,b2,c1,c2の6つのセルで１つのマスとみなすと、 180個のセルは縦：５マス、横：6マスの合計３0マスとなります。 この条件で、検索値欄に１つ数字を入れたら、一致した数字が入っているマス （6つのセルの集合）を塗潰すにはどうすればよいですか？ 具体的には、 (1)１つのマスに一致した数字が１個の場合は黄色く塗り潰す。 (2)１つのマスに一致した数字が２個の場合は赤色で塗り潰す。 (3)１つのマスに一致した数字が３個の場合は緑色で塗り潰す。 (4)１つのマスに一致した数字が４個の場合は青色で塗潰す。 (5)１つのマスに一致した数字が5個の場合は紫色で塗潰す。 (6)１つのマスに一致した数字が6個の場合はオレンジ色で塗潰す。 a b c d e f g h i j k l m n ｏ p ｑ ｒ 1 02 05 07 07 14 13 15 16 17 28 22 32 33 37 91 92 93 94 95 2 03 03 07 14 13 28 99 31 23 32 31 36 32 37 81 82 83 84 85 3 05 01 07 06 15 07 20 08 26 12 27 19 32 37 71 72 73 74 79 4 04 03 08 10 10 14 12 17 24 18 30 22 37 24 61 60 54 49 48 5 08 01 13 02 16 04 25 09 28 15 34 24 36 34 50 55 52 67 99 6 01 06 05 12 18 14 22 19 23 30 26 35 28 36 41 42 43 44 45 7 02 03 04 11 06 16 20 21 25 26 29 27 31 29 51 68 75 76 77 8 07 07 08 10 09 14 17 15 18 21 19 26 20 34 96 97 88 87 66 9 07 07 10 04 11 05 18 13 27 20 28 33 30 34 86 39 38 49 62 10 07 07 16 14 19 24 24 25 27 26 33 32 35 35 54 86 87 88 78 検索値:07 【結果】 検索値に07を入れたら、下記の6マス（36セル）が塗潰される。 a1,b1,c1,a2,b2,c2 ・・・ 2個一致なので、緑色で塗潰される。 d1,e1,f1,d2,e2,f2・・・ 1個一致なので、黄色で塗潰される。 a3,b3,c3,a4,b4,c4 ・・・ 1個一致なので、黄色で塗潰される。 d3,e3,f3,d4,e4,f4 ・・・1個一致なので、黄色で塗潰される。 a7,b7,c7,a8,b8,c8 ・・・2個一致なので、赤色で塗潰される。 a9,b9,c9,a10,b10,c10・・・4個一致なので、青色で塗潰される。 〇注意事項 ・使用するエクセルは２０１０です。 ・１マス＝6セルです。※a1,a2,b1,b2,c1,c2で１マスです。 ・セルに入っている数字はランダムで、同じ数字の重複は30マス（180セル）全体で 6個迄です（１つのマスに6個入る事も有るし、6つのマスに１個ずつ入る事も あります。） ・検索値欄に入力できる数字は１～９９迄の１つです。 ・セルの数字は表示上、２桁で表しています。（例：１ではなく０１） ・この質問は先月、「４つのセルを１つの塊り（マス）と捉えて塗潰す方法３」という タイトルで質問させて頂いた、６セル版での質問です。 以上、よろしくお願いします。
- ベストアンサー
- Excel（エクセル）
- ４つのセルを１つの塊り（マス）と捉えて塗潰す方法３
どなたかご存知でしたら回答をよろしくお願いします。 【質問】 下図の様に、a～ｎ、１～１０の合計１４０個のセルに数字が１～９９迄の重複有りで 入っています。a1,a2,b1,b2の４つのセルで１つのマスとみなすと、 140個のセルは縦：５マス、横：７マスの合計３５マスとなります。 この条件で、検索値欄に１つ数字を入れたら、一致した数字が入っているマス （４つのセルの集合）を塗潰すにはどうすればよいですか？ 具体的には、 (1)１つのマスに一致した数字が１個の場合は黄色く塗り潰す。 (2)１つのマスに一致した数字が２個の場合は赤く塗り潰す。 (3)１つのマスに一致した数字が３個の場合は緑色で塗り潰す。 (4)１つのマスに一致した数字が４個の場合は青色で塗潰す。 〇例題 a b c d e f g h i j k l m n 1 02 05 07 07 14 13 15 16 17 28 22 32 33 37 2 03 03 07 14 13 28 99 31 23 32 31 36 32 37 3 05 01 07 06 15 07 20 08 26 12 27 19 32 37 4 04 03 08 10 10 14 12 17 24 18 30 22 37 24 5 08 01 13 02 16 04 25 09 28 15 34 24 36 34 6 01 06 05 12 18 14 22 19 23 30 26 35 28 36 7 02 03 04 11 06 16 20 21 25 26 29 27 31 29 8 07 07 08 10 09 14 17 15 18 21 19 26 20 34 9 07 07 10 04 11 05 18 13 27 20 28 33 30 34 10 07 07 16 14 19 24 24 25 27 26 33 32 35 35 検索値:07 【結果】 検索値に07を入れたら、下記の５マス（２0セル）が塗潰される。 c1,d1,c2,d2 ・・・ 3個一致なので、緑色で塗潰される。 c3,d3,c4,d4 ・・・ 1個一致なので、黄色で塗潰される。 e3,f3,e4,f4 ・・・ 1個一致なので、黄色で塗潰される。 a7,b7,a8,b8 ・・・2個一致なので、赤色で塗潰される。 a9,b9,a10,b10 ・・・４個一致なので、青色で塗潰される。 〇注意事項 ・使用するエクセルは２０１０です。 ・１マス＝４セルです。※a1,a2,b1,b2で１マスです。 ・セルに入っている数字はランダムで、同じ数字の重複は35マス（140セル）全体で ４個迄です（１つのマスに４個入る事も有るし、４つのマスに１個ずつ入る事も あります。） ・検索値欄に入力できる数字は１～９９迄の１つです。 ・セルの数字は表示上、２桁で表しています。（例：１ではなく０１） 以上、よろしくお願いします。
- ベストアンサー
- Excel（エクセル）
- ４つのセルを１つの塊り（マス）と捉えて塗潰す方法２
どなたかご存知でしたら回答をよろしくお願いします。 【質問】 下図の様に、a～ｎ、１～１０の合計１４０個のセルに数字が１～９９迄の重複有りで 入っています。a1,a2,b1,b2の４つのセルで１つのマスとみなすと、 140個のセルは縦：５マス、横：７マスの合計３５マスとなります。 この条件で、検索値欄に１つ数字を入れたら、 一致した数字が入っているマス（４つのセルの集合）を塗潰すにはどうすればよいですか？ 具体的には、１つのマスに一致した数字が２個以上重複している場合は、赤く塗り潰す。 １個の場合は黄色く塗り潰す事がしたいです。 〇例題 a b c d e f g h i j k l m n 1 02 05 08 09 14 13 15 16 17 28 22 32 33 37 2 03 03 05 14 13 28 99 31 23 32 31 36 32 37 3 05 01 07 06 15 07 20 08 26 12 27 19 32 37 4 04 03 08 10 10 14 12 17 24 18 30 22 37 24 5 08 01 13 02 16 04 25 09 28 15 34 24 36 34 6 01 06 05 12 18 14 22 19 23 30 26 35 28 36 7 02 03 04 11 06 16 20 21 25 26 29 27 31 29 8 07 07 08 10 09 14 17 15 18 21 19 26 20 34 9 01 02 10 04 11 05 18 13 27 20 28 33 30 34 10 12 11 16 14 19 24 24 25 27 26 33 32 35 35 検索値:07 【結果】 検索値に07を入れたら、下記の３マス（12セル）が塗潰される。 c3,d3,c4,d4 ・・・ 1個一致なので、黄色で塗潰される。 e3,f3,e4,f4 ・・・ 1個一致なので、黄色で塗潰される。 a7,b7,a8,b8 ・・・2個一致なので、赤色で塗潰される。 〇注意事項 ・使用するエクセルは２０１０です。 ・１マス＝４セルです。※a1,a2,b1,b2で１マスです。 ・セルに入っている数字はランダムで、同じ数字の重複は35マス（140セル）全体で ４個迄です（１つのマスに４個入る事も有るし、４つのマスに１個ずつ入る事も あります。） ・検索値欄に入力できる数字は１～９９迄の１つです。 ・セルの数字は表示上、２桁で表しています。（例：１ではなく０１） 以上、よろしくお願いします。
- ベストアンサー
- Excel（エクセル）
- ５×６マス検索→５×５マス検索への改造の仕方。
いつもお世話になっております。 先日こちらで、「検索値と同じ値か、隣接数字との差が０か１なら塗潰す」を 質問させて頂き、回答をいただきました。 この時は５×６マスが４つあるケースでしたが、 これを、以下の様に５×５マスが４つあるケースでは どうすればよいでしょうか？ マスが変更になった以外は前回と変更ありません。 できれば、5×7マスが４つのケースも教えて頂けると助かります。 1つ目の5×5マス：A1~E5 2つ目の5×5マス：G1~K5 3つ目の5×5マス：A7~E11 4つ目の5×5マス：G7~K11 Ａ B C Ｄ Ｅ Ｆ G Ｈ Ｉ Ｊ Ｋ 1 01 08 11 18 25 03 06 17 20 24 2 02 19 23 26 27 01 08 16 18 25 3 10 15 28 29 30 02 11 19 23 26 4 04 07 12 14 21 10 15 27 28 30 5 05 09 13 22 31 04 07 12 21 29 6 7 08 11 12 20 28 04 15 17 25 31 8 06 07 22 23 26 01 09 13 19 29 9 01 09 19 24 29 10 11 14 24 28 10 03 10 14 18 27 03 05 18 21 27 11 02 05 16 21 30 02 16 17 30 31 ＊＊＊＊＊＊ 以下は前回の質問 ＊＊＊＊＊＊ 【質問】 例題の様に５×６マスが４つあり、その中を1~43の数字が重複有りで入っています。 1つ目の５×６マス：A1~F5 2つ目の５×６マス：H1~M5 3つ目の５×６マス：A7~F11 4つ目の５×６マス：H7~M11 使い方としては、 (1)複写数欄と検索値欄それぞれに値を入れます。 (2)複写数欄の数だけ、上記４つの5×6のセルを１塊りとして下にコピーする （最大：43）。 検索値欄の検索値も１つコピーする。 (3)コピー後に検索値欄の値でコピーした側の４つの5×6のセル内を検索して塗潰す。 具体的には、 (1)検索値と同じ値を見つけたら、黄色でセルを塗潰す。 (2)検索値と同じ値で隣接する８方向（上、下、左、右、右下、左下、右上、左上） の数字との差が0か１なら、検索値とそのセルを赤色で塗潰す。 〇例題 Ａ B C Ｄ Ｅ Ｆ G Ｈ Ｉ Ｊ Ｋ Ｌ Ｍ 1 06 21 23 36 37 43 01 08 16 31 35 41 2 07 12 14 23 32 43 06 10 13 20 27 32 3 09 17 20 29 42 40 02 15 18 30 34 38 4 03 05 13 25 27 41 01 09 25 30 42 43 5 04 11 22 28 35 39 11 16 18 24 29 42 6 7 03 17 27 36 40 41 07 21 22 23 33 37 8 03 04 08 24 26 39 02 03 07 14 18 38 9 10 12 22 32 37 42 05 10 13 40 41 42 10 02 09 25 32 41 42 07 13 22 40 41 42 11 08 14 23 24 30 39 03 29 31 40 41 42 複写数：01 ※最大1~43の数字が入る。 検索値：41 ※最大43個の数字が右に並ぶ。 〇結果 M1：41が黄色で塗潰される。 E3、F3、F4 ：40、41、42が赤色で塗潰される。 E7、F7 ：40、41が赤色で塗潰される。 F9、E10、F10：41、42、42が赤色で塗潰される。 K9、L9、M9、K10、L10、M10、K11、L11、M11：40、41、42が赤色で塗潰される。 〇注意事項 ・使用するエクセルは2010です。 ・セルの数字は表示上、2桁で表しています。（例：1ではなく01） ・検索値欄に入力できる数字は最大43個で、1~43迄の数字です。 ・複写数欄に入力できる数字は1~43迄の１つです。 以上、よろしくお願いします。
- ベストアンサー
- Excel（エクセル）
- 【改造】検索値と一緒に出ている隣接数字を知るには？
いつもお世話になっております。 どかたかご存知でしたら回答をお願いします。 １ケ月程前に下記の質問をさせていただきました。 そして回答を頂きました。これを改造したく質問します。 尚、5×6マス以外に、5×5マス、5×7マスへの改造方法も教えて頂けると助かります。 ◆改造（付け加える）要件・・・下記以外は前回と同じです。 (3)コピー後に検索値欄の値でコピーした側の４つの5×6のセル内を検索して塗潰す。 具体的には、 (1)検索値と同じ値を見つけたら、黄色でセルを塗潰す。【既存】 (2)検索値と同じ値で隣接する８方向（上、下、左、右、右下、左下、右上、左上） の数字との差が0か１なら、検索値とそのセルを赤色で塗潰す。【既存】 (3)検索値と同じ値で隣接する８方向（上、下、左、右、右下、左下、右上、左上） の数字が全て同じなら、青く塗り潰す。【追加】 〇例題 Ａ B C Ｄ Ｅ Ｆ G Ｈ Ｉ Ｊ Ｋ Ｌ Ｍ 1 01 11 16 26 31 40 08 15 21 25 30 35 2 02 03 06 17 27 41 01 11 26 28 31 36 3 04 09 12 19 22 42 02 03 06 16 17 37 4 05 13 14 23 29 43 04 09 12 22 27 38 5 07 10 18 20 24 27 05 13 19 23 29 39 6 7 04 13 16 30 31 33 05 08 20 22 26 37 8 02 15 17 24 29 34 01 03 07 18 19 38 9 01 03 07 19 25 35 04 12 14 16 25 39 10 11 12 14 21 27 36 10 11 21 23 27 40 11 06 09 10 23 28 37 06 08 09 20 28 41 複写数：01 ※最大1~43の数字が入る。 検索値：01 ※最大43個の数字が右に並ぶ。 〇結果 A1、H2、A9、H8：01が黄色で塗潰される。 A2、H3、A8 ：02が赤色で塗潰される。 B2、I3、B9、I8 ：03が青色で塗潰される。 〇青色を塗潰す説明 A1にある01の隣接数字は小さい順に、02、03、11 H2にある01の隣接数字は小さい順に、02、03、08、11、15 A9にある01の隣接数字は小さい順に、02、03、11、12、15 H8にある01の隣接数字は小さい順に、03、04、05、08、12 01が見つかった４か所全てに出現している隣接数字は03なので03を青色で塗潰す。 逆に03を検索値とした場合は、 B2にある03接数字は小さい順に、01、02、04、06、09、11、12、16 I3にある03隣接数字は小さい順に、01、02、04、06、09、11、12、26 B9にある03隣接数字は小さい順に、01、02、07、11、12、14、15、17 I8にある0の隣接数字は小さい順に、01、04、05、07、08、12、14、20 03が見つかった４か所全てに出現している隣接数字は01、12なので、 01、12を青色で塗潰す。 ＊＊＊＊2018/11/21の質問の内容＊＊＊＊ 【質問】 例題の様に５×６マスが４つあり、その中を1~43の数字が重複有りで入っています。 1つ目の５×６マス：A1~F5 2つ目の５×６マス：H1~M5 3つ目の５×６マス：A7~F11 4つ目の５×６マス：H7~M11 使い方としては、 (1)複写数欄と検索値欄それぞれに値を入れます。 (2)複写数欄の数だけ、上記４つの5×6のセルを１塊りとして下にコピーする （最大：43）。 検索値欄の検索値も１つコピーする。 (3)コピー後に検索値欄の値でコピーした側の４つの5×6のセル内を検索して塗潰す。 具体的には、 (1)検索値と同じ値を見つけたら、黄色でセルを塗潰す。 (2)検索値と同じ値で隣接する８方向（上、下、左、右、右下、左下、右上、左上） の数字との差が0か１なら、検索値とそのセルを赤色で塗潰す。 〇例題 Ａ B C Ｄ Ｅ Ｆ G Ｈ Ｉ Ｊ Ｋ Ｌ Ｍ 1 06 21 23 36 37 43 01 08 16 31 35 41 2 07 12 14 23 32 43 06 10 13 20 27 32 3 09 17 20 29 42 40 02 15 18 30 34 38 4 03 05 13 25 27 41 01 09 25 30 42 43 5 04 11 22 28 35 39 11 16 18 24 29 42 6 7 03 17 27 36 40 41 07 21 22 23 33 37 8 03 04 08 24 26 39 02 03 07 14 18 38 9 10 12 22 32 37 42 05 10 13 40 41 42 10 02 09 25 32 41 42 07 13 22 40 41 42 11 08 14 23 24 30 39 03 29 31 40 41 42 複写数：01 ※最大1~43の数字が入る。 検索値：41 ※最大43個の数字が右に並ぶ。 〇結果 M1：41が黄色で塗潰される。 E3、F3、F4 ：40、41、42が赤色で塗潰される。 E7、F7 ：40、41が赤色で塗潰される。 F9、E10、F10：41、42、42が赤色で塗潰される。 K9、L9、M9、K10、L10、M10、K11、L11、M11：40、41、42が赤色で塗潰される。 〇注意事項 ・使用するエクセルは2010です。 ・セルの数字は表示上、2桁で表しています。（例：1ではなく01） ・検索値欄に入力できる数字は最大43個で、1~43迄の数字です。 ・複写数欄に入力できる数字は1~43迄の１つです。 以上、よろしくお願いします。
- ベストアンサー
- Excel（エクセル）
- ４つのセルを１つの塊り（マス）ととらえて塗潰す方法
どなたかご存知でしたら回答をよろしくお願いします。 【質問】 下図の様に、a～ｎ、１～１０の合計１４０個のセルに数字が１～９９迄の重複有りで 入っています。a1,a2,b1,b2の４つのセルで１つのマスとみなすと、 140個のセルは縦：５マス、横：７マスの合計３５マスとなります。 この条件で、検索値欄に１つ数字を入れたら、 一致した数字が入っているマス（４つのセルの集合）を塗潰すにはどうすればよいですか？ 〇例題 a b c d e f g h i j k l m n 1 02 05 08 09 14 13 15 16 17 28 22 32 33 37 2 03 03 05 14 13 28 99 31 23 32 31 36 32 37 3 05 01 07 06 15 07 20 08 26 12 27 19 32 37 4 04 03 08 10 10 14 12 17 24 18 30 22 37 24 5 08 01 13 02 16 04 25 09 28 15 34 24 36 34 6 01 06 05 12 18 14 22 19 23 30 26 35 28 36 7 02 03 04 11 06 16 20 21 25 26 29 27 31 29 8 07 07 08 10 09 14 17 15 18 21 19 26 20 34 9 01 02 10 04 11 05 18 13 27 20 28 33 30 34 10 12 11 16 14 19 24 24 25 27 26 33 32 35 35 検索値: 07 【結果】 検索値に07を入れたら、下記の３マス（12セル）が塗潰される。 c3,d3,c4,d4 e3,f3,e4,f4 a7,b7,a8,b8 〇注意事項 ・使用するエクセルは２０１０です。 ・１マス＝４セルです。※a1,a2,b1,b2で１マスです。 ・セルに入っている数字はランダムで、同じ数字の重複は35マス（140セル）全体で ４個迄です（１つのマスに４個入る事も有るし、４つのマスに１個ずつ入る事も あります。） ・検索値欄に入力できる数字は１～９９迄の１つです。 ・セルの数字は表示上、２桁で表しています。（例：１ではなく０１） 以上、よろしくお願いします。
- ベストアンサー
- Excel（エクセル）
- 【改造】検索値と一緒に出ている隣接数字を知るには2
いつもお世話になっております。 どかたかご存知でしたら回答をお願いします。 ここ最近、同じ様な質問をしておりますが、よろしくお願いします。 ◆改造（付け加える）要件・・・下記以外は前回と同じです。 (3)コピー後に検索値欄の値でコピーした側の４つの5×6のセル内を検索して塗潰す。 具体的には、 (1)検索値と同じ値を見つけたら、黄色でセルを塗潰す。【既存】 (2)検索値と同じ値で隣接する８方向（上、下、左、右、右下、左下、右上、左上） の数字との差が0か１なら、検索値とそのセルを赤色で塗潰す。【既存】 (3)検索値と同じ値で隣接する８方向（上、下、左、右、右下、左下、右上、左上） の数字が全て同じなら、青く塗り潰す。【既存】 (4)検索値と同じ値で隣接する８方向（上、下、左、右、右下、左下、右上、左上） の数字が１ヶ所を除いて全て同じなら、緑色で塗り潰す。【追加】 〇例題 Ａ B C Ｄ Ｅ Ｆ G Ｈ Ｉ Ｊ Ｋ Ｌ Ｍ 1 01 11 16 26 31 40 08 15 21 25 30 35 2 02 03 06 17 27 41 01 11 26 28 31 36 3 04 09 12 19 22 42 02 03 06 16 17 37 4 05 13 14 23 29 43 04 09 12 22 27 38 5 07 10 18 20 24 27 05 13 19 23 29 39 6 7 04 13 16 30 31 33 05 08 20 22 26 37 8 02 15 17 24 29 34 01 03 07 18 19 38 9 01 03 07 19 25 35 04 12 14 16 25 39 10 11 12 14 21 27 36 10 11 21 23 27 40 11 06 09 10 23 28 37 06 08 09 20 28 41 複写数：01 ※最大1~43の数字が入る。 検索値：01 ※最大43個の数字が右に並ぶ。 〇結果 A1、H2、A9、H8：01が黄色で塗潰される。 A2、H3、A8 ：02が赤色となる筈だが、３ヶ所で出ているので緑色で塗潰す。 B2、I3、B9、I8 ：03が青色で塗潰される。 B1、I2、A10 ：11が緑色で塗潰される。 〇青色、緑色で塗潰す説明 A1にある01の隣接数字は小さい順に、02、03、11 H2にある01の隣接数字は小さい順に、02、03、08、11、15 A9にある01の隣接数字は小さい順に、02、03、11、12、15 H8にある01の隣接数字は小さい順に、03、04、05、08、12 01が見つかった４か所全てに出現している隣接数字は03なので03を青色で塗潰す。 01が見つかった３か所全てに出現している隣接数字は02と11なので、 02と11を緑色で塗潰す。 ※02は本来、01の差：１のため赤色となるが、緑色の条件にも当てはまるため最終的に 緑色で塗潰す。（青色の条件に当てはまった場合も緑色の条件にも当てはまれば最終的に 緑色で塗潰す。） 逆に03を検索値とした場合は、 B2にある03接数字は小さい順に、01、02、04、06、09、11、12、16 I3にある03隣接数字は小さい順に、01、02、04、06、09、11、12、26 B9にある03隣接数字は小さい順に、01、02、07、11、12、14、15、17 I8にある0の隣接数字は小さい順に、01、04、05、07、08、12、14、20 03が見つかった４か所全てに出現している隣接数字は01、12なので、 01、12を青色で塗潰す。 03が見つかった3か所全てに出現している隣接数字は02、04、11、なので、 02、04、11を緑色で塗潰す。 ＊＊＊＊2018/11/21の質問の内容＊＊＊＊ 【質問】 例題の様に５×６マスが４つあり、その中を1~43の数字が重複有りで入っています。 1つ目の５×６マス：A1~F5 2つ目の５×６マス：H1~M5 3つ目の５×６マス：A7~F11 4つ目の５×６マス：H7~M11 使い方としては、 (1)複写数欄と検索値欄それぞれに値を入れます。 (2)複写数欄の数だけ、上記４つの5×6のセルを１塊りとして下にコピーする （最大：43）。 検索値欄の検索値も１つコピーする。 (3)コピー後に検索値欄の値でコピーした側の４つの5×6のセル内を検索して塗潰す。 具体的には、 (1)検索値と同じ値を見つけたら、黄色でセルを塗潰す。 (2)検索値と同じ値で隣接する８方向（上、下、左、右、右下、左下、右上、左上） の数字との差が0か１なら、検索値とそのセルを赤色で塗潰す。 〇例題 Ａ B C Ｄ Ｅ Ｆ G Ｈ Ｉ Ｊ Ｋ Ｌ Ｍ 1 06 21 23 36 37 43 01 08 16 31 35 41 2 07 12 14 23 32 43 06 10 13 20 27 32 3 09 17 20 29 42 40 02 15 18 30 34 38 4 03 05 13 25 27 41 01 09 25 30 42 43 5 04 11 22 28 35 39 11 16 18 24 29 42 6 7 03 17 27 36 40 41 07 21 22 23 33 37 8 03 04 08 24 26 39 02 03 07 14 18 38 9 10 12 22 32 37 42 05 10 13 40 41 42 10 02 09 25 32 41 42 07 13 22 40 41 42 11 08 14 23 24 30 39 03 29 31 40 41 42 複写数：01 ※最大1~43の数字が入る。 検索値：41 ※最大43個の数字が右に並ぶ。 〇結果 M1：41が黄色で塗潰される。 E3、F3、F4 ：40、41、42が赤色で塗潰される。 E7、F7 ：40、41が赤色で塗潰される。 F9、E10、F10：41、42、42が赤色で塗潰される。 K9、L9、M9、K10、L10、M10、K11、L11、M11：40、41、42が赤色で塗潰される。 〇注意事項 ・使用するエクセルは2010です。 ・セルの数字は表示上、2桁で表しています。（例：1ではなく01） ・検索値欄に入力できる数字は最大43個で、1~43迄の数字です。 ・複写数欄に入力できる数字は1~43迄の１つです。 以上、よろしくお願いします。
- ベストアンサー
- Excel（エクセル）