データの分析、グラフ作成、および通信のためのツールを備えた Microsoft 表計算ソフトウェアのファミリ。
自己解決された様ですね。
このブラウザーはサポートされなくなりました。
Microsoft Edge にアップグレードすると、最新の機能、セキュリティ更新プログラム、およびテクニカル サポートを利用できます。
特定のサイト(duck duck go)にGETメソッドを実行すると実行時エラーが発生します
・VBAからduck duck goにgetメソッドを実行すると実行時エラーが発生する
・google chromeなどブラウザのURLに上記VBAで実行したURLと同じURLを実行するとJSONが表示される
・またgoogle検索にGETメソッドを実行してもエラーは発生しない
→duck duck goかつVBAのみエラーが発生する理由がわからずとまっております。
なにかわかる方いらっしゃいましたらご教示願います
Call xmlHttp.send でsendすると実行時エラーが発生します
以下VBAソース
Sub dltest()
Dim url As String
url = "[https://api.duckduckgo.com/?q=valley&format=json&pretty=-1&kl=jp-jp](https://api.duckduckgo.com/?q=valley&format=json&pretty=-1&kl=jp-jp "api.duckduckgo.com")"
Dim xmlHttp As Object
Set xmlHttp = CreateObject("MSXML2.XMLHTTP")
Call xmlHttp.Open("GET", url, False)
Call xmlHttp.send
Dim strm As Object
If xmlHttp.readyState = 4 Then
Else
Debug.Print "error!!"
End If
End Sub
以上
データの分析、グラフ作成、および通信のためのツールを備えた Microsoft 表計算ソフトウェアのファミリ。
ロックされた質問。 この質問は、Microsoft サポート コミュニティから移行されました。 役に立つかどうかに投票することはできますが、コメントの追加、質問への返信やフォローはできません。
ありがとうございます。VBAコミュニティーはMSサイト内にはなく、stack overflowということですね。
ユーザー登録しようとしましたが、エラーが発生し質問ができないので、後ほど試してみます。
VBA(マクロ)の公式サポート場所は、海外コミュニティとなっています。
有識者が集まっている所の方が、適切なアドバイスを受けやすいでしょう。・Stack Overflow(VBA)[VBA プログラミングに関する質問]Stack Overflow には、説明的なタイトル、完全で簡潔な問題ステートメント、問題を再現する
ための十分な詳細の要求などのガイドラインがあることに注意してください。
機能要求または過度に広範な質問は、トピック外と見なされます。
新しいユーザーの場合は、Stack Overflow ヘルプ センター にアクセスして詳細を確認して下さい。※ 閲覧者・回答者が多い公式サポートサイトをお勧めします。英語で質問を送信してください。