CreateObject の検索結果:
…et oApp = CreateObject("Outlook.Application") 'データの表示エリアをクリアする Rows("10:9999").Delete Shift:=xlUp '10行目から削除する Range("a1").Select ' NameSpace オブジェクトへの参照を取得します。 Set oNamespace = oApp.GetNamespace("MAPI") ' 既定のフォルダへの参照を取得し、フォルダを表示します。 Set oFol…
…bjShell = CreateObject("Shell.Application") Set objRET = Nothing 'リターン値を初期化する 'ウインドウの数だけまわすぞ For Each objWindow In objShell.Windows 'TypeNameでオブジェクト変数のタイプを表示する 'HTMLDocumentだったら If TypeName(objWindow.document) = "HTMLDocument" Then If InStr…
…bjShell = CreateObject("Shell.Application") Set objRET = Nothing 'リターン値を初期化する 'ウインドウの数だけまわすぞ For Each objWindow In objShell.Windows 'TypeNameでオブジェクト変数のタイプを表示する 'HTMLDocumentだったら If TypeName(objWindow.document) = "HTMLDocument" Then If InStr…
…bjShell = CreateObject("Shell.Application") Set objIE = Nothing 'ウインドウの数だけまわすぞ For Each objWindow In objShell.Windows 'TypeNameでオブジェクト変数のタイプを表示する 'HTMLDocumentだったら If TypeName(objWindow.document) = "HTMLDocument" Then 'URLをチェックする(アドレスを探す) I…
…bjShell = CreateObject("Shell.Application") Set objIE = Nothing 'ウインドウの数だけまわすぞ For Each objWindow In objShell.Windows 'TypeNameでオブジェクト変数のタイプを表示する 'HTMLDocumentだったら If TypeName(objWindow.document) = "HTMLDocument" Then 'URLをチェックする(アドレスを探す) I…
…bjShell = CreateObject("Shell.Application") Set objIE = Nothing 'ウインドウの数だけまわすぞ For Each objWindow In objShell.Windows 'TypeNameでオブジェクト変数のタイプを表示する 'HTMLDocumentだったら If TypeName(objWindow.document) = "HTMLDocument" Then 'URLをチェックする(アドレスを探す) I…
…bjShell = CreateObject("Shell.Application") Set objIE = Nothing 'ウインドウの数だけまわすぞ For Each objWindow In objShell.Windows 'TypeNameでオブジェクト変数のタイプを表示する 'HTMLDocumentだったら If TypeName(objWindow.document) = "HTMLDocument" Then If objWindow.document.…
…、馬鹿の一つ覚えで CreateObject("Shell.Application") から探ってみました。 おまけで、みつけたIEのFORMタグを表示してみました。操作動画: http://www.youtube.com/watch?v=dwNQaLV3xD0 www.youtube.comコード 'またまた、新しく起動した IPAT情報メインメニュー を 探す 'シェルのオブジェクトを作成する Set objShell = CreateObject("Shell.Appl…
…bjShell = CreateObject("Shell.Application")ここから、 For Each objWindow In objShell.Windows で回して、 TypeNameでHTMLDocumentか判断、 If TypeName(objWindow.document) = "HTMLDocument" Then さらに、 URLで判断(見つけてみました。) If objWindow.document.URL = "https://www.ip…
…)と言っても、 参照設定に □MicroSoft Outlook を追加して、 CreateObject("Outlook.Application") しただけです。動画解説やテスト結果www.youtube.com 動画元: VBA マクロ Outlook2007で作成したコードをExcel2007で使う - YouTube 動画区分でURL:ken3内のリンクを探す 三流君 VBA マクロ Outlook2007 Excel2007 参照設定 テスト 試行錯誤 ByVal
…ok を追加して、 CreateObject("Outlook.Application") しただけです。怪しい実演動画参照設定を行い、Excelでコードを走らせた動画です。 ※蛇足で、後半コードを修正してハマってますが、無視してください・・・いつもの右往左往・酔っ払い解説 VBA マクロ Outlook2007で作成したコードをExcel2007で使う www.youtube.com↑と合わせて、下のコードを見てください↓作成したコード参照設定後、 Set oApp = C…
…utlook 起動をCreateObjectで ※これだと複数起動してしまうがご勘弁を Set oApp = CreateObject("Outlook.Application") '呪文１ 名前空間 の 指定 と言っても、.GetNamespace("MAPI")しただけ Set oNameSpace = oApp.GetNamespace("MAPI") 'olFolderContacts 10 連絡先フォルダ '次は作業フォルダーの指定(.GetDefaultFolde…
…et oApp = CreateObject("Outlook.Application") '.GetNamespace("MAPI") Set myNameSpace = oApp.GetNameSpace("MAPI") '作業フォルダーの指定(.GetDefaultFolder) と 表示(.Display) Set myFolder = myNameSpace.GetDefaultFolder(10) '連絡先 '----- 'Set objFolder = objS…
…t objIE = CreateObject("InternetExplorer.Application") objIE.Visible = True objIE.Navigate "https://sec-sso.click-sec.com/loginweb/" '画面表示待ち While objIE.readyState <> 4 'READYSTATE_COMPLETE = 4 While objIE.Busy = True DoEvents '特に何もしないで.Bus…
…utlook 起動をCreateObjectで ※これだと複数起動してしまうがご勘弁を Set oApp = CreateObject("Outlook.Application") '呪文１ 名前空間 の 指定 と言っても、.GetNamespace("MAPI")しただけ Set myNameSpace = oApp.GetNamespace("MAPI") '次は作業フォルダーの指定(.GetDefaultFolder) と 表示(.Display) Set myFold…
… と言っても単純に CreateObject("Outlook.Application") で作成しただけです。 http://www.ken3.org/cgi-bin/group/vba_outlook.asp で 少し三流解説(自分脳内語の垂れ流し)を行っているので、よかったら見に来てください。動画解説やテスト結果www.youtube.com 動画元: VBS から Outlook 起動 CreateObjectで作成 - YouTube 動画区分・リンク 三流君 VB…
…で開きたいのですが、CreateObjectではなく、自分のwindowをコピーし、 >そのwindowでリンク先を開きたいのですが、可能なものでしょうか？ 私も >IEで開いているexcel を処理するのは 詳しくはわからないのですが、探しにくいと評判の過去記事を自分で探してみると(本人でも探しにくかった(笑)) 似ている処理・テストが、 ここ ○○さんへ サーバー上／IE上のExcelファイルからデータを抜き取る方法 途中まで、、、 - ken3memo (三流君) ht…
…t objIE = CreateObject("InternetExplorer.application") objIE.Top = 250 objIE.Left = 250 objIE.Width = 800 objIE.Height = 400 objIE.Visible = True 'ページを開く(.Navigateで表示する。) objIE.Navigate "http://dec2011.top1-12.info/test0120.html" '読み込み完了となる…
…t objIE = CreateObject("InternetExplorer.application") objIE.Top = 250 objIE.Left = 250 objIE.Width = 800 objIE.Height = 400 objIE.Visible = True 'ページを開く(.Navigateで表示する。) objIE.Navigate "http://dec2011.top1-12.info/test0120.html" '読み込み完了となる…
…t objIE = CreateObject("InternetExplorer.application") objIE.Top = 250 objIE.Left = 250 objIE.Width = 800 objIE.Height = 400 objIE.Visible = True 'ページを開く(.Navigateで表示する。) objIE.Navigate "http://dec2011.top1-12.info/test0120.html" '読み込み完了となる…
… Excel 連携 CreateObject("Excel.Application")でExcelを操作する記事が３位に入り、 なぜか、不明が４位。※アクセス失敗が４位？ それともクッキーやjavascript Offなどで見に来たのかなぁ？ 三流君VBAでIEのフォーム操作 Document.Formsを操作する 5位は、IEのフォームにデータをセットする記事です。 三流君VBA:AccessにExcelのシートをインポートする 6位はExcelのシートをAccessにイン…
…てみたいと思います。CreateObject Shell.Application で シェルのオブジェクトを作成して、 For Each objWindow In objShell.Windows で 1つ1つ取り出して、 TypeName(objWindow.document) で ドキュメントのタイプを表示させてみました。TypeName(objWindow.document) が HTMLDocument だったら、 MsgBox objWindow.document.…
…626/1309072052 を みてください ・IEの起動 ・表示待ち ・データのセットをテストしてみた。動画解説やテスト結果www.youtube.com 動画元: VBS VBScriptを使って JRA IPAT の ページを表示する - YouTube 動画区分・リンク 20110626 三流君 IE操作 VBS VBScript JRA IPAT CreateObject InternetExplorer.Application getElementsByName
…et oApp = CreateObject("Excel.Application") oApp.Visible = True 'Only XL 97 supports UserControl Property On Error Resume Next oApp.UserControl = True動画解説やテスト結果www.youtube.com 動画元: Access2010 から Excelを開く方法 Access2003のコードを貼り付けテスト - YouTube 動…
…ttp://d.hatena.ne.jp/ken3memo/20101018/1287345173 を見てください。動画解説やテスト結果www.youtube.com 動画元: OutlookのVBAをVBSで動かしたい CreateObject Outlook.Application - YouTube 動画区分・リンク 三流君 Outlook VBA VBS CreateObject Outlook.Application olFolderContacts イミディエイト
…ことは、OutlookのVBAから、EXCELの特定セルの情報をどのように取得するかです。 を処理したいので、 アウトルックからエクセルを起動する、そんな方法を調べてみます。動画解説やテスト結果www.youtube.com 動画元: QA2010-06-20 1.OutlookのVBAから、EXCELを起動する - YouTube 動画区分・リンク 三流君 VBA 2010-06-20 Outlook CreateObject Excel.Application テスト動画
…2003までで、PowerPoint2007からは無くなったみたいです。※残念です。。。 マクロ記録を使って スライドショー の 自動実行にチャレンジしてみました。動画解説やテスト結果www.youtube.com 動画元: VBA(vbs)でパワーポイントの操作 マクロ記録ほか入り口 - YouTube 動画区分・リンク VBA CreateObject PowerPoint.Application パワーポイント マクロ記録 三流君 Ken3 テスト 2010-06-10
…t objIE = CreateObject("InternetExplorer.application") objIE.Top = 100 objIE.Left = 100 objIE.Width = 1024 objIE.Visible = True 'ページを開く(.Navigateで表示する。) objIE.Navigate "http://blog.so-net.ne.jp/" Wscript.Sleep 1000 '1000で１秒 '読み込み完了となるまで、ループ…
…いて閉じて、を単純にCreateObject("InternetExplorer.Application") と .Quit 繰り返しているから メモリの解放やタイミングかなぁ？ 負荷テストを行わないで、自分の贅沢な環境で動いたから、、、or テストプログラムは小さくて、実データが付いていないから、たまたま動いた、全体のソースと解説は http://www.ken3.org/guchi/backno/guchi205.html のNo.205 負荷テストの重要性 IEのOpe…
…t objIE = CreateObject("InternetExplorer.application") objIE.Top = 100 objIE.Left = 100 objIE.Width = 1024 objIE.Visible = True 'ページを開く(.Navigateで表示する。) objIE.Navigate "http://blog.so-net.ne.jp/" Wscript.Sleep 1000 '1000で１秒 '読み込み完了となるまで、ループ…
