指定した範囲までの抽選結果を別シートに表示!

このQ&Aのポイント
  • 数字選択式宝くじロト6、ミニロトの抽選結果をエクセルにつけております。最新抽選回数から指定した範囲までの抽選結果を別シートに表示させる方法が知りたいです。
  • 抽選回数には1〜999までの数字が入り、抽出シートには最新抽選回から抽出回数で指定した回数までの抽選結果が表示されます。
  • エクセルは2007を使用しています。ご存じの方、回答をお願いします。
回答を見る
  • ベストアンサー

指定した範囲迄の抽選結果を別シートに表示する。

どなたかご存じでしたら回答をお願いします。 数字選択式宝くじロト6、ミニロトの抽選結果をエクセルにつけております。 それを利用して、『最新抽選回数から指定した範囲迄の抽選結果を別シートに表示させる。』 方法が知りたいです。 【抽選結果シート】 ※631回を最新抽選回数とする。 抽選回 第1数字 第2数字 第3数字 第4数字 第5数字 第6数字 ボ数字                619      2    11     29     31    33     38     14 620      7    10     13     19    31     38     12 621      6    15     16     28    36     40     20 622      7    16     18     20    27     36     41 623      7     8     16     35    39     42     9 624      4     8     12     22    25     30    43 625      5    17     26     37    39     42    20 626      6    13     14     22    26     28    10 627      2     4     7      19    34     42    30 628      7    13     15     18    29     38    30 629      6    16     21     30    34     43    36 630      3     7     13     18    19     41    38 631      2     5     7      10    36     40    12 【抽出回数】 6 【抽出シート】 ※最新抽選回から6回前迄の抽選結果を表示。 抽選回 第1数字 第2数字 第3数字 第4数字 第5数字 第6数字 ボ数字  626      6    13     14     22    26     28    10 627      2     4     7      19    34     42    30 628      7    13     15     18    29     38    30 629      6    16     21     30    34     43    36 630      3     7     13     18    19     41    38 631      2     5     7      10    36     40    12 ◎注意事項  ・抽選結果シートは第1回抽選から最新抽選回まで入力されています。  ・最新抽選回は毎回抽選結果を追加入力します。  ・抽出回数には1~999までの数字が入ります。  ・抽出シートには、最新抽選回から抽出回数で指定した回数まで遡り、   その範囲の抽選結果シートの内容が表示されます。  ・エクセルは2007です。  以上、ご回答よろしくお願いします。 

質問者が選んだベストアンサー

  • ベストアンサー
  • tom04
  • ベストアンサー率49% (2537/5117)
回答No.3

こんにちは! 一例です。 Sheet1のデータをSheet2に表示するようにしてみました。 Sheet2の1行目はSheet1と同様の項目が入っているものとします。 Sheet2のA2セルに =INDEX(Sheet1!A:A,MATCH(LARGE(Sheet1!$A:$A,7-ROW(A1)),Sheet1!$A:$A,0)) という数式を入れ 下へ6行分コピー! そのまま列方向へオートフィルでコピーではどうでしょうか? ※ 今回は「6」回分ですが、表示回数を変えたい場合は数式内の >7-ROW(A1) の部分で調整してください。m(_ _)m

moguo4649
質問者

お礼

お久しぶりです。 ご回答ありがとうございます。 シンプルな方法でできるんですね。 また、抽出回数を式に取り込むのはgoodです。

その他の回答 (4)

  • mar00
  • ベストアンサー率36% (158/430)
回答No.5

抽出シートは下図のようになっているとします。 セルB1に週出回数を入力すると表示されます。 Private Sub Worksheet_Change(ByVal Target As Range) Set WS01 = Sheets("抽選結果") If Target.Address <> "$B$1" Then Exit Sub If Target = "" Then Exit Sub If Cells(Rows.Count, 1).End(xlUp).Row <> 3 Then Range("A4:H" & Cells(Rows.Count, 1).End(xlUp).Row).Clear End If myRow1 = WS01.Cells(Rows.Count, 1).End(xlUp).Offset(-Target.Value + 1).Row myRow2 = WS01.Cells(Rows.Count, 1).End(xlUp).Row WS01.Range("A" & myRow1 & ":H" & myRow2).Copy Destination:=Range("A4") End Sub

moguo4649
質問者

お礼

ご回答ありがとうございます。 VBAではこう記述するのですか。 勉強になります。 ありがとうございます。

  • hallo-2007
  • ベストアンサー率41% (888/2115)
