CreateObject の検索結果:
…t objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '表示位置(左上の座標)とサイズ(高さ・幅)を調整する objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 '変換元の日本語が無くなるまでループ Dim Wait_Time As Date '秒数を計算するため …
…bjShell = CreateObject("Shell.Application") '後ろから消してく。 For n = objShell.Windows.Count To 1 Step -1 'MAXから-1ひいてく感じ Set objIE = objShell.Windows(n - 1) 'n番目のウインドウを代入 MsgBox "確認" & objIE objIE.Quit Next Set objShell = Nothing End Sub ↑を改造して、下記…
…ocument = CreateObject("htmlfile") で作成したhtmlfileドキュメントオブジェクトに html文字列を書き込む、そんなデバッグ風景です。 www.youtube.com https://www.youtube.com/watch?v=RjZZUq40gxY 目次 00:00 0.IEが無くなるので CreateObject("htmlfile") 00:26 1.DoEventsがないと処理が追い付かない? 03:25 2.oDocume…
…t objIE = CreateObject("InternetExplorer.application") objIE.Visible = True '初期ページを代入 strNEXT = "http://okwave.jp/212/423/c450.html" 'URL代入 nYLINE = 10 '10行目からせっとするので While strNEXT <> "" '次のURLが入っている間まわる 'ページを開く(.Navigateで表示する。) objIE.Navig…
…いて閉じて、を単純にCreateObject("InternetExpl orer.Application") と .Quit 繰り返しているから メモリの解放やタイミングかなぁ? 負荷テストを行わないで、自分の贅沢な環境で動いたから、、、or テストプログラムは小さくて、実データが付いていないから、たまたま動いた、全体のソースと解説は http://www.ken3.org/guchi/backno/guchi205.html のNo.205 負荷テストの重要性 IEのOp…
…t objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '表示位置(左上の座標)とサイズ(高さ・幅)を調整する objIE.FullScreen = False '※Trueのモードだとびっくりするよ objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 objIE.W…
…t objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '表示位置(左上の座標)とサイズ(高さ・幅)を調整する objIE.FullScreen = False '※Trueのモードだとびっくりするよ objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 objIE.W…
…utlook 起動をCreateObjectで ※これだと複数起動してしまうがご勘弁を Set oApp = CreateObject("Outlook.Application") '呪文1 名前空間 の 指定 と言っても、.GetNamespace("MAPI")しただけ Set myNameSpace = oApp.GetNamespace("MAPI") '次は作業フォルダーの指定(.GetDefaultFolder) と 表示(.Display) Set myFold…
…utlook 起動をCreateObjectで ※これだと複数起動してしまうがご勘弁を Set oApp = CreateObject("Outlook.Application") '呪文1 名前空間 の 指定 と言っても、.GetNamespace("MAPI")しただけ Set myNameSpace = oApp.GetNamespace("MAPI") '次は作業フォルダーの指定(.GetDefaultFolder) と 表示(.Display) Set myFold…
…et oApp = CreateObject("Outlook.Application") Set myNameSpace = oApp.GetNamespace("MAPI") Set myFolder = myNameSpace.GetDefaultFolder(6) '規定のフォルダーを指定 myFolder.Display '表示 いつものクセで .Visible = True とやりがちだけど 'メールアイテムの作成 Set objMAIL = oApp.Creat…
…OZqePSW0kYWindows Vista の IE7保護モードだと、 Set objIE = CreateObject("InternetExplorer.applicati on") で失敗する、そんなテスト動画です。続きの対策 手前味噌の方法は http://www.ken3.org/cgi-bin/group/vba_ie7.asp で逃げ手を考えてみましたがイマイチしっくりきてません。 カテゴリ: 科学と技術タグ: 三流君 失敗 IE7 CreateObject
www.youtube.com http://www.youtube.com/watch?v=IMDbGEOXp_wSet objIE = CreateObject InternetExplorer.application の テストです 解説は http://www.ken3.org/cgi-bin/group/vba_ie.asp です。 カテゴリ: 科学と技術タグ: 三流君
…Vista IE7でCreateObject("InternetExplorer.appli cation")後.Navigateしたら空白のIEができてしまい失敗したそんな 画像です。 Windows Vista IE7 + Excel2007 で起動(.Navigate)の失敗 http://ken3-info.blog.ocn.ne.jp/code_gomibako/2008/04/windows_vista_i_d9bc.html カテゴリ: 科学と技術タグ: 三流君…
…bjSHELL = CreateObject("Shell.Application")後、For Each objWINDOW In objSHELL.Windows でループさせ、objWINDOW.Topと.Leftを表示し た簡単なテストです Set objSHELL = CreateObject("Shell.Application")後、For Each objWINDOW In objSHELL.Windows でループさせ、objWINDOW.Topと.Left…
…t objIE = CreateObject("InternetExplorer.Application") objIE.Visible = True objIE.GoHome '初期ページの表示 'ページの表示完了を.ReadyStateで待つ While objIE.ReadyState <> READYSTATE_COMPLETE DoEvents Wend '印刷プレビューのコマンドを実行させる。 objIE.ExecWB OLECMDID_PRINTPREVIEW,…
…t objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '表示位置とサイズを調整する objIE.FullScreen = False '※まぁ、わざわざ設定しなくてもいいけど。 objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 objIE.Width = 800 …
…t objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '表示位置とサイズを調整する objIE.FullScreen = False '※まぁ、わざわざ設定しなくてもいいけど。 objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 objIE.Width = 800 …
…t objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '表示位置とサイズを調整する objIE.FullScreen = False '※まぁ、わざわざ設定しなくてもいいけど。 objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 objIE.Width = 800 …
…t objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '表示位置とサイズを調整する objIE.FullScreen = False '※まぁ、わざわざ設定しなくてもいいけど。 objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 objIE.Width = 800 …
…t objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 objIE.GoHome 'ページをホームに移動する動作、メソッド objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 objIE.Width = 800 '横幅 objIE.Height = 600 '高さ o…
…t objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 objIE.GoHome 'ページをホームに移動する動作、メソッド objIE.FullScreen = True '画面いっぱいに表示されるので注意。 '↑意図したフルスクリーンとちょっと違うかなぁ。 'まぁ、これは、これで使う場合もあるかも。一度使ってみ…
…t objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 objIE.GoHome 'ページをホームに移動する動作、メソッド objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 objIE.Width = 800 '横幅 objIE.Height = 600 '高さ o…
…t objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 objIE.GoHome 'ページをホームに移動する動作、メソッド objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 objIE.Width = 800 '横幅 objIE.Height = 600 '高さ o…
…t objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 objIE.GoHome 'ページをホームに移動する動作、メソッド objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 objIE.Width = 800 '横幅 objIE.Height = 600 '高さ o…
…t objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 objIE.GoHome 'ページをホームに移動する動作、メソッド objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 objIE.Width = 800 '横幅 objIE.Height = 600 '高さ o…
…t objIE = CreateObject("InternetExplorer.Application") 'プロパティやメソッドを操作します。 objIE.Visible = True '可視、Trueで見えるようにします。 objIE.GoHome 'ページをオプションで選択したホームに移動する動作、メソッド '表示場所を整えたいので objIE.Top = 50 '左上 上位置 objIE.Left = 50 '左上 左位置 objIE.Width = 800 '横幅…
…ださい。 Sub ie_test()'変数を定義します。 Dim objIE As InternetExplorer'オブジェクトを作成します。 Set objIE = CreateObject("InternetExplorer.Application") 'プロパティやメソッドを操作します。 objIE.Visible = True '可視、Trueで見えるようにします。 objIE.GoHome 'ページをオプションで選択したホームに移動する動作、メソッドEnd Sub
…3.org/cgi-bin/group/vba_ie_object.asp をみてください。 Sub ie_test() '変数を定義します。 Dim objIE As InternetExplorer 'オブジェクトを作成します。 Set objIE = CreateObject("InternetExplorer.Application") 'プロパティやメソッドを操作します。 objIE.Visible = True '可視、Trueで見えるようにします。End Sub
…bjSHELL = CreateObject("Shell.Application") '起動した IE が 必ず 絶対 一番後ろ と決め付けて(プログラマーに絶対は無いだろクソ三流) Set newIE = objSHELL.Windows(objSHELL.Windows.Count - 1) '↑配列が0からなのでカウント-1 一番後ろのWindowをobjIEに代入 Set objSHELL = Nothing 'この変数は 三流君みたいにもう用済みなので、バイバイ …
…bjSHELL = CreateObject("Shell.Application") '起動した IE が 必ず 絶対 一番後ろ と決め付けて(プログラマーに絶対は無いだろクソ三流) Set newIE = objSHELL.Windows(objSHELL.Windows.Count - 1) '↑配列が0からなのでカウント-1 一番後ろのWindowをobjIEに代入 Set objSHELL = Nothing 'この変数は 三流君みたいにもう用済みなので、バイバイ …