三流君 ken3のmemo置き場

三流プログラマーのメモ書きです。主にVBAやWindowsの話題が多いです

挨拶・自己紹介:
失敗続きのAB型の変わり者 :三流プログラマー Ken3です
フリーのエンジニア・個人事業主です・・と書くと聞こえはイイが(それとなくカッコよく聞こえるが)、 現在は小さな案件の受注請負 と 短期派遣 で 日々つつましく?ほそぼそと暮らしてます。

よく検索されるキーワード: [質問回答XXXXさんへ] [CreateObject] [VBA] [JRA競馬オッズ]

InternetExplorer の検索結果:

VBA IE操作 サイトを全選択してEXCELシートへコピーアンドペーストにチャレンジ

…teObject("InternetExplorer.application") 'IEのオブジェクトを作る ページを表示 objIE.navigate "URL文字列" '文字列でURLを渡す 全選択(CTRL+A) objIE.ExecWB 17, 0 'OLECMDID_SELECTALL = 17 全てを選択 コピー(CTRL+C) objIE.ExecWB 12, 0 'OLECMDID_COPY = 12 コピー'Excelに貼り付け Range("A1").Se…

getElementsByName が 正解で getElementByName が不正解?

…teObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '処理したいページを表示します。 objIE.Navigate "http://www.google.co.jp/" 'ページの表示完了を待ちます。 While objIE.ReadyState <> 4 Or objIE.Busy = True '.ReadyState <> 4の間…

VBA IEの .innerHTML は元ソースと違う

…teObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '処理したいページを表示します。 objIE.Navigate "http://www.yahoo.co.jp/" '.Navigate メソッドで Yahooを表示する。 'ページの表示完了を待ちます。 While objIE.ReadyState <> 4 Or objIE.Bus…

VBA IE操作 表の取り込み(質問 CMEのデータ取得について)

…teObject("InternetExplorer.application") 'IEのオブジェクトを作る objIE.Visible = True '見えるようにする(お約束) '.Navigate で 指定した文字列のURLを開く objIE.Navigate "http://www.cmegroup.com/trading/equity-index/international-index/nikkei-225-dollar_quotes_settlements_fut…

回答下書きの蛇足(価格でソート) VBA IE操作 Selectタグの選択 .SelectedIndex

…teObject("InternetExplorer.Application") 'オブジェクトを作成します。 End If objIE.Visible = True '可視、Trueで見えるようにします。 '処理したいページを表示します。 objIE.Navigate "http://www.kosho.or.jp/public/book/detailsearch.do" '.Navigate メソッドで表示する。 '↑上記のページの表示が完了するまで待ちます。 While…

回答下書き 試作 Excel A列の値(本タイトル)をWebブラウザーにセットする

…teObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '処理したいページを表示します。 objIE.Navigate "http://www.kosho.or.jp/public/book/detailsearch.do" '.Navigate メソッドで表示する。 '↑上記のページの表示が完了するまで待ちます。 While objIE.…

Dim ie As InternetExplorer を 使いたい時は、参照設定しましょう

…teObject("InternetExplorer.applicati on") 'IEのオブジェクトを作る objIE.Visible = True '見えるようにする(お約束)この三流サンプルを見た被害者が(読者が)他の掲示板などでご迷惑をかけているみたい なので、 正式な方法?行儀のいいキレイな参照設定する方法、操作を動画で説明します。※三流なゴミコードをアップしてネットのみなさんにご迷惑をおかけしてスミマセンでし た。。。 IEの操作を http://www.ken…

QA0914 VBAでIE操作 Document.allでWeb上の項目へデータをセットする

… objIE As InternetExplorer '変数を定義します。 Set objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '表示位置(左上の座標)とサイズ(高さ・幅)を調整する objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 '変換元の日本語が無くな…

QA0914 VBAでIE操作 送信後Web上の変換結果をDocumentから取り出す

