最適値を自動的に総当りで計算させたいのですが

質問

最適値を自動的に総当りで計算させたいのですが

たとえばA列に下記のような無作為なデータがあるとします。

A1 10
A2 15
A3 -2
A4 500
A5 -27
A6 4
A7 20
A8 -12
A9 15
.
.
.

B列は

B1に「A1+A2」
B2に「A2+A3」
B3に「A3+A4」
・
・
・
というようにA列の「一行下」を足したものを表示させます。

そしてそのB列のSUMを求める時の話ですが

「一行下」「二行下」と条件を変化させると

当然B列のSUMも変化していきますが

この時最大の数値になるのは条件「何行下」にすればよいのかを

自動的に総当りで計算させたいのですが

どのようにすれば良いでしょうか？

回答No.5

imogasi

考えている行数の一番下の行の次からのセルは、データが無いのだろうから、０と考えて良いなら
（１）１つ下を足す場合
Ａ１＋２＊（Ａ２＋Ａ３＋Ａ４＋・・・最後の行まで）最後行以下の０は考慮外に出来る。
（２）２つ下を足す場合
Ａ１＋Ａ２＋２＊（Ａ３＋Ａ４＋・・・最後の行まで）最後行以下の０は考慮外に出来る。
（３）３つ下を足す場合
Ａ１＋Ａ２＋Ａ３＋２＊（Ａ４＋Ａ５＋・・・最後の行まで）最後行以下の０は考慮外に出来る。
以下同じ。
これを、１倍の部分と、２倍の部分を関数式で求めて（あるいはＶＢＡで求めて）両者を足したものを
別列（２つの値の合計列）に出し、その合計列のＭＡＸをとれば良いように思う。
ーーー
Ａ１＋Ａ２
Ａ２＋Ａ３
Ａ３＋Ａ４
・・・・
＝＝＝＝＝＝＝＝
Ａ１＋（Ａ２＋Ａ２＋Ａ３＋Ａ３＋Ａ４＋Ａ４＋・・）

お礼

ありがとうございます。
参考にさせていただきます。

回答No.4

keithin

＞B1に「A1+A2」
＞B2に「A2+A3」
＞B3に「A3+A4」
＞・
＞そしてそのB列のSUMを求める

アタマの中でちょいと計算を並べ替えると
=(A1+A2+A3)+(A2+A3+A4)
前半は固定，後半は何行ズラしたの分だけ全体をスライドした合計
というだけのお話になります。

で，ズラしたときに該当する「下のセル」が無いときにいったいどうしたいのか，説明が不足しています。

サンプル：
仮にA1からA10に元の数字が並んでいるとして

●下が無くても気にせず計算する
Ｃ１に
=SUM($A$1:$A$10,A1:A10)
と記入し，Ｃ１０までコピー貼り付ける

Ｃ１の値：ズレがゼロだったときのＢ列の合計(A1+A1)+(A2+A2)+(A3+A3)…
Ｃ２の値：ズレが１つのときのＢ列の合計（A1+A2)+(A2+A3)+(A3+A4)…
Ｃ３の値：ズレが２つでのＢ列の合計(A1+A3)+(A2+A4)+(A3+A5)…
　：
が総当たりで計算できます。可能性としては，合計が最大となるズレが複数見つかる場合もあり得ますね。

お礼

ありがとうございます。
参考にさせていただきます。

回答No.3

tom04

こんにちは！
外していたらごめんなさい。
A1セルからデータがあり、
その行以下の最大値をその行のA列数値にプラスすれば良いわけですよね？

もしそうであればB1セルに
=IF(A2="","",A1+MAX(A2:$A$1000))
としてオートフィルで下へコピーではどうでしょうか？
これでA列のその行の値＋その行より下のある最大値をプラスした値が表示されると思います。

※　「何行下」を求めたい場合は
B1セルの数式を
=IF(A2="","",MATCH(MAX(A2:$A$1000),A2:$A$1000,0))
としてオートフィルで下へコピーしてみてください。
これでその行より何行下に最大値があるか表示されるはずです。

尚、データは1000行目まで対応できる数式にしてみました。

最初に書いたように的外れならごめんなさいね。m(_ _)m

お礼

ありがとうございます。
参考にさせていただきます。

回答No.2

mu2011

一例です。
=SUM(B:B)、又は=SUM(INDIRECT("B1:B"&COUNT(A:A)))で如何でしょうか。

お礼

ありがとうございます。
参考にさせていただきます。

回答No.1

DJ-Potato

最後のデータはどうするのでしょうか。

A100までデータがあるとして、B100は
　１)A101=０として、B100=A100とするのか、
　２)B100そのものをデータとして無視するのか
　３)循環させて、A101=A1とするのか

「ｎ行下」の条件で

１)の場合
SUM(B1:B100) = SUM(A1:A100) + SUM(A(n+1):A100)
　= 2*SUM(A1:A100) - SUM(A1:An)

2)の場合
SUM(B1:B100) = SUM(A1:A(100-n)) + SUM(A(ｎ+1):A100)
　= 2*SUM(A1:A100) - SUM(A1:An) - SUM(A(100-n+1):A100)

3)の場合
SUM(B1:B100) = SUM(A1:A100) + SUM(A1:A100)
= 2*SUM(A1:A100)

うしろのマイナス部分が最小値になるｎが、SUM(B:B)の最大値ですね。

お礼

ありがとうございます。
参考にさせていただきます。