Excel VBA質問箱 IV

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

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


25147 / 76732 ←次へ | 前へ→

【56929】Re:VBAでIEのボタンの押す方法
発言  熊谷隆史  - 08/7/11(金) 11:28 -

引用なし
パスワード
   > http://croissant3.blog66.fc2.com/blog-entry-51.html
参考。

08/7/7(月) 20:47 は、
navigate後の待ちが足りないのでエラーが
出ているのではないですか。


Option Explicit
'Microsoft Internet Controlsに参照設定
'VistaならMicrosoft Browser Helpers(保護モード無効)

Private WithEvents objIE As InternetExplorer
Private flg As Boolean

Private Sub Workbook_Open()

  Dim strURL As String
  flg = False
  strURL = "http://www.google.co.jp/"'httpは半角に。
  Set objIE = New InternetExplorer
  objIE.Visible = True
  objIE.navigate strURL
  Do
    DoEvents
  Loop Until flg
  
End Sub

Private Sub objIE_DocumentComplete(ByVal pDisp As Object, URL As Variant)
  If pDisp Is objIE Then
    flg = True
  End If
End Sub

0 hits

【56792】VBAでIEのボタンの押す方法 ダンカイ 08/7/4(金) 22:58 質問
【56797】Re:VBAでIEのボタンの押す方法 かみちゃん 08/7/5(土) 9:48 発言
【56804】Re:VBAでIEのボタンの押す方法 ダンカイ 08/7/6(日) 6:48 質問
【56806】Re:VBAでIEのボタンの押す方法 かみちゃん 08/7/6(日) 8:08 発言
【56816】Re:VBAでIEのボタンの押す方法 熊谷隆史 08/7/7(月) 13:11 発言
【56833】Re:VBAでIEのボタンの押す方法 ダンカイ 08/7/7(月) 20:47 質問
【56867】Re:VBAでIEのボタンの押す方法 熊谷隆史 08/7/9(水) 9:39 発言
【56923】Re:VBAでIEのボタンの押す方法 ダンカイ 08/7/10(木) 21:12 お礼
【56929】Re:VBAでIEのボタンの押す方法 熊谷隆史 08/7/11(金) 11:28 発言

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