Excelシートが公開されていました。
ニッパーはSBI証券使っているので、なのでこれはありがたい。
ダウンロード先
-【シストレ講座①】EXCELからSBI証券へ発注してみる
コードをみてみると、ずいぶんシンプルなVBAです。
改造していろいろ作れそうですね
ニッパーはSBI証券使っているので、なのでこれはありがたい。
ダウンロード先
-【シストレ講座①】EXCELからSBI証券へ発注してみる
コードをみてみると、ずいぶんシンプルなVBAです。
改造していろいろ作れそうですね
バックアップサイトを使うとは。<br />フォーム名とURLさえ変えれば、<br />証券会社は、関係なさそうですね。<br /><br />ところで、ここの読み込み完了チェックがどうにも正常に動きません。<br /><br /> 'Do While objIE.Document.readyState <> "complete"<br /> 'Do While objIE.Document.frames(1).Document.ReadyState = "complete"<br /> Do While objIE.Document.ReadyState = "complete"<br /> DoEvents<br /> Loop<br /><br />ちょっと変えてみたんですけど。ダメでした。<br /><br />発注ボタンを押すと、踏み台のIEが開いて、動作用IEを開いて、動作用にアドレスを入れて飛ぶんですけど、<br /><br />Documentメソッドは失敗しました。IWebBrowser2オブジェクト<br /><br />になって、DoEventsに到達できません。<br /><br />なにかこの部分改造しました?<br /><br /><br />期間指定を書いてみました。VBAなんて見よう見まねです。w<br />動かないので、当然ノーチェックです・・・。<br /><br /> '期間<br /> For Each objITEM In objIE.Document.All.limit<br /> If objITEM.Value = Kikan Then<br /> objIE.Document.All.caLiKbn(1).Selected 'ラジオはChecked?<br /> objITEM.Selected = True<br /> Exit For<br /> End If<br /> Next<br /></p>
http://ameblo.jp/nekoron2/