
VBAでWebページをMHTMLファイルで保存して、Chromeで表示がしたいです。
VBAでWebページをMHTMLで保存するマクロは下記の通りで保存ができました。
---------------------------
Public Sub GetUrlPerfectWeb(ByVal downLoadURL As String, ByVal outFileName As String)
Const cdoSuppressNone As Long = 0
Const adSaveCreateOverWrite As Long = 2
Dim msg As Object ' // CDO.Message
Dim stm As Object ' // ADODB.Stream
Set msg = CreateObject("CDO.Message")
msg.CreateMHTMLBody downLoadURL, cdoSuppressNone, "", ""
Set stm = msg.GetStream
stm.SaveToFile outFileName, adSaveCreateOverWrite
stm.Close
Set stm = Nothing
Set msg = Nothing
End Sub
---------------------------
上記で保存したファイルをIE9だと表示できるのですが、Chromeだとファイルの中身?の文字列がそのまま表示されてしまい、テキストエディタで開いた様な状態になってしまいます。VBAで保存したMHTMLファイルをChromeで表示できるようにするにはどうしたらよいでしょうか?
Chromeが悪いのか、VBAが悪いのか分からない状況ですが、こちらに投稿させていただきます。
なお、ChromeはデフォでMHTMLファイルは表示できないので、以下を参考にMHTMLを有効化しています。
http://qiita.com/takoratta/items/aa943b35ce5a439 …
また、ChromeでCtr+SからMhtml形式で保存したファイルはChromeでもIEでも表示できます。
--
エクセル2013
Chrome バージョン 46.0.2490.86 m
IE 9.0.8...
A 回答 (1件)
- 最新から表示
- 回答順に表示
No.1
- 回答日時:
具体的な対処方法ではありませんが・・・。
MHTMLだからということではなく、HTMLでもCGIから出力すると同様の現象が起こる場合があります。
CGIの場合だと、ファイル出力の先頭で「Content-type:text/html」を出力してから出力します。
これを忘れると、IEでは表示されるがChromeではソースが表示されてしまいます。
本来は出力が必要な項目なのですが、IEはあいまいに出来ていて表示出来てしまいます。
VBAはマイクロソフトが開発していますので、その辺があいまいになっている可能性があり、
あくまでも想像ですが、VBAの問題だと思います。
解決方法がわかりませんが、参考になれば・・・。
ありがとうございます。
VBAで保存したMHTMLファイルは
「Content-Type: multipart/related;」となっており、
ChromeのCtr+Sで保存した場合は
「Content-Type: multipart/related;
type="text/html";」
となっていたため、試しに、VBAで保存したファイルをテキストエディタで開いて、「type="text/html";」を追加してみましたが、動作は同じでした。やなりVBAで保存したMHTMLファイルはChromeでは開けませんでした。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
accessでクエリをExcelにエクス...
-
CSVファイルの時刻の形式について
-
AccessのレポートからPDFをペー...
-
エクセル:VBAで自動的にCSV形...
-
Excel で「OLE は現在使用でき...
-
COBOL FILLER
-
EXCEL VBAでのCSVファイル読み...
-
Thunderbird 受信メールからの...
-
PHP:unzipコマンドにおけるエ...
-
Eclipseで検索ができなくなった
-
HTMLテキストリンクでExcelファ...
-
VB6.0のメモリリークについて
-
ATTファイルってどうやって開け...
-
テキストファイルの特定行の削...
-
【Excel VBA】取り込んだファイ...
-
テキストファイルの一部分を抽...
-
EXCEL VBAでカンマ区切りテキス...
-
MFC SDIアプリで開いているファ...
-
2GB以上のファイルを扱う方法
-
【VBA】複数CSVの特定範囲を1つ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
accessでクエリをExcelにエクス...
-
CSVファイルの時刻の形式について
-
コマンドプロンプトのテキスト...
-
Thunderbird 受信メールからの...
-
COBOL、項目末尾に空白がある場...
-
エクセルが裏で動いたままなん...
-
Acrobat参照設定
-
iTextでPDFを表示させたら日本...
-
VBA 参照先で選んだファイルを...
-
CSV形式で保存するとファイ...
-
COBOL FILLER
-
accessのリポートを、excelに出...
-
excel vbaでのxml出力がわかり...
-
エクセル:VBAで自動的にCSV形...
-
クエリー出力からEXCELに吐き出...
-
テキストファイルをエクセルで...
-
ショートカットで起動した場合...
-
VB6.0でExcel,PDF,Word出力方法
-
AccessのレポートからPDFをペー...
-
マックで作ったPDFファイル...
おすすめ情報