Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


3528 / 13644 ツリー ←次へ | 前へ→

【61573】マクロで作成したHTMLを表示したい 坊主頭のプログラマ 09/5/19(火) 23:27 質問[未読]
【61576】Re:マクロで作成したHTMLを表示したい もも 09/5/20(水) 10:43 発言[未読]
【61584】Re:マクロで作成したHTMLを表示したい 坊主頭のプログラマ 09/5/20(水) 21:33 質問[未読]
【61585】Re:マクロで作成したHTMLを表示したい もも 09/5/21(木) 9:29 発言[未読]
【61614】Re:マクロで作成したHTMLを表示したい 坊主頭のプログラマ 09/5/21(木) 21:29 お礼[未読]

【61573】マクロで作成したHTMLを表示したい
質問  坊主頭のプログラマ  - 09/5/19(火) 23:27 -

引用なし
パスワード
   HTMLファイルの内容が以下の場合、
<HTML>
 :
<BODY>
ホームページ表示
</BODY>
</HTML>

VBAが以下の内容で
SET objIE=CreateObject("InternetEXplorer.Application")
  :
With objIE
 .navigate ("ファイル名")
 :
の場合、
表示可能ですが、
マクロ内で上記HTMLを内容を作成し表示したいのですが、
HTMLの内容のテキストレコードを「.navigate 」で表示しようとした所、
予想外のweb画面を表示してしまいました。
マクロ内で作成したHTMLをポップアップメッセージとして表示できますか?

【61576】Re:マクロで作成したHTMLを表示したい
発言  もも  - 09/5/20(水) 10:43 -

引用なし
パスワード
   ▼坊主頭のプログラマ さん:

こんにちは。
下のように一度aboutblank画面を表示させてから
1行づつHTMLを書き込んでみてください。

Sub test()
Dim objIE

Set objIE = CreateObject("InternetExplorer.Application")

With objIE
 .Visible = True
 .Navigate "about:blank"
 With .Document
  .Write "<html>" & vbCrLf
  .Write "<body>" & vbCrLf
  .Write "ホームページ表示" & vbCrLf
  .Write "</body>" & vbCrLf
  .Write "</html>" & vbCrLf
 End With
End With

Set objIE = Nothing
End Sub

【61584】Re:マクロで作成したHTMLを表示したい
質問  坊主頭のプログラマ  - 09/5/20(水) 21:33 -

引用なし
パスワード
   ▼もも さん:
回答を頂き、どうも有難うございました。
回答の通り行った所、HTML画面を表示する事が
出来ました。尚、確認なのですが、
表示した画面にボタンやリンクを記述した場合、
イベントが実行されません。同じ内容のHTMLファイル
を表示した場合は、イベントが実行されます。
VBAが作成したHTML画面は、表示のみなのでしょうか?
度々申し訳有りませんが、御存知であれば回答を
頂きたく、宜しく御願いします。

>▼坊主頭のプログラマ さん:
>
>こんにちは。
>下のように一度aboutblank画面を表示させてから
>1行づつHTMLを書き込んでみてください。
>
>Sub test()
>Dim objIE
>
>Set objIE = CreateObject("InternetExplorer.Application")
>
>With objIE
> .Visible = True
> .Navigate "about:blank"
> With .Document
>  .Write "<html>" & vbCrLf
>  .Write "<body>" & vbCrLf
>  .Write "ホームページ表示" & vbCrLf
>  .Write "</body>" & vbCrLf
>  .Write "</html>" & vbCrLf
> End With
>End With
>
>Set objIE = Nothing
>End Sub

【61585】Re:マクロで作成したHTMLを表示したい
発言  もも  - 09/5/21(木) 9:29 -

引用なし
パスワード
   ▼坊主頭のプログラマ さん:
>▼もも さん:

>表示した画面にボタンやリンクを記述した場合、
>イベントが実行されません。同じ内容のHTMLファイル
>を表示した場合は、イベントが実行されます。
>VBAが作成したHTML画面は、表示のみなのでしょうか?

コントロールを配置した場合の動作までは詳しくないので
他の識者の方の回答を頂きたいと思いますが
IEの動作を見ているとHTMLを書くたびに
画面更新しているように見えますのでスクリプトが
働かないのかもしれませんね。

ただ、私が同じようなことを実行するとしたら
TEXTでファイルを作成してそのファイルをIEに
ナビゲートさせます。

IEの終了時にそのTEXTファイルを削除で。

というのはダメでしょうか?

【61614】Re:マクロで作成したHTMLを表示したい
お礼  坊主頭のプログラマ  - 09/5/21(木) 21:29 -

引用なし
パスワード
   ▼もも さん:
 御回答有難うございます。
ももさんの言われた通りにやってみます。
VBAとHTML(又はJavascript)間でデータの授受が
出来れば便利かなと考えているのですが、
難しいようです。


>▼坊主頭のプログラマ さん:
>>▼もも さん:
>
>>表示した画面にボタンやリンクを記述した場合、
>>イベントが実行されません。同じ内容のHTMLファイル
>>を表示した場合は、イベントが実行されます。
>>VBAが作成したHTML画面は、表示のみなのでしょうか?
>
>コントロールを配置した場合の動作までは詳しくないので
>他の識者の方の回答を頂きたいと思いますが
>IEの動作を見ているとHTMLを書くたびに
>画面更新しているように見えますのでスクリプトが
>働かないのかもしれませんね。
>
>ただ、私が同じようなことを実行するとしたら
>TEXTでファイルを作成してそのファイルをIEに
>ナビゲートさせます。
>
>IEの終了時にそのTEXTファイルを削除で。
>
>というのはダメでしょうか?

3528 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free