外部関数の使い方がわからない

投稿者 : 素人     投稿日時 : 2024/07/10(Wed) 11:36:54     OS : Windows 10     EXCEL : Excel 2021

---

Sub ボタン1_Click()

Dim A As Long

    A = SntGetStockInst("8050", "現値")
    Debug.Print A

End Sub 

VBA関数：SntGetStockInstが入ったAPIはアドインで登録済ですがコンパイルすると「SntGetStockInst」でコンパイルエラー　「subまたはFunctionが定義されていません。」となります。

どうすればエラーにならないようになるのでしょうか？

投稿者 : とおりすがり     投稿日時 : 2024/07/11(Thu) 13:05:39

---

APIというのがなにを指しているのかわかりませんが、アドインにしているブックを参照設定してください

投稿者 : 素人     投稿日時 : 2024/07/11(Thu) 17:07:38

---

■[返信 1] とおりすがりさん（2024-07-11 13:05:39）の記事
＞ APIというのがなにを指しているのかわかりませんが、アドインにしているブックを参照設定してください

「ネオトレAPI for Excel」は証券基幹システムとExcelをAPI連携し、Excel上で株価情報等を利用できる機能です。誰でも無料で使えます。
downloadした「SBINT.API-Addin64.xll」をアドイン登録すれば、セル上、VBA上で関数を利用して株の情報を取得、発注機能が使えます。
ご教授どうりかわかりませんが参照設定をしましたがコンパイルエラー　「subまたはFunctionが定義されていません。」のままです。

Sub ボタン1_Click()

Dim A As Long

Const setRefFile As String = "C:\kabu\API\SBINT.API-Addin64.xll"
ActiveWorkbook.VBProject.References.AddFromFile setRefFile

    A = SntGetStockInst("8050", "現値")
    Debug.Print A

End Sub 

宜しくお願い致します。