• 締切済み

エクセル マクロ 組み合せ

エクセルのマクロでa,b,c,d,e,f,g の2組合せ (7C2)の全組合せを洗い出して表示したいですが、、、、、、

みんなの回答

  • okormazd
  • ベストアンサー率50% (1224/2412)
回答No.1

列Aに、 a b c d e f g とあるとき、列Bに 組合わせ、 ab ac ad ・ ・ ・ を書き出す。 Sub combi() r = Range("A1:" & Range("A1").End(xlDown).Address).Rows.Count k = 0 For i = 1 To r For j = i + 1 To r s = Cells(i, 1) & Cells(j, 1) k = k + 1 Cells(k, 2) = s Next Next End Sub

whiteblace
質問者

お礼

ありがとうございます。ちょっとやってみます。

whiteblace
質問者

補足

続き、上のa,b,c,d,e,f,g の2組合せの全組合せから任意の四つの2組合せ(4C2)の全組合せを引いた残りの組み合わせを表示したですが、エクセルのマクロで表示することはできるでしょうか??

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • エクセルで組みあわせについて教えて下さい。

    エクセル2000です。エクセルで組合せの合計をだしたいのですが、 A1 58 B1 13.5 C1 44.5 D1 51.5 E1 31 F1 49.4 G1 19.6 H1 41.5 J1 41 となっていて、その中から「292」に一番近い組合せを知りたいんですが、方法がありましたら教えて下さい。 上記の場合だったら 58、51.5、31、49.4、19.6、41.5、41 が292になるといった感じです。 292になるなら上記では7つ数字を使いましたが、5つでも6つでもいいです。ぴったりにならなくても近似値でもOKです。 宜しくお願いします。

  • Excel(2000)のマクロで下記の様にしたいのですが

    Excel(2000)のマクロで下記の様にしたいのですが A1 2009/5/27 (開始) B1 2009/6/3 (終了) A1からB1の日付を 4の行には月 5の行には日を 順に表示させたいのですがどうしたらいいですか? 5 ........ 6 27 28 29 .... 1 2 3 A4 5月 A5 27 B5 28 C5 29 D5 30 E5 31 F4 6月 F5 1 G5 2 H5 3 の様に。 教えてください。お願いします。

  • VBA関連 マクロ 教えてください

    エクセルのマクロの初心者ですが、、 集団{a0b0 a0c0 a0d1 a0e1 a0f1 a0g1 b0c0 b0d1 b0e1} と集団{a0b0 a0c0 a0d0 a0e0 a0f0 a0g0 b0c0 b0d0 b0e0} の中で共通点の同じものを表示したいとき、どうすればいいですか?? 教えてください。

  • エクセルで組み合わせの集計方法

    またお世話になります。 例えば下記のようなデータがあるとします。  |B|C|D|E| ---------------------- 1|a|b|c|e| ---------------------- 2|b|c|a|e| ---------------------- 3|a|e|f|g| ---------------------- 4|b|f|e|a| ----------------------      :      : (データは下へ追加されていきます) 上記のデータを行毎に調べて、各値と最も多い組み合わせを調べるにはどうしたらよいでしょうか? 例えば「a」と最も多く組み合わせているのは、「e」となります。 あた「b」と多く組み合わせているのは、「e」となります。 このように各入力値ごとに、最も多く組み合わせているものを抽出するにはどのようにしたら良いでしょうか。 実際には文字ではなく数字を入力しています。 私が考えている方法は、すべての文字に対しての組み合わせ表を作成して、そこから最も多いそれぞれの組み合わせを求めるということですが、これではかなりの量の組み合わせデータを作成しなければならないことになります。 もっと簡単にできる方法はないかと思い、こちらに質問させて頂きました。 とても難しいような気がしますが、アドバイスをよろしく御願いします。 (エクセル98を使用しております。)

  • Excelマクロに関しての質問

    Excelマクロに関しての質問です。 ファイルAの”シート1”のF1,F16,F42,F65,F97,F122を別のファイルBの”集計シート”のB2,C2,D2,E2,F2,G2にデータ(数値or文字)を移します。 そしてファイルAの”シート2”のF1,F16,F42,F65,F97,F122をファイルBの”集計シート”のB3,C3,D3,E3,F3,G3にデータを移します。 それをファイルAの”シート29”まで繰り返し行いたいのですが、どのようなマクロを組めば良いのでしょうか? 教えて頂きたいです。

  • エクセル セルの組み合わせ

    エクセル表の中で目的の数値になるセルの組み合わせを探したいです A列  B列に a  210 b  80 c  403 d  196 e  221 f  307 g  325 h  233 i  237 j  307 k  487 L  267 のようにあります。 これを組み合わせて980に近い組み合わせをいくつかさがしたいのですが、 どうしたらできるでしょうか。重複はできないのです。 ソルバーで挑戦しようと思いましたが、使い方がわかりません。 だれか教えてください。おねがいします。

  • Excelで複数行を1行にするマクロについて

    Excel2000で3行を繰り返し、1つの行にまとめていくマクロの書き方についてご教授ください。 例えば下記のような並びの時、 A B C D E F G H I ..... マクロを使って、 A B C D E F G H I ...... のようにしたいと考えています。

  • この問題って高校の順列・組合わせの問題ですか?

    高校は遥か前に卒業しましたが数学が苦手で特に確率のところがまったくダメでした。 最近こういう問題を考える機会があったのですが、これって順列・組合わせの問題ですか?もしそうなら教科書的な解法を教えてください。 Q あるトーナメント方式のスポーツの大会で約50校のチームが全国の各地域(A~H)から6~7チームずつ参加して開催されました。決勝に進出する2チームの出身地域の組合わせは何通りでしょうか? 答 36通り AーA、A-B、A-C、A-D、A-E、A-F、A-G、A-H B-B,B-C、B-D、B-E、B-F、B-G、B-H C-C、C-D、C-E、C-F、C-G、C-H D-D、D-E、D-F、D-G、D-H E-E、E-F、E-G、E-H F-F、F-G、F-H G-G、G-H H-H ・・・・などと、1つづつコツコツ数えればもちろん答えは出るんですが、順列・組合せで習ったPとかCを使って出せるんでしょうか?よろしくお願いします。

  • エクセル マクロでセルを自動移動

    例1のようになっているエクセル表があります。 データは右方向、下方向へ増えます。 Cの列以降は4つ単位でしかデータは増えません。 それを例2の表のように列A,Bのデータはそのままに Cの列以降の4つのセルを区切りに下の行に移動して、 空白の列まで言ったらA2の行以降を最後の行まで繰り返しするという マクロを書くことは可能でしょうか。 出来ましたらそのマクロを教えてください。 例1 A1 B1 C1 D1 E1 F1 G1 H1 I1 J1 K1 L1 M1 N1 A2 B2 C2 D2 E2 F2 G2 H2 I2 J2 A3 B3 C3 D3 E3 F3 G3 H3 I3 J3 K3 L3 M3 N3 例2 A1 B1 C1 D1 E1 F1 A1 B1 G1 H1 I1 J1 A1 B1 K1 L1 M1 N1 A2 B2 C2 D2 E2 F2 A2 B2 G2 H2 I2 J2 A3 B3 C3 D3 E3 F3 A3 B3 G3 H3 I3 J3 A3 B3 K3 L3 M3 N3

  • 組み合わせの問題(エクセルで組み合わせ表を作りたい)

    <問題> A、B、C、D、E、Fの6つのかごに、1~10の数字の書かれたカードを置きます。一度置いたカードは、一旦カードの束に戻し、再び10枚の中から選ぶことが出来ます。1つのかごには一枚のカードしか置けません。置いたカードは、必ず合計で10になる様に置かなければなりません。この場合、組み合わせは何通りありますか? <補足> ・Aのかごに10のカードを置いたら、すでに合計10であるので、他のかごにはカードを置かない。 ・Aのかごに9のカードを置いたら、Bのかごに1のカードを置く。 ・Aのかご5のカードを置いたら、Bのかごに5のカードを置く。 A   B   C   D   E   F  合計 10                   10 9   1                10 5   5                10 4   2  1   2   1     10 <質問> (1)何通りの組み合わせがあるか? (2)エクセルで、この例の組み合わせ表を作る場合、どうすればよいか?公式のようなものがあるのか? 大変困っております。よろしくお願いします。