02月≪ 12345678910111213141516171819202122232425262728293031≫04月

自動取引化13

2014年12月31日
ようやく2015年の自動発注ファイルも作成できました。

以前と違う点は、システム事に証券会社を分けて(2つだが)発注するように致しました。

また、当日の始値を使った指値を注文するのに手こずってしまい
3000以下なら1円単位で処理できるが3000以上になると5円単位や10円単位になるので
4576とか3333など中途半端な指値になりエラーが起こり注文が出来ないと言う状態で嵌っていました。

指値アップキーやダウンキーを押して上げ下げを試みたのですが、
該当imgをクリックしても動かず・・例のごとく●番目のimgをクリックでも他の場所のimgはちゃんとクリック
出来たが該当した場所だけクリックできず・・・

しょうがないのでこちらの方法で代用いたしました。。

If Cells(y, 27) > 3000 Then

Cells(y, 27).Select

Dim r As Range
For Each r In Application.Selection
If Len(r.Value) > 0 Then
r.Value = Left(r.Value, Len(r.Value) - 1)
End If
Next

Cells(y, 27).Value = Cells(y, 27).Value & "0"

Else

End If

くっ、不満はあるが他にやりたい事たくさんあるし時間が取れなかったので致し方ない、
ただ暇が出来たらやっぱりimgファイルをクリックする方法に修正したいな~

そういえばSBIもHYPER空売りってのが来年に始まる見たい、
松井証券のプレミアム空売り、カブドットコムの売り短など売りもたくさんの銘柄が対象になってきたので
売りシステムをこの機会に力入れてみようかな~、
複数の証券会社を使えば対象増えるけど、難点と言ったら資産分けないといけない事かな。
分析 | コメント(0) | トラックバック(0)
コメント

管理者のみに表示