コンピュータは働きたくて、いつもウズウズしています!   Data + Automation = Datamation
TEXT_SIZE

215 順列組合せプログラム

順列組合せプログラムは、任意の順列パターンや組み合わせパターンを作成するために、使用できます。

アドイン接続を終え、メニューの「順列組合せ」をクリックすると、次のように設定画面が表示されます。

順列の場合は1を、組合せを求める場合は2を入力します(半角・全角とも可)。


操作手順・A ~ 順列の場合

例: 8頭の競走馬があり、1着・2着になる馬を着順通りに当てなければならない(連勝単式)場合の、すべての組み合わせ方を求める場合に用います。
1着・2着・3着を着順通りに当てなければならない(三連勝単式)場合も同様です。

順列の場合、一般に「mPr」と表わし、mには走る馬の総数を、rには何着まで当てるのか(三連勝単式であれば「3」となる)を表す数字が入ります。
なお「P」は、Permutation(英語で「順列」の意味)の頭文字です。

8頭の馬で1着・2着・3着を着順通りに当てる場合は、8P3と表します。

上の画面の状態で「1(順列)」を入力した場合は、次の手順に進みます。
ここでは8頭の馬が居るので、ここでは「mPr」の「m」にあたる部分に、「8」と入力します。

入力が済んだら「OK」をクリックします。

次に表示された画面では、3着までの着順を順番通りに当てるので、ここでは「mPr」の「r」にあたる部分に、「3」と入力します。

入力が済んだら「OK」をクリックします。
出力を開始したいセル1か所をマウスでクリックして、指定します。

指定が済んだら、「OK」ボタンをクリックします。


出力結果 ~ 順列の場合


参考 ~ 順列の場合

8頭の競馬馬で3着まで着順通りに当てるときの組み合わせの数(順列)は、次のように求められます。
馬の頭数: m、何着まで当てるのかの数: rとして、

(m!)/(m-r)!

「!」の記号は「階乗」を表わし、1から1ずつ増やした整数についてすべて掛け算することです。
5!(5の階乗)であれば、1 × 2 × 3 × 4 × 5 = 120となります。

この競馬の場合であれば、mが8、rが3になるので、8!/(8-5)! = 8!/3! = 40320/120 = 336通りになります。


設定画面・B ~ 組み合わせの場合

例: 8頭の競走馬があり、1着・2着になる馬を着順に関係なく当てる(連勝複式)場合の、すべての組み合わせ方を求める場合に用います。

組み合わせの場合、一般に「mCr」と表わし、mには走る馬の総数を、rには何着まで当てるのか(連勝式であれば「2」となる)を表す数字が入ります。
なお「C」は、Combination(英語で「組み合わせ」の意味)の頭文字です。

8頭の馬で1着・2着を着順に関係なく当てる場合は、8C2と表します。

最初の「処理の選択」画面で「2(組み合わせ)」を入力したら、次の手順に進みます。
ここでは8頭の馬が居るので、ここでは「mCr」の「m」にあたる部分に、「8」と入力します。

入力が済んだら「OK」をクリックします。

次に表示された画面では、2着までに入る馬を着順に関係なくに当てるので、ここでは「mCr」の「r」にあたる部分に、「2」と入力します。

入力が済んだら「OK」をクリックします。
出力を開始したいセル1か所をマウスでクリックして、指定します。

指定が済んだら、「OK」ボタンをクリックします。


出力結果・B ~ 組み合わせの場合


参考 ~ 組み合わせの場合

8頭の競馬馬で2着までを着順に関係なく当てるときの組み合わせの数は、次のように求められます。
馬の頭数: m、何着まで当てるのかの数: rとして、

m!/{r!(m-r)!}

この場合であれば、mが8、rが2になるので、8!/{ 2 × (8 - 2)!} = 8! / (2 × 6!)  = 40320/(2 × 720) = 40320/1440 = 28通りになります。


アドインプログラム販売価格: ¥1,000.-(税込) ●後払い● 
※販売のみを行っております。ご質問対応等のサポート及び改変は承っておりません

【後払い】ご注文はこちらから。別タブで表示されます。


VBAソースコード販売価格: ¥20,000.-(税込)
※コードの内容は、上記標準版の内容の通りです
※サポート・ご質問の対応・改変のご依頼を承ることはできかねます

VBAソースコードのご注文はこちら


▲動作環境・アドイン接続方法など▲

動作環境

日本語版Windows用 日本語版Microsoft Excel2003以降(推奨)が快適に動作するパソコン。
Excelのアドイン「分析ツール-VBA」のアドイン接続を必ず行い、マクロを使用可能にして下さい。
その他は、Microsoft Excelの仕様に基づきます。

なおMicrosoft社によるサポートが終了したバージョンのExcelを使用したときのいかなる障害・損害・不便などにおきましては、当方では責任を負いかねます。
予めご了承ください。

アドイン接続方法・
ソフトウェア使用許諾

addman03     addman07

※Excel2016・2019も右側の「Excel2007・2010・2013用」をお選びください
※Microsoft365も対応しておりますが、インストール版を対象としております。Web版は非対応です。

    get adobe_reader

マクロが実行できないときにご確認ください https://faq.mypage.otsuka-shokai.co.jp/app/answers/detail/a_id/314030

当商品のような、インターネットからダウンロードしたExcelのファイルについて、マクロが実行できない仕様になっているようです。

マクロを有効化する方法が記されています。お試しください。

※カスタマイズは対応不可となりました(2019年1月)

Excel用アドインプログラム