|
クリック証券のＷＥＢ ＡＰＩサービスが、中止されるみたい。突然でびっくり〜。 マヒロも、ＦＸのシステムが、為替のデータと発注部分は、クリック証券の ＷＥＢ ＡＰＩサービスを、組み込んでいたので困りました〜。 しかも、２月１４日までで、もう、そんなに日にちがないよ〜。 早速、対策を考えてま〜す。 為替のデータは、今のところ、ＩＢ証券のＡＰＩを使う予定です。 マケスピだと、朝の５時ころから、ちょっと切断するのかな？ それに、テックデータのみの配信だし〜。 ＭＴ４も、為替のデータとれそうな気がするのですが、今から 勉強してると、１４日まで多分間に合わないよ〜。 ＩＢ証券なら、昨年しっかり勉強が出来ているから、すぐにでも プログラムを変更できから、１４日までになんとか、出来るかも。 発注のほうは、ＷＥＢで発注できるとおもうけど、基本的には 為替データは、証券会社によって値段が、ちがうので配信元と おなじＩＢ証券を使いたいけどまだ、ルールがわからないので クリック証券にするかまよってま〜す。
|
ｸﾘｯｸ証券_WEB API
[ リスト | 詳細 ]
全1ページ
[1]
コメント（4）
|
クリック証券から、取引履歴を見るときにＷＥＢにＣＳＶファイルに出力することが 出来なくて全部を見るためには、ＷＥＢのページを切り替えながらのコピペとか ちょ〜めんどくさいです。 でも、クリック証券には、ＷＥＢ ＡＰＩが使えるので一気に取引履歴を取り出すことが可能なのだ〜。 から【ＦＸ編】サンプルファイルのダウンロード（通常）をダウンロードしま〜す。 サンプルシートをダウンロードしたら、VBAコードのSub 約定一覧_Click()から下の 赤線の部分を変更しま〜す。 エクセルの表をWIKIに直すには、 が便利かも〜。
|
|
昨日のよるに寝ようかなぁって思っていたら為替が 鬼下げ〜。ドル円が、１日で５円近くも下げるの初めて見たかも〜。 合わせてランド円も下げてきていたから、安心して眠れないので 急いで為替アラームを作りました〜。証券会社のメールだと携帯電話に 送っても目が覚めないことがあるもん。 メタトレーダー（ＭＴ４）でも、出来そうだったけど、まだ全然メタトレーダー の勉強もしていなくて、操作から覚えてたら、朝までかかっちゃうので、 エクセルでクリック証券からデータをもらって作りました〜。 ＩＢ証券もランド円のデータ配信してくれればいいのにぃ〜。 作り方。 さんの所からＦＸ用のエクセルシートをもらってきたら エクセルの表示形式をＲ１Ｃ１を参照形式にチェックをいれるる〜。（ツール→オプション） 後は、シートにボタンを作って下のコードを追加すれば 完成で〜す。 Private Sub TimerProc()
Application.ScreenUpdating = False
Application.EnableEvents = False
nextTime = Now() + TimeValue("00:00:10") '１０秒間隔
Application.OnTime nextTime, "Sheet1.TimerProc"
レート一覧_Click '為替レートの命令に。
If Sheet1.Cells(6, 6) = "" Then '�．侫薀�
If Sheet1.Cells(11, 10) <= 102 Then '条件 １０２円以下
Sheet1.Cells(6, 6) = "到達" '�．侫薀�
CreateObject("Shell.Application").ShellExecute "C:\AVRIL LAVIGNE .WAV"
'音楽ファイルの場所
End If
End If
If Sheet1.Cells(7, 6) = "" Then '�▲侫薀�
If Sheet1.Cells(11, 10) <= 100 Then '条件 １００円以下
Sheet1.Cells(7, 6) = "到達" '�▲侫薀�
CreateObject("Shell.Application").ShellExecute "C:\AVRIL LAVIGNE .WAV"
'音楽ファイルの場所
End If
End If
Application.ScreenUpdating = True
Application.EnableEvents = True
End Sub
セルの（１１，１０）ドル円の値段を１０秒おきに監視して１０２円以下１００円いかで 音楽がながれま〜す。 Private Sub CommandButton1_Click() TimerProc End Subボタン１の手順です お布団にはいる直前に作ったコードなので必要最低限だけ考えました〜。 なので終了とかできないよ〜。エクセルを閉じるる〜。 これで、いっぱい眠ってもおこしてくれるる〜。
|
全1ページ
[1]