… objIE As InternetExplorer '変数を定義します。 Set objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '表示位置(左上の座標)とサイズ(高さ・幅)を調整する objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 '変換元の日本語が無くな…

またまた、調子こいて回答したけど、、、

…teObject("InternetExplorer.application") objIE.Visible = True '初期ページを代入 strNEXT = "http://okwave.jp/212/423/c450.html" 'URL代入 nYLINE = 10 '10行目からせっとするので While strNEXT <> "" '次のURLが入っている間まわる 'ページを開く(.Navigateで表示する。) objIE.Navigate strNEXT 'ア…

QA0816 004 1R〜12Rまでの飛び先を調べセルに書き出す

…teObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '表示位置(左上の座標)とサイズ(高さ・幅)を調整する objIE.FullScreen = False '※Trueのモードだとびっくりするよ objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 objIE.Width = 800 '横幅…

QA0816 002 月別の URL作成と表示を行ないます

…teObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '表示位置(左上の座標)とサイズ(高さ・幅)を調整する objIE.FullScreen = False '※Trueのモードだとびっくりするよ objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 objIE.Width = 800 '横幅…

Windows Vista IE7 CreateObjectで失敗した画像

…OZqePSW0kYWindows Vista の IE7保護モードだと、 Set objIE = CreateObject("InternetExplorer.applicati on") で失敗する、そんなテスト動画です。続きの対策 手前味噌の方法は http://www.ken3.org/cgi-bin/group/vba_ie7.asp で逃げ手を考えてみましたがイマイチしっくりきてません。 カテゴリ: 科学と技術タグ: 三流君 失敗 IE7 CreateObject

Windows XP IE 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 です。 カテゴリ: 科学と技術タグ: 三流君

Windows Vista IE7 + Excel2007 で起動の失敗

