A 回答 (2件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
入力中に操作ミスで消えたので書く気が失せてしまいましたが…
大雑把になりますが書き直します。
自分の考えた方法では、100桁の2進数で表現し、
各桁の値が1なら、その桁に対応する数字を加えるとし、
合計が200になった場合には、その際に使用した数値を羅列する、
それ以外は空白とする、
フィルタによって空白のものは非表示とする。
といった方法で一応できるとは思いました。
100桁の2進数ということは、
2^100=562949953421312*562949953421312*4≒1267650600228230000000000000000
行必要になるという事ですが…
(2^49=562949953421312です。2^50はエクセルの計算上表示される有効桁数をオーバーしたようです)
まぁ行数は限界までいっても別のシートで考えれば良いのでとりあえず置いておきます。
更に、10進数を2進数に直すのは2進数で9桁(111111111)までしかできないようですので、16進数に直して判断するとか、9桁に区切って判断する必要が有ります。
更に、16進数にしたところで、7FFFFFFFFFまでしかできないようです。
これは2進数に直すと4*9+3=39桁なので、結局区切る必要はありそうです。
これらの問題はありますが、とりあえずやってみた方法としては、
A1=TEXT(DEC2BIN(ROW()),"0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000")
これはそのセルの行番号(A1やB2のアルファベットを除いた数字の部分)を2進数にして、無理やり100桁の整数表示としたものです。
(結果的には上記の通り9桁が限界でしたが)
B1=IF(LEFT(RIGHT($A1,COLUMN()-1),1)="0","",COLUMN()-1)
C1~CW1にも同じ式が入ります。(B~CWは計100列です)
式の意味は、A列のセルに表示されたデータの右から「そのセルの列番号(A列なら1、B列なら2)から1を引いた値」番目の数字が0なら空白、そうでなければ「そのセルの列番号から1を引いた値」を表示する。
というものです。
例えば、A列が(左の0を省略して)101であれば、B列に1、D列に3が表示されます。
CX1=SUM(B1:CW1)
これでその表示された値を合計したものが表示されます。
先ほどの例なら1+3=4ということです。
CY1=IF(CX=200,B1&","&C1&","&D1&","&E1&","&F1&","&G1&","&H1&","&I1&","&J1&","&K1&","&L1&","&M1&","&N1&","&O1&","&P1&","&Q1&","&R1&","&S1&","&T1&","&U1&","&V1&","&W1&","&X1&","&Y1&","&Z1&","&AA1&","&AB1&","&AC1&","&AD1&","&AE1&","&AF1&","&AG1&","&AH1&","&AI1&","&AJ1&","&AK1&","&AL1&","&AM1&","&AN1&","&AO1&","&AP1&","&AQ1&","&AR1&","&AS1&","&AT1&","&AU1&","&AV1&","&AW1&","&AX1&","&AY1&","&AZ1&","&BA1&","&BB1&","&BC1&","&BD1&","&BE1&","&BF1&","&BG1&","&BH1&","&BI1&","&BJ1&","&BK1&","&BL1&","&BM1&","&BN1&","&BO1&","&BP1&","&BQ1&","&BR1&","&BS1&","&BT1&","&BU1&","&BV1&","&BW1&","&BX1&","&BY1&","&BZ1&","&CA1&","&CB1&","&CC1&","&CD1&","&CE1&","&CF1&","&CG1&","&CH1&","&CI1&","&CJ1&","&CK1&","&CL1&","&CM1&","&CN1&","&CO1&","&CP1&","&CQ1&","&CR1&","&CS1&","&CT1&","&CU1&","&CV1&","&CW1)
これでCX列が200の場合のみ、B~CW列に表示されたものを","で区切って表示します。
IFを用いて2番目以降の数字である場合のみ"+"でつなげる。という方法もできますが、
数が多いため面倒になり、この形にしました。
空白でも","は表示されるので、1+99+100=200の場合、1,,,,,(略),,,,99,100といった表示になります。
CX列が200でなければ空白となるので、フィルタで空白を非表示にすれば、完成です。
となる予定だったのですが、最初に書いたような理由で、もう1手間2手間かけなければならないです。
まぁ、なかなか簡単に表示できるわけではないということですね。
他の方が良い案を出してくれる事を期待します。
ちなみにパターン数として
2つ以下の合計では表示できない。
3つの合計なら100+(99+1)~100+(51+49),99+(98+3)~99+(51+50),…,68+(67+65)
=49+48+46+45+43+42+40+39+37+36+34+33+31+30+28+27+25+24+22+21+19+18+16+15+13+12+10+9+7+6+4+3+1+0
=49*34/2
=833パターン
これを全て書き出すだけでも一仕事ですねw
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) Excelの数字(文字列)合計について あるデータをダウンロードすると、数字データが全て文字列になっ 4 2022/09/26 21:21
- Excel(エクセル) 次のようなケースを関数で処理するには。。 5 2023/07/18 03:24
- Excel(エクセル) Excelで任意の塗りつぶし色の数字を集計する方法はありますか?関数を使ってできる方法があれば教えて 3 2022/11/18 16:57
- 会計ソフト・業務用ソフト ExcelのSUM関数と+の違い 2 2022/07/12 18:32
- Excel(エクセル) AVERAGE関数とINDIRECT関数を使ってのオートフィル 3 2023/01/12 12:00
- 統計学 統計分析とExcelに詳しい方、何卒よろしくお願いいたします。 6 2022/05/27 10:30
- Excel(エクセル) Excel関数教えてください!! Excelで勤怠集計をしているのですが、部署別に雇用形態ごとの月間 2 2022/10/21 23:06
- Excel(エクセル) Excel(エクセル)でフィルター抽出後、非表示の行を計算しないで、合計を算出する方法 【内容】 添 4 2023/01/30 17:17
- Excel(エクセル) Excel 2019で質問があります。 計測器のデータをExcelで記録したんですが、1秒刻みで記録 4 2022/09/07 22:46
- Excel(エクセル) ExcelのABC分析についてです。 IF関数 VLOOKUP関数等など使わずに、ABC分析は出来ま 2 2023/06/15 23:57
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセル 指定した文字列を含...
-
エクセルで同じ名前ごとの合計...
-
エクセルの関数SUBSTITUTEを、...
-
エクセルVBA Unionはなぜ遅い?
-
EXCEL VBA 指定範囲内で特定の...
-
桁数が混在する並び替えの方法
-
Excelで自動的に並べ替えなんて...
-
エクセルvba 一つ上の行を指定...
-
エクセルで一部除外した数字を...
-
EXCEL 指定した曜日に番号を振...
-
Excelで数値→文字列変換で指数...
-
テキストボックス内の文字のふ...
-
Excelで行ごとコピー、同じ行を...
-
エクセルでグラフタイトルが折...
-
エクセルにおける、グラフの指...
-
Excelの関数について、特定の文...
-
PDFの一部を切り取って別のシー...
-
エクセルグラフの一括設定。
-
エクセル
-
パワーポイントに貼り付けたエ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセル 指定した文字列を含...
-
エクセルで同じ名前ごとの合計...
-
エクセルの関数SUBSTITUTEを、...
-
エクセルVBA Unionはなぜ遅い?
-
桁数が混在する並び替えの方法
-
EXCEL VBA 指定範囲内で特定の...
-
エクセルで一部除外した数字を...
-
エクセルで列内の同じIDの商品...
-
Excelで自動的に並べ替えなんて...
-
エクセル マクロで列を連続し...
-
エクセルvba 一つ上の行を指定...
-
EXCELである列を上から順にチェ...
-
EXCEL 指定した曜日に番号を振...
-
エクセルで2列を検索し2列とも...
-
エクセル 並び替え
-
ExcelVBA:列方向の並び替え O...
-
アクティブセルのある行の任意...
-
エクセル VLOOKUPが反映されない
-
オートフィルについて(急ぎ!)
-
VBA マクロの組み方
おすすめ情報