VBAでIEを操作する
Sub ie_test() 'IEテストする。 'IEの起動 Dim objIE As Object '変数を定義します。 Set objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '処理したいページを表示します。 objIE.Navigate "http://www.google.co.jp/" 'ページの表示完了を待ちます。 While objIE.ReadyState <> 4 Or objIE.Busy = True '.ReadyState <> 4の間まわる。 DoEvents '重いので嫌いな人居るけど。 Wend 'google検索項目(name=q)にセットする。 objIE.Document.getElementsByName("q")(0).Value = "三流" End Sub ' Private Sub OpenWebPage22(ByVal url As String) Dim objIE Dim objShell As Object Dim n As Integer Dim low As String Dim col As String Dim i As Long ' low = ActiveCell.Row ' col = ActiveCell.Range ' Set objShell = CreateObject("Shell.Application") '後ろから消してく。.Windowsでエクスプローラーとインターネットエクスプ...