…teObject("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 カテゴリ: 科学と技術タグ: 三流君 テスト結果 Ken3 IE…

7/8 IE操作 で .ExecWB メソッド

… objIE As InternetExplorer 'IEのオブジェクトを入れる変数を1つ作成する 'オブジェクトを作り、見えるようにして、初期ページをテストで表示 Set objIE = CreateObject("InternetExplorer.Application") objIE.Visible = True objIE.GoHome '初期ページの表示 'ページの表示完了を.ReadyStateで待つ While objIE.ReadyState <> READ…

6/14 .ReadyState プロパティ の テスト IE操作 VBA

… objIE As InternetExplorer '変数を定義します。 Set objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '表示位置とサイズを調整する objIE.FullScreen = False '※まぁ、わざわざ設定しなくてもいいけど。 objIE.Top = 100 '左上 上位置 obj…

6/14 .Busy プロパティ の テスト IE操作 VBA objIE

… objIE As InternetExplorer '変数を定義します。 Set objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '表示位置とサイズを調整する objIE.FullScreen = False '※まぁ、わざわざ設定しなくてもいいけど。 objIE.Top = 100 '左上 上位置 obj…

.Navigate2 メソッド で ページを隣のタブに表示する

… objIE As InternetExplorer '変数を定義します。 Set objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '表示位置とサイズを調整する objIE.FullScreen = False '※まぁ、わざわざ設定しなくてもいいけど。 objIE.Top = 100 '左上 上位置 obj…

.Navigate メソッド で ページの移動(URLを開く) IE操作

… objIE As InternetExplorer '変数を定義します。 Set objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 '表示位置とサイズを調整する objIE.FullScreen = False '※まぁ、わざわざ設定しなくてもいいけど。 objIE.Top = 100 '左上 上位置 obj…

IE操作 objIE.Toolbar=False の タイミング

… objIE As InternetExplorer '変数を定義します。 Set objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 objIE.GoHome 'ページをホームに移動する動作、メソッド objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 objIE.…

6/7 .FullScreen プロパティ IE操作 VBA 三流サンプル

… objIE As InternetExplorer '変数を定義します。 Set objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 objIE.GoHome 'ページをホームに移動する動作、メソッド objIE.FullScreen = True '画面いっぱいに表示されるので注意。 '↑意図したフルスクリー…

6/6 .StatusBar プロパティ IE操作 VBA 三流サンプル

… objIE As InternetExplorer '変数を定義します。 Set objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 objIE.GoHome 'ページをホームに移動する動作、メソッド objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 objIE.…

6/6 .ToolBar プロパティ IE操作 VBA 三流サンプル

… objIE As InternetExplorer '変数を定義します。 Set objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 objIE.GoHome 'ページをホームに移動する動作、メソッド objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 objIE.…

6/6 .MenuBar プロパティ IE操作 VBA 三流サンプル

… objIE As InternetExplorer '変数を定義します。 Set objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 objIE.GoHome 'ページをホームに移動する動作、メソッド objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 objIE.…

6/6 .AddressBar プロパティ IE操作 VBA 三流サンプル

… objIE As InternetExplorer '変数を定義します。 Set objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成します。 objIE.Visible = True '可視、Trueで見えるようにします。 objIE.GoHome 'ページをホームに移動する動作、メソッド objIE.Top = 100 '左上 上位置 objIE.Left = 100 '左上 左位置 objIE.…

6/6 .Top .Left .Width .Height プロパティ IE操作 VBA 三流サンプル

… objIE As InternetExplorer'オブジェクトを作成します。 Set objIE = CreateObject("InternetExplorer.Application") 'プロパティやメソッドを操作します。 objIE.Visible = True '可視、Trueで見えるようにします。 objIE.GoHome 'ページをオプションで選択したホームに移動する動作、メソッド '表示場所を整えたいので objIE.Top = 50 '左上 上位置 ob…

6/6 .GoHome メソッド IE操作 VBA 三流サンプル

…ださい。 Sub ie_test()'変数を定義します。 Dim objIE As InternetExplorer'オブジェクトを作成します。 Set objIE = CreateObject("InternetExplorer.Application") 'プロパティやメソッドを操作します。 objIE.Visible = True '可視、Trueで見えるようにします。 objIE.GoHome 'ページをオプションで選択したホームに移動する動作、メソッドEnd Sub

6/6 .Visible プロパティ IE操作 VBA 三流サンプル

…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

6/5 VBA IE操作 新しいウインドウ(IE)起動後 次の月>を押す 三流サンプル

… newIE As InternetExplorer 'シェルのオブジェクトを作成する Set objSHELL = CreateObject("Shell.Application") '起動した IE が 必ず 絶対 一番後ろ と決め付けて(プログラマーに絶対は無いだろクソ三流) Set newIE = objSHELL.Windows(objSHELL.Windows.Count - 1) '↑配列が0からなのでカウント-1 一番後ろのWindowをobjIEに代入 Se…

Ken3 ホームページ 目次

分類:HPを大きく分けると4つの柱(分類)です。

  1. [VBA・マクロ プログラミング]の解説
    当店の人気はVBA系のCreateObject("XXXXXX.application")で他のアプリケーションを操作するサンプルが人気です
  2. [プログラマーの愚痴]では、あまり見せたくない三流プログラマーの内面かな。
    三流君を踏み台にする
  3. [古いクラシック ASP(Active Server Pages)]の解説。
  4. [元コンビニ店長時代の話]が弟に巻き込まれ、失敗した脱サラ、畑違い?の仕事で失敗。
主に上記4つの分類でHP作成やメルマガの発行を行ってます。
※更新頻度が落ちていて情報の鮮度が悪いです。



本当に三流なんです(笑):たまにスゴイですねなんて言われることもありますが、
真実は→ [三流君の真実は...] ←を初めに見てくださるとわかると思います。
(からくりは、成功例↑しか載せてなくて ヒドイ失敗例はお蔵入り迷宮入りが多かったりします)