回答No.4

エクセルのフィルターオプションという機能をご存知でしょうか。 http://www.eurus.dti.ne.jp/yoneyama/Excel2007/excel2007-filter2.html などを参考にしてください。 【抽出回数】 6 と入力した場合に、抽出の条件を関数で表示したくなるとおもいますが。 B1セルに 6 と入っているとして 抽選回 =">=" &LARGE(Sheet1!A:A,B1) とでもすればOKですし 毎回、フィルターオプションの操作をするのも厄介といわれるなら マクロの記録で 操作内容を VBA化してください。

moguo4649
質問者

お礼

ご回答ありがとうございます。 フィルター機能も一考ですね。 ありがとうございます。

  • KURUMITO
  • ベストアンサー率42% (1835/4283)
回答No.2

例えば元の表がシート1にあり、1行目は項目名でA1セルからH1セルまであり、2行目から下方にデータがあるとします。抽出の結果をシート2に表示させるとします。シート2のA1セルには遡って表示する抽出回数を例えば6行遡るのでしたら6と入力します。 2行目には項目名を入力するとしてA3セルには次の式を入力してH3セルまでオートフィルドラッグコピーしたのちに下方にもオートフィルドラッグコピーします。 =IF(OR(MAX(Sheet1!$A:$A)=0,ROW(A1)>$A$1),"",IF(MAX(Sheet1!$A:$A)<6,INDEX(Sheet1!$A:$H,ROW(A1)+1,COLUMN(A1)),INDEX(Sheet1!$A:$H,MATCH(MAX(Sheet1!$A:$A),Sheet1!$A:$A,0)-$A$1-1+ROW(A1),COLUMN(A1))))

moguo4649
質問者

お礼

ご回答ありがとうございます。 随分と長く難しい式ですね。。

  • keithin
  • ベストアンサー率66% (5278/7940)
回答No.1

抽出回数をどこに記入したいのか不明なので,抽出シートのA1に記入します。 A2には =IF(ROW(A1)>MIN(MAX(抽選結果!A:A),$A$1),"",MAX(0,MAX(抽選結果!A:A)-$A$1)+ROW(A1)) 以下コピー B2に =IFERROR(VLOOKUP($A2,抽選結果!$A:$H,COLUMN()),"") 右にコピー,下にコピー。

moguo4649
質問者

お礼

いつもお世話になります。 そうでした!抽出回数がどこにあるかを! 失礼しました。

