Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
3542 / 13658 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【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画面を表示させてから
１行づつ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ﾌｧｲﾙ
を表示した場合は、イベントが実行されます。
ＶＢＡが作成したHTML画面は、表示のみなのでしょうか？
度々申し訳有りませんが、御存知であれば回答を
頂きたく、宜しく御願いします。

>▼坊主頭のプログラマ さん：
>
>こんにちは。
>下のように一度aboutblank画面を表示させてから
>１行づつ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ﾌｧｲﾙ
>を表示した場合は、イベントが実行されます。
>ＶＢＡが作成したHTML画面は、表示のみなのでしょうか？

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

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

ＩＥの終了時にそのＴＥＸＴファイルを削除で。

というのはダメでしょうか？
【61614】Re:マクロで作成したHTMLを表示したい
お礼  坊主頭のプログラマ  - 09/5/21(木) 21:29 -
引用なし
パスワード
   ▼もも さん：
　御回答有難うございます。
ももさんの言われた通りにやってみます。
VBAとHTML(又はJavascript)間でデータの授受が
出来れば便利かなと考えているのですが、
難しいようです。


>▼坊主頭のプログラマ さん：
>>▼もも さん：
>
>>表示した画面にボタンやリンクを記述した場合、
>>イベントが実行されません。同じ内容のHTMLﾌｧｲﾙ
>>を表示した場合は、イベントが実行されます。
>>ＶＢＡが作成したHTML画面は、表示のみなのでしょうか？
>
>コントロールを配置した場合の動作までは詳しくないので
>他の識者の方の回答を頂きたいと思いますが
>ＩＥの動作を見ているとＨＴＭＬを書くたびに
>画面更新しているように見えますのでスクリプトが
>働かないのかもしれませんね。
>
>ただ、私が同じようなことを実行するとしたら
>ＴＥＸＴでファイルを作成してそのファイルをＩＥに
>ナビゲートさせます。
>
>ＩＥの終了時にそのＴＥＸＴファイルを削除で。
>
>というのはダメでしょうか？
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
3542 / 13658 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free