やっと、正確なデータが出てくるマクロが出来上がりました。
これまでブログで載せたとおり、
・絶対値を使って8通りを検証すればいいこと
1.BBBB:SSSS 2.BBBS:SSSB
3.BBSB:SSBS 4.BBSS:SSBB
5.BSBB:SBSS 6.BSBS:SBSB
7.BSSB:SBBS 8.BSSS:SBBB
・ワークシートとマクロとが同じ解を出すこと
前回載せたとおり、Excelマクロで計算したデータをワークシートに載せて確認する。
・サブルーチンを使う
これも過去のブログに載せたないようですが、結果言うと、最大の絶対値と、４通りの売買の組み合わせを記録する、部分のみサブルーチンにしています。
その結果、
2010/1/4 - 2023/12/29 までのデータからは、
最大の絶対値が
4,000
売買の組み合わせは、（-1＝売り、1＝買い）
-1、1、-1、-1
となってます。
ここで疑問に感じるとは思われます。
数値は、売り、買い、売り、売り
のように見えます。
これは、４で割った余りの順番です。
なので、一番初めのデータは、あまりが「１」となります。上の
-1、1、-1、-1
の結果は、余りが、0、1、2、3 の順序で計算しています。
その結果、
買い、売り、売り、売り
の絶対値、4000が最大値となります。
次に、
1.BBBB:SSSS 2.BBBS:SSSB
3.BBSB:SSBS 4.BBSS:SSBB
5.BSBB:SBSS 6.BSBS:SBSB
7.BSSB:SBBS 8.BSSS:SBBB
の８番目の組み合わせが該当するので、この組み合わせをExcelシートに落とします。その結果、
買い、売り、売り、売り
では、-4000
結果として、
売り、買い、買い、買いが+4000となり、ワークシートで確認が取れました。
Excelマクロで要した時間は、2.56秒でした。
今回作成したマクロで大きく前進したと思っています。
まあ、今回の記録はそれだけなんですが・・