投稿/コメントを表示します。

エクセルマクロVBA「Web連携」
エクセルマクロVBA「Web連携」Microsoft WinHTTP Services 5.1_GETリクエスト

こーさんの投稿

(投稿ID: 5264)  添付ファイルのダウンロード権限がありません

ご担当者様
すみませんが質問させてください。
Windows10(Excel2019/VBAver7.1)の環境で本セッションを実施したところ、「sBody = xh.ResponseText」結果が文字化けしてしまい動画のようにうまく表示させられません。
IE11では動画の通りに問題なくWebページが表示されています。
私の環境（Windows10(Excel2019/VBAver7.1)）でこの動作が正常なのかそうでないのか（まだ私に力なく）判別できずで問題切り分けの方向性をご教授いただけると助かります。


以前似たような事例について以下のコメントをされているようですが、「91_WinHttp_ADO.xls」が本講座の資料中に見当たらず置き場所を教えていただくこと可能でしょうか？
--------
コメント日時: 2015年03月20日 01時12分59秒
91_WinHttp_ADO.xls のサンプルを参考に、文字コードを変換します。
当該ページならば、ソース4行目に <meta http-equiv="Content-Type" content="text/html; charset=utf-8" /> とありますから、 strm.Charset = "UTF-8" で。（つまり、そのまま）
解析は、手間がかかりますが文字列操作関数を使ってガシガシ行うことになるかと
--------
どうぞよろしくお願いいたします。
2022/04/13 19:20