丹羽 徹
NEWORDER関数における実行時エラー '1004'
表題の件につきまして、同じ事象が発生し、解決できた方がいらっしゃいましたらご教示ください。
VBAに以下のコードを記述するとエラーが発生しております。
Dim order_result As String
order_result = NEWORDER("1357", "", 1, 0, "0", "2", "T", "", "", 1, "1", trading_password, Format(Now, "yyyymmddHHMMSS"), "", "")
エラーメッセージ
実行時エラー '1004' 'ThisCell' メソッドは失敗しました: '_Application' オブジェクト
恐らく「NEWORDER」関数内で'ThisCell' メソッドを実行しているのでしょうが、関数を利用するプロシージャ内で解決する方法がわからず…
なお、同じ関数をワークシート上のセルに入力して実行すると動作することは確認できました。
よろしくお願い申し上げます。
2020年08月31日
アップロードされたファイルにはウイルスチェックを行っておりますが、未知のウイルス等に感染されている場合がありますので、アップロードされたファイルのご利用はご注意ください。
また、取引パスワード等の重要な情報を投稿内容に含めないようご注意ください。
なお、アップロードされたファイルの利用や投稿内容によって、投稿者自身や他の利用者が被った損害に対して当社は一切責任を負いません。
また、セキュリティの関係上、一部コマンド等を含む内容を送信するとエラー画面が表示され、投稿ができない場合がございます。何卒ご了承ください。
岡三RSS集いの広場では、複数の単語による検索が可能です。
例）関数 and サンプル
→AND検索となり、「関数」および「サンプル」を含む検索結果が表示されます。
例）関数 or サンプル
→OR検索となり、「関数」または「サンプル」を含む検索結果が表示されます。
例）関数 not サンプル
→NOT検索となり、「関数」を含むが「サンプル」は含まない検索結果が表示されます。
※and、or、notの前後は半角スペースで区切ってください。
※単語の間を半角スペースで区切るだけだと、OR検索となります。
大野 了
丹羽さん、こんにちは！！
少し前にですが、岡三RSSがバージョンアップして、
『NEWORDER』に注文番号返却機能が付いたことにより
関数の仕様が変わって『NEWORDER』をVBAから使うことが出来なくなってしまいました。
代わりにですが、VBA用に『NEWORDER_CL』という関数が新設されていますので、
こちらを使うことでVBAから発注可能可能になります！！
2020年08月31日
丹羽 徹
大野さん、いつもお世話になっております。
お陰様でできました！
ありがとうございます！
2020年09月01日
大野 了
丹羽さん、こんにちは！！
上手くいきましたか！！
お役に立ててよかったです！！
2020年09月01日