反自公 -185ページ目

反自公

ぷー

この頃勉強ばかりしてました


受けたセミナー4個


ぷーやんさんのスキャルピング手法
目から鱗でした


ぷーやんさんのらくらく手法作成セミナー
テクニカルなんてどうでもよく難平がキモと言うことがよく解りました


Excelマクロ達人養成塾
Excelマクロ・VBA基礎コースと発展コース

これで手法分析用のプロシージャが書けるようになりました
これはトレーダーだけでなく全てのサラリーマンに受けて欲しい
きっと出世して給料上がると思います
お薦め!!


MT4プログラミングセミナー
とても親切丁寧に教えて下さいました
簡単なEAなら作れるようになりました
独学で苦労されてる方にお薦め



いよいよ実戦使用開始です


その第1弾が金曜の表作成


LIONFXの利用履歴を3月分ダウンロードし
要らん列を削除して、1日ごとの集計をし
戦績グラフを作成するプロシージャを作成してみました


こんな
Sub matome()
Dim hida As Long
Dim migi As Long
Dim soneki As Long
migi = 1
For hida = 2 To Range("a1048576").End(xlUp).Row
If Day(Range("a" & hida).Value) <> Day(Range("a" & hida - 1).Value) Then
soneki = 0
migi = migi + 1
Range("q" & migi).Value = Month(Range("a" & hida).Value) & "/" & Day(Range("a" & hida).Value)
soneki = Range("n" & hida).Value
Else
soneki = soneki + Range("n" & hida).Value
End If
Range("r" & migi).Value = soneki
Next
migi = 3
Range("s2").Value = Range("r2").Value
Do While Range("r" & migi).Value <> ""
Range("s" & migi).Value = Range("r" & migi).Value + Range("s" & migi - 1).Value
migi = migi + 1
Loop
End Sub

Sub gurahu()
Range("Q1:s" & Range("s1048576").End(xlUp).Row).Select
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlLine
ActiveChart.SeriesCollection(1).ChartType = xlColumnClustered
End Sub

使ってみたい方はどうぞ



戦績ですがご覧のようにボロボロです


クリスマス相場はイケイケだったんですけどね


ずっとその調子で行けると思ってたのが大間違いでした


ルールを通常に戻したのですがDDに遭いまた凹み


また勝ち出したのは2月中旬にルールを調整してからです


使ってるのは東京朝ラインで難平をマジック寄りに遅らせました


その難平の仕方も1枚難平して進んだらまた1枚風です


あとロンドンの午後とニューヨークの朝はやってません


ご参考に


しかし木曜の事故、痛かったわ(泣


追伸

元の表こんな。右の表は1日ごとにまとめたものです


ドル円逆張りマーチンゲール風ハツ


追追伸

よくチョンボをしました

難平注文ボタンを押すつもりが決済注文ボタンを押す!

いまだたまにやります

数十万はこれで逝かれているはずです