関連するQ&A

  • 指定した抽選間隔の抽選結果を表示する。

    どなたかご存じでしたら回答をお願いします。 数字選択式宝くじの「ミニロト」の抽選結果を毎回エクセルに入力しております。 それを次回の予想に利用しておりますが、「最新抽選結果から第1回目抽選回迄の間で、 n回間隔の抽選結果を抽出する方法」が知りたいです。 例を言うと、【抽選結果シート】の最新抽選結果が180回で、”60回間隔”という指定をすると、 【n回間隔抽選選結果】のように180回を基準として60回前の抽選結果である120回とさらに そこから60回前の60回の抽選回の結果を抽出する。 【抽選結果シート】 抽選回  第1数字 第2数字 第3数字 第4数字 第5数字 ボーナス数字   1    01     02     03     04     05     06   2    11     15     16     17     19     20                    ---途中省略 ----   60    03     07     10     20     25     06 ---途中省略 ----  120    15     16     17     18     23     10 ---途中省略 ----  180    07     08     12     15     25     05 【n回間隔抽選選結果】 抽選回  第1数字 第2数字 第3数字 第4数字 第5数字 ボーナス数字    60   03     07     10     20     25     06   120   15     16     17     18     23     10   180   07     08     12     15     25     05 例として60と言ってますが、これは変数なので10とか30といったのに変わります。 エクセルでの操作およびVBAでのソースを教えてください。 また、抽選回に入っているのは数値で、第1数字~ボーナス数字までに入っているのは 文字としています。 以上  

  • 抽選結果を末尾数字で纏めて表示させる方法

    どなたかご存じでしたら回答をお願いします。 数字選択式宝くじロト6の抽選結果をエクセルにつけております。 【質問】  抽選結果である第1~ボまでの7つの数字が各セルに入っておりますが、  7つの数字の末尾数字を抽出して重複チェックを行い【出現末尾数字】として  小さい数字順に表示させ、出現しなかった末尾数字を【未出現末尾数字】として  小さい数字順に表示させる方法が知りたいです。 【抽選結果シート】 ※631回を最新抽選回数とする。 抽選回 第1 第2 第3 第4 第5 第6  ボ  出現末尾数字   未出現末尾数字           629   6  16  21  30  41  43  36  0 1 3 6      2 4 5 7 8 9   630   3   7  13  18  19  41  38  1 3 7 8 9    0 2 4 5 6   631   2   5  7   10  36  40  12  0 2 5 6 7    1 3 4 8 9        ●注意事項   ・末尾数字は0~9です。   ・使用するエクセルは2010です。 以上、よろしくお願いします。

  • 5回前迄の抽選結果を取得する。

    どなたかご存じでしたら回答をよろしくお願いします。 数字選択式宝くじのミニロト、ロト6の抽選結果をエクセルにて管理しております。 【質問】  ロト6は週2回抽選(月曜日と木曜日)があり【抽選結果シート】にも抽選日・曜日を記入しており  ます。新たに【直近5抽選結果シート】を作り、ここに指定した曜日(月曜日or 木曜日)と  最新抽選回入力すると、指定した曜日の直近5回分の抽選結果を【抽選結果シート】から抽出  表示させる方法が知りたいです。   ※【抽選結果シート】の説明;A列:抽選回、B列~G列:第1数字~第6数字                      H列:ボーナス数字、I列:抽選日、J列:曜日 【抽選結果シート】※797回を最新抽選回とする。 786 10 11 17 31 35 39 23 2013/8/12 月曜日 787 4  5  13 21 33 34  15 2013/8/15 木曜日 788 2  8  13 27 31 32 16 2013/8/19 月曜日 789 12 17  29 32 38 40 28 2013/8/22 木曜日 790 9 13  19 27 34 38 8 2013/8/26 月曜日 791 1 10 22 24 34 37 20 2013/8/29 木曜日 792 1 7  14 25 37 43 4   2013/9/2 月曜日 793 10 13 14 19 26 43 12 2013/9/5 木曜日 794 15 22 25 29 34 42 2  2013/9/9 月曜日 795 13 19 24 28 33 38 29 2013/9/12 木曜日 796  1 7  11 14 22 34 2 2013/9/16 月曜日 797  1 4  13 18 23 39 35 2013/9/19 木曜日 【直近5抽選結果シート】・・・例)月曜日を抽出指定した場合。   抽出対象日:月   最新抽選回:797 788 2  8  13 27 31 32 16 2013/8/19 月曜日 790 9 13  19 27 34 38 8 2013/8/26 月曜日 792 1 7  14 25 37 43 4   2013/9/2 月曜日 794 15 22 25 29 34 42 2  2013/9/9 月曜日 796  1 7  11 14 22 34 2 2013/9/16 月曜日 【直近5抽選結果シート】・・・例)木曜日を抽出指定した場合。   抽出対象日:木   最新抽選回:797 789 12 17  29 32 38 40 28 2013/8/22 木曜日 791 1 10 22 24 34 37 20 2013/8/29 木曜日 793 10 13 14 19 26 43 12 2013/9/5 木曜日 795 13 19 24 28 33 38 29 2013/9/12 木曜日 797  1 4  13 18 23 39 35 2013/9/19 木曜日  ●注意事項    ・抽選結果シートは第1回~最新抽選回までです。    ・使用するエクセルは2010です。 以上、ご回答よろしくお願いします。

  • 指定した○回前の第○数字を抽出する。

    どなたかご存じの方は回答願います。 数字選択式宝くじの「ミニロト」の抽選結果を下記のイメージの エクセルシートにまとめております。 抽選回 第1   第2    第3    第4    第5     ボ 630    3     4     16    19    31     14 631    3     15    18    20    25     29 632    6     14    15    25    26     13 633    2     12    19    20    30     13 634    6     14    24    27    31     22 635   12     13    16    20    29     11 注意)  (1)抽選回、第1、第2、第3、第4、第5、ボは、それぞれ別々のセルです。  (2)それぞれに入っているのは”数字”です。  (3)最終抽選回は635回とします。 それを見ながら次回の削除数字を予想するのですが、 例えば、第636回の予想をするにあたり、”5回前の第4数字を抽出する。” と指定すると、 (第631回で出てきた第4数字の)”20” が抽出される。 また、”6回前の第2数字を抽出する。”と指定すると、 (第630回で出てきた第2数字の)”4”が抽出される。 いった、「指定した○回前の第○数字を抽出する」には どうすればよいですか?(ボ数字は抽出指定から外します。) 条件は20個くらい羅列ができるのがよいです。 使用するエクセルは2007です。 以上、よろしくお願いします。

  • 数字の最終出現回の表示

    どなたかご存じでしたら回答をお願いします。 数字選択式宝くじロト6、ミニロトの抽選結果をエクセルにつけております。 それを利用して、1~43迄の数字が最新抽選回数から遡っていき、 最後に出た抽選回を表示する&”塗りつぶしする”方法が知りたいです。 【例:抽選結果シート】 ※621回を最新抽選回数とする。 抽選回 第1数字 第2数字 第3数字 第4数字 第5数字 第6数字 ボ数字                        : 611    2      12     18     24      31     39     16 612    7      18     30     32      39     40     35 613    2      6      18     26      32     37     5 614    2      4      22     25      35     41     1 615    6      16     24     32      35     43     28 616    3      7      18     19      24     35     17 617    5      17     18     28      31     36     10 618    4      15     18     31      35     42     13 619    1      11     29     31      33     38     14 620    7      10     18     19      35     38     12 621    2      15     16     28      35     40     20 【最終出現回シート】 1:619 2:621 3:616 4:614 : 15:621 16:621 17:617 18:620 19:620 : 29:619 30:612 31:619 : 35:621 36:617 37:613 : 40:621 41:614 42:618 43:615 【注意事項】  ・抽選結果シートは第1回抽選から最新抽選回まで入力されています。  ・最新抽選結果を追加すると、1~43全ての数字について最終出現回シートに抽選回が   得られるまで最新抽選回から遡る。  ・1~43全ての数字について最終出現回の抽選結果にある該当数字を”塗りつぶし”する。  ・ボーナス数字は最終出現回の対象外です。  ・最終出現回シートの数字は1~43迄です。  ・エクセルは2007です。

  • 数字出現数の印付け

    どなたかご存じでしたら回答をお願いします。 数字選択式宝くじロト6、ミニロトの抽選結果をエクセルにつけております。 それを利用して、◎、○、△を付ける方法が知りたいです。 【例:抽選結果シート】 ※621回を最新抽選回数とする。 抽選回 第1数字 第2数字 第3数字 第4数字 第5数字 第6数字 ボ数字                        : 611    2      12     18     24      31     39     16 612    7      18     31     32      39     40     35 613    2      6      18     26      32     37     5 614    2      18     22     25      35     41     1 615    6      16     24     32      35     43     28 616    2      7      18     19      24     35     17 617    5      7      18     28      31     35     10 618    4      15     18     31      35     42     13 619    2      11     29     31      33     38     14 620    7      10     18     19      35     38     12 621    2      15     16     28      35     40     20 【出現数カウント範囲】 11 【出現数シート】 1 2 3 4 5 6 7 8 9 10 11 …18 19 20 … 29 30 31… 35 36 37 38 39 40 41 42 43  ◎     △        △           ○  ○ 【注意事項】  ・抽選結果シートは第1回抽選から最新抽選回まで入力されています。  ・出現数カウント範囲に数字(1~99)迄を入力すると、最新抽選回数から遡った抽選結果迄を   範囲として出現数シートのカウント数字の対象とします。  ・出現シートの印(◎、○、△)は下記のルールでつきます。    ◎ ・・・ 出現数が6回。    ○ ・・・ 出現数が5回と7回。    △ ・・・ 出現数が4回と8回。   ※ボーナス数字は出現数にカウントしない。   ※上記以外の出現数は、SPACEとする。  ・出現数シートの数字は1~43迄です。  ・エクセルは2007です。

  • 抽選結果数字を各番台に数える方法。

    どなたかご存じでしたら回答をお願いします。 数字選択式宝くじロト6、ミニロトの抽選結果をエクセルにつけております。 それを利用して、『ボーナス数字を除いた第1~第6までの抽選結果数字が、0番台、10番台、20番台、30番台、40番台のいずれかに数える方法』が知りたいです。 【抽選結果シート】 ※631回を最新抽選回数とする。 抽選回 第1数字 第2数字 第3数字 第4数字 第5数字 第6数字 ボ数字                629      6    16     21     30    41     43    36 630      3     7     13     18    19     41    38 631      2     5     7      10    36     40    12 【出現番台まとめ】    抽選回  0番台 10番台 20番台 30番台 40番台 629      1     1     1    1      2 630      2     3     0    0      1 631      3     1     0    1      1 ○注意事項     1)各番台は下記の数字を対象とします。        0番台 ・・・  1~9までの数字。       10番台 ・・・ 10~19までの数字。       20番台 ・・・ 20~29までの数字。       30番台 ・・・ 30~39までの数字。       40番台 ・・・ 40~43までの数字。     2)使用するエクセルは2007です。 以上、ご回答よろしくお願いします。

  • 抽選結果と反対数字を一緒の表に載せる方法

    どなたかご存じでしたらご回答をよろしくお願いします。 数字選択宝くじのロト6の抽選結果をエクセルにつけております。 以前この質問コーナーにて下記のような、「抽選結果数字に●や★をつける方法」を 質問して回答を頂きました。(●:第1~第6数字、★:ボ数字) 【以前の質問の結果】               1  2  3  4  5  6  7  ~  39 40 41 42 43 抽選回 第1 第2 第3 第4 第5 第6 ボ     782   02  21  23  24  27  42 10    ●                          ●  783   09  14  22  24  25  32 13  784   01  09  23  29  37  41 02 ● ★                           【今回の質問】 今回は、第1数字~第6数字迄の抽選数字を”44”から引き算を行い、その結果と合わせ●、◎、★、■といった記号をつける方法が知りたいです。                                                           1 2 抽選回 第1 第2 第3 第4 第5 第6 ボ  逆第1 逆第2 逆第3 逆第4 逆第5 逆第6 43 42   782   02  21  23  24  27  42 10  42   23    21   20   17   02   ■ ◎  783   09  14  22  24  25  32 13  35   30    22   20   19   12  784   01  09  23  29  37  41 02  43   35    21   15   07   03   ● ★ 【説明】  ・抽選数字1~43迄の数字は、O1~BE1に入ってます。  ・「抽選回」~「逆第6」までは、A2~N2に入っています。  ・逆数字43~1迄の数字は、O2~BE2に入ってます。  ・逆数字は、”44-第1~第6迄のそれぞの抽選数字から引いた数字”です。  ・抽選数字の第1~第6迄の数字を『●』で、逆数字の逆第1~逆第6は『■』で、   ボ数字は『★』でO3~BE3に表しますが、逆数字と抽選数字が重複する場合は、   『◎』で表します。(782回は抽選数字に2、42があるため、逆数字も42、2となり重複するため、   『◎』になります。)  ・抽選回は第1回~第784回迄入力されているものとします。  ・使用するエクセルは2010です。 以上、よろしくお願いします。         

  • 数字の出現計と印の付け方

    どなたかご存じでしたら回答をお願いします。 数字選択式宝くじロト6の抽選結果をエクセルにつけております。 それを利用して、◎、○、△の印と、出現計を付ける方法が知りたいです。 ●問題 毎回、【シート1:抽選結果】に最新抽選回を入力したら、【シート2:抽選結果抽出】に最新抽選回から43回迄遡った抽選結果を抽出する。抽出された抽選結果数字を元にして、【シート2:出現数集計】の 1~43迄の数字の出現数を数えて”出現計”にその数を記す。そのうち、ある一定数の出現をしている数字については、その下の"印"に◎、○、△をつける。   ●シート説明 【シート1:抽選結果】・・第1回からの抽選結果が入る。最新抽選回は639回を最新抽選回数とする。               【シート2:抽選結果抽出】と同様のシートレイアウト。※現在使用中のシート 【シート2:抽選結果抽出】・・【シート1:抽選結果】から最新抽選回から43回迄遡った抽選結果を                   抽出する。【シート1:抽選結果】が最新抽選回を更新するたびに                   このシートも更新される。(セルは抽選回、第1、第2、第3、第4、第5、                   第6、ボーナス毎に別れている。) 抽選回  第1   第2   第3   第4   第5   第6   ボーナス 597    03    04    07    13    16    23    01 598    06    10    15    21    36    41    40 599    01    02    08    13    27    39    36 600    03    20    23    24    28    35    26 601    06    22    25    26    30    39    32 602    08    13    15    18    24    41    27 603    03    08    18    21    23    42    17 604    09    15    20    22    28    43    37 605    01    04    13    25    38    43    11 606    08    15    24    26    35    42    07 607    02    03    08    12    20    21    16 608    04    06    16    17    18    26    40 609    18    24    36    37    39    41    01 610    02    05    12    23    26    41    36 611    10    12    14    24    34    39    16 612    07    18    31    32    39    40    35 613    02    06    18    26    32    37    05 614    02    06    22    25    31    42    01 615    06    16    24    32    36    43    28 616    04    07    18    19    24    35    17 617    05    08    18    28    34    35    10 618    04    15    21    31    35    42    13 619    02    11    29    31    33    38    14 620    07    10    13    19    31    38    12 621    06    15    16    28    36    40    20 622    07    16    18    20    27    36    41 623    07    08    16    35    39    42    09 624    04    08    12    22    25    30    43 625    05    17    26    37    39    42    20 626    06    13    14    22    26    28    10 627    02    04    07    19    34    42    30 628    07    13    15    18    29    38    30 629    06    16    21    30    34    43    36 630    03    07    13    18    19    41    38 631    02    05    07    10    36    40    12 632    03    04    14    21    22    25    26 633    07    09    11    14    15    18    05 634    08    10    13    15    20    40    23 635    08    11    12    15    41    43    22 636    02    12    21    23    24    26    36 637    07    12    16    28    31    34    11 638    06    11    19    28    35    40    14 639    01    16    20    24    33    34    08 【シート2:出現数集計】・・・【シート2:抽選結果抽出】から1~43迄の数字の出現計を数えて、                  それぞれの"数字”の下に出現計と印を記す。 数 字 :1 2 3 4 5   6 7  8 9 10 11…29 30 31… 35 36 37 38 39 40  41 42 43 出現計:3 9 6 8 4 10 12 10 2 5 4  2 3 6   7  6 6  4  7  5  6  7  5     印  :   ◎ △ △          ○△       ◎  ○ ◎  △  ○  ○ ◎  ○  ○ ●注意事項  ・シートは抽選結果入力のためのシート1と、そこから抽選結果を抽出して集計したシート2の2枚   あります。  ・シート1は現在使用しているシートで、シート2は今回問題としてあげた作成したいシートです。  ・【シート2:出現数集計】の印(◎、○、△)は下記のルールでつきます。    ◎ ・・・ 出現計が6回。    ○ ・・・ 出現計が5回と7回。    △ ・・・ 出現計が4回と8回。    ※ボーナス数字は出現数にカウントしない。    ※上記以外の出現数は、SPACEとする。  ・エクセルは2007です。

  • 数字間差を求めるVBAのソースを教えて下さい。

    どなたかご存じでしたら回答願います。 数字選択式宝くじのミニロトの抽選結果をエクセルにつけております。 下記のような抽選結果があったとします。 この結果について、エクセルVBAを実行すると、 数字間差を計算するためのソースはどうゆうふうな記述をすればよいですか? 【抽選結果シート】・・・最新の抽選結果を一番したのセルに入力しています。 第1 第2 第3 第4  第5  ボ数字 1   2   5   6    7    21 10   4   11  13   15    18 8   9   17  21   28     9 14  16   18  20   25    10 19  22   23  24   27    21         :          : 【抽選結果シート】・・・VBA実行後、ボ数字の右側が自動計算される。 第1 第2 第3 第4 第5  ボ数字  差12 差23 差34 差45  差15 差123 差1234 差12345   1   2  5   6   7    21    1    3   1    1   6    13   131   1311 4  10  11  13  15    18    6    1   2    2   11   61   612   6122 8   9  17  21  28    9     1    8   4    7   20   18   184   1847 14  16  18  20  25    10    2    2   2    5   11   22   222   2225 19  22  23  24  27    21    3    1   1    3   8    31   311   3113 【注意事項】   1)差の計算ルールは下記のとおりです。尚、計算結果にマイナスは発生しません。       差12・・・・抽選結果シートの「第2-第1」です。       差23・・・・抽選結果シートの「第3-第2」です。       差34・・・・抽選結果シートの「第4-第3」です。       差45・・・・抽選結果シートの「第5-第4」です。       差15・・・・抽選結果シートの「第5-第1」です。    2)差123、差1234、差12345については下記のとおりです。      差123   ・・・ 「差12」と「差23」の結果を結合(and)したものです。      差1234  ・・・ 「差12」と「差23」と「差34」の結果を結合(and)したものです。      差12345 ・・・ 「差12」と「差23」と「差34」と「差45」の結果を結合(and)したものです。  3)使用しているエクセルは、エクセル2010です。  4)VBAは、抽選結果シートに結果が全て入力されていれば第1回抽選結果から最新抽選結果迄   の計算をします。  以上、ご回答よろしくお願いします。

専門家に質問してみよう