三流君 ken3のmemo置き場

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

挨拶・自己紹介:「こんな感じ」や「あの、あの」と活舌の悪い、
三流プログラマーのオッサンです

当ブログではGoogle AdSenseおよび各種アフィリエイトプログラムを利用して広告を配信しています。

Word, VBA の検索結果:

03/22 VBA IE操作 単勝表取込み ラフな基本設計と詳細設計

動画で三流解説動画の簡単な説明システム名:JRA IPADのページから単勝の表を取り込む概要: WebBrowserをExcel User Form に 貼り、 ログイン処理を操作しながら、 JRA IPADのページから単勝の表を取り込む。必要な環境 : Excel2003 と Windows XP SP2 + IE7 (随時、対応環境をチェックする)作業日数・費用: 開発スケジュール:↑こんな概要・要求設計だと、見積もり誤差が、、、あとあと、要求が増えないように(笑) 全体…

03/21 VBA IE操作 単勝表取込み 事前準備で現物操作

動画で三流解説動画の簡単な説明全体の流れやソース・解説は : http://ie.vba-ken3.jp/sample/003/2009-03-22.html を 見てください。現物を操作して、システム化の構想を練る。システム名JRA IPADのページから単勝の表を取り込む客先、ユーザーからの要望・希望を聞く 今回は(今回も)かなり、ラフな日本語で、 「JRA IPADのページから単勝の表を取り込みたい」 と、口頭で言われました。。。まぁ、まずは現物を動かして確認しますか。 …

03/18 VBA IE 表を取り込む バグ002 VistaでIE操作不可

動画で三流解説動画の簡単な説明保護モードで保護されていて、IE7をVBAでコントロールできなかった。さてどうしましょう。環境設定を変えるインチキを案を紹介しましたが、この案は当然却下の方向で­お願いします。修正したソースは http://ie.vba-ken3.jp/sample/002/2009-03-16.html#BUG002_Vista_IE7 を見て下さい動画解説やテスト結果www.youtube.com 動画元: 03/18 VBA IE 表を取り込む バグ002…

Google +1のボタン を 設置後アクセス減 もろに逆効果だった?それとも?

… >誤解 4: AdWords や AdSense, Analytics を利用すると、サイトの評価が上がる、もしくは下がる +1ボタンは影響するのかなぁ(って、+1ボタンなんだから、誰からも一定期間すすめられていないページはランクが下がって当然なのか?)計測しか書いてなかったけど http://www.google.com/support/webmasters/bin/answer.py?hl=ja&answer=1140189 http://www.google.com/…

03/17 VBA IE 表を取り込む テーブルの取出し

動画で三流解説動画の簡単な説明解説とソースは: http://ie.vba-ken3.jp/sample/002/2009-03-16.html を見て下さい。 'タグの取出しが、.tags("タグの名前")でできるので、 Dim objTABLE As Object 'TABLEの格納用 Set objTABLE = objIE.document.all.tags("TABLE") '.tags("TABLE")でTABLEタグを抜く'.Length で 抜き出した数がわか…

03/17 VBA IE 表を取り込む 箇条書きから始める?

動画で三流解説動画の簡単な説明詳細設計を見ながら、まずは、箇条書きかなぁ。 ※コメントにして、詳細設計書の機能を日本語でそのまま書きます。Sub Web_Get_Table_test0317() 'IE起動 'C8のURLを表示する 'テーブルを探す '1行目のデータを取り出す。 ' TH TD の 項目とC10の条件を比較して目的の表か判断。 ' 目的の表を見つけたらシートに書き出す。 '※テーブルが見つからない時は、エラーメッセージを表示 End Sub↑次に、肉付け、こ…

03/16 VBA IE 表を取り込む STOPで止め TABLEを探る

動画で三流解説動画の簡単な説明いつものように STOP でとめて、テーブルを探ってみました。 今回は、イミディエイト と ウォッチ式 を使って ツリー状のオブジェクトを上から探ってみました。探っていて、面白かったのは、 ? objTABLE(2).rows(1).cells(1).innertext みたいに、 Rows Cells などが使えそうなところです。※組み合わせて使ってみたいと思います。 解説とソースは: http://ie.vba-ken3.jp/sample/…

03/16 URL を指定して IEをShell関数で起動する

動画で三流解説動画の簡単な説明セルのC8から値を取り出し、その値を使用して(指定して) IEをShell関数で起動してみました。単純に strURL = """" & Range("c8").Text & """" 'URLをC8から取得する Call Shell("explorer.exe " & strURL, vbNormalFocus) で何とか起動しました。。。 解説とソースは: http://ie.vba-ken3.jp/sample/002/2009-03-16…

03/14 エラー処理を入れる 危ないポイント、見つからない時の処理

動画で三流解説動画の簡単な説明ソースと解説は http://www.ken3.org/vba/backno/vba180.html でやってます。コードを公開するなら、丁寧に作らないと、 三流コード被害者の会 から また、クレームの書き込みとメールをもらうかなぁ。今回は、危ないポイントを1つ ※それでもエラー処理は1つだけしかやらないのかよ。危ないのは、ココ Set objParent = objDT(n).parentElement '親オブジェクトを代入 '次にSTRON…

IE を 起動して Yahooファイナンス 始値 高値 安値 出来高 を探す

動画で三流解説動画の簡単な説明STRONG 強調表示の値を探す -- Yahooファイナンス 始値 高値 安値 出来高 を探すソースと解説は http://www.ken3.org/vba/backno/vba180.html でやってます。動画解説やテスト結果www.youtube.com 動画元: IE を 起動して Yahooファイナンス 始値 高値 安値 出来高 を探す - YouTube 動画区分・リンク 三流君 VBA IE テスト

03/14 Array 関数を使用して処理をまとめる

動画で三流解説動画の簡単な説明始値 高値 安値 出来高 の処理で、同じIf文を使って処理してます。三流以外の普通のプログラマーなら、処理をまとめます。 同じ処理なら、配列とループの出番ってことで、 Array 関数を使用して、処理をまとめてみたいと思います。ソースと解説は http://www.ken3.org/vba/backno/vba180.html でやってます。動画解説やテスト結果www.youtube.com 動画元: 03/14 Array 関数を使用して処理を…

IE Document .parentElement で親を参照?

動画で三流解説動画の簡単な説明ソースと解説は http://www.ken3.org/vba/backno/vba180.html でやってます。本人も忘れていたお宝?候補 .parentElement を探ってみたいと思いますPS.歌のおにいさん 「嵐なめんなよ」 みたいに 「三流プログラマーなめんな」 と 自分に言い聞かせつつ。。。※今日の最終回放送までに作業終わらせたいけど・・・動画解説やテスト結果www.youtube.com 動画元: IE Document .pa…

03/10 URL入力時、変更無しの時、再度読み込みに行く そんなバグ

動画で三流解説動画の簡単な説明←の詳細は http://ie.vba-ken3.jp/sample/001/2009-03-07.html を見てください。内容: URL入力エリアに入る。(フォーカスを移す) 何もURLを修正していないのに、 再度 読み込み処理 が走ってしまう。処置: WebBrowser1.Document.URL で 現在処理中のURLが取れるので、 単純に If文で 入力値 = 現在の文章URL がきいて、 同じ場合、何もしないで(.Navigateで…

03/09 TextBox .SelStart .SelLength カーソルを頭に持ってきた

動画で三流解説動画の簡単な説明要望004 : HTMLソースを選択したらカーソルを先頭にしてほしい内容 読み込み完了後、HTMLソースの表示エリアをクリックすると、 カーソルが後ろにあり不便。 普通ソースは頭から読むので、頭にカーソルを持ってこれないか?単純に、データセット時に、 テキストボックス.SelStart と テキストボックス.SelLength をセットして、実験してみました。←の詳細は http://ie.vba-ken3.jp/sample/001/2009-…

03/09 WebBrowser1.Document.all(n).tagname = "HTML" デバッグ

動画で三流解説動画の簡単な説明.TagName で タグを判断して、HTMLのソースを取り出してみた。。。 Dim n As Integer For n = 0 To 99 'タグがHTMLかチェック If Me.WebBrowser1.Document.all(n).tagname = "HTML" Then Me.txtHTML_SRC.Text = Me.WebBrowser1.Document.all(n).OuterHTML Exit For 'ループを抜ける En…

03/08 Document.all(0)が空白なら

動画で三流解説動画の簡単な説明データ読み込み後、Document.all(0)が空白なら、Document.all(1)をセットしてみました。 ※でも、できなかったんだけど・・・Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant) Me.txtHTML_SRC.Text = Me.WebBrowser1.Document.all(0).OuterHTML If Len(T…

03/07 WebBrowser Body の ソースをセット

動画で三流解説動画の簡単な説明Me.WebBrowser1.Document.all(0).innerHTML で ソースが取れなかったので、 Me.WebBrowser1.Document.Body.OuterHTML をセットしてみました。 ヘッダー情報が見れないので、ソースの表示ツールになってないけど・・・←の詳細は http://ie.vba-ken3.jp/sample/001/2009-03-07.html を見てください。動画解説やテスト結果www.youtub…

Excel UserForm Initialize フォームの初期処理でセルの値を参照

動画で三流解説動画の簡単な説明←の詳細は http://ie.vba-ken3.jp/sample/001/2009-03-07.html を見てください。セルのB6に書かれた値を初期値として利用します。フォームの初期処理のイベント UserForm_Initialize で Range("B6") の値を代入後、 .Navigate で ページに飛ばしただけですが。。Private Sub UserForm_Initialize() 'Formの初期処理 Me.txtURL…

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

動画で三流解説動画の簡単な説明私が、 http://www.ken3.org/vba/ で作っているサンプル Dim objIE As Object 'IEオブジェクト参照用 Set objIE = CreateObject("InternetExplorer.application") 'IEのオブジェクトを作る objIE.Visible = True '見えるようにする(お約束)この三流サンプルを見た被害者が(読者が)他の掲示板などでご迷惑をかけているみたいなので、 正…

Access2010 から Excelを開くコード Access2003のコードを貼り付けテスト

下記のような質問が来ました。 >貴殿の「Access 2003 から Excelファイルを開く マクロ VBAを作成してみる」の動画を見て、 >はじめてアクセス2010(単体)を購入してマクロを勉強しようと思っています。 >動画ではコマンドボタンウィザードで種類「アプリケション」を指定しても、 >ボタンの動作「アプリケーションの終了」しか表示がありません。 > >コマンドボタンウィザードに「アプリケション」の種類を表示させる方法のご教授を願います。 実際に Access201…

ExcelのUserFormに Web(IE) の コントロールを貼ります

動画で三流解説動画の簡単な説明Excel UserForm で Webのコントロールを使用可能にする。。。 そんな操作手順、方法です。http://www.ken3.org/cgi-bin/group/vba_ie.asp で 三流解説してます よかったら 遊びに来てください。。。動画解説やテスト結果www.youtube.com 動画元: ExcelのUserFormに Web(IE) の コントロールを貼ります - YouTube 動画区分・リンク 三流君 IE Exce…

03/05 要望002 : URLの初期値を自由に設定したい

動画で三流解説動画の簡単な説明解説は http://ie.vba-ken3.jp/sample/001/2009-02-17.html です。 要望002 : URLの初期値を自由に設定したい 内容 現在、Googleが初期値でセットされているが、 シートに設定値を書き、参照するなどして、 自由にテスト用の初期ページを設定したい。動画解説やテスト結果www.youtube.com 動画元: 03/05 要望002 : URLの初期値を自由に設定したい - YouTube 動画…

03/05 要望001 : UserFormの起動ボタンがほしい

動画で三流解説動画の簡単な説明解説は http://ie.vba-ken3.jp/sample/001/2009-02-17.html です。 要望001 : UserFormの起動ボタンがほしい 内容 VBAの編集画面から実行 じゃなくて シートに貼ったボタンからUserFormを起動できないか?システム名デバック用 Webページのソースを表示する プログラム要望・改善点(気が付いたこと) 仕様書通りに作りました これは 仕様です。 ^^^^^^^^^^^^^^^^^^^^…

03/05 バグ001 : Yahooのスポーツのソースが表示されない

動画で三流解説動画の簡単な説明解説は http://ie.vba-ken3.jp/sample/001/2009-02-17.html です。システム名デバック用 Webページのソースを表示する プログラムバグ・不具合 必ず修正しないといけない項目。納品前のテストで見つかって、よかったね(おぃおぃ)バグ001 : Yahooのスポーツのソースが表示されない 内容 http://www.yahoo.co.jp/ を URLへ入力後、スポーツを選択する 表示されるはずのHTMLソ…

0228 Debug.Print を 使い、データをイミディエイトへ表示

動画で三流解説動画の簡単な説明デバック時によく使っているのが、 タイミングや中身を見たいときに Msgbox "XXXX" & 変数 とやってますが、毎回OKを押さないといけないので不便です。 ※OKで止まって、便利な時もあるけど。知ってると便利な方法があって、 Debug.Print "xxxx" とやると、 イミディエイトへ(VBAのコード入力画面の下) 表示させることができます。イミディエイト ウインドウ(Ctrl+G) と Debug.Print http://www…

0225 Excel UserForm を 作る

動画で三流解説動画の簡単な説明コーディング 画面に(Formに)オブジェクトを配置します。 Excel UserForm を 作る解説は http://ie.vba-ken3.jp/sample/001/2009-02-17.html です。動画解説やテスト結果www.youtube.com 動画元: 0225 Excel UserForm を 作る - YouTube 動画区分・リンク 三流君 Excel UserForm

WebBrowser Events MAKE 02-24 IEイベントのテスト

動画で三流解説動画の簡単な説明← フォームにWebBrowserを貼り、イベント処理の記述をテストしてみます。 まぁ、あまり難しく考えないで、オブジェクトをダブルクリック(笑) まずは、ここから始めてみてください(おぃおぃ) ※しつこく繰り返すと、ダブルクリック、まずはここから??? - Private Sub UserForm_Initialize() Me.WebBrowser1.GoHome End SubPrivate Sub WebBrowser1_BeforeNa…

VBA IE 株価 現在値をYahooファイナンスから取り込む テスト

動画で三流解説動画の簡単な説明← のVBA Excel のソースファイルは http://ken3-info.blog.ocn.ne.jp/objie/2009/02/222_yahoo_b868.html に置きました あわせてみてください。 株価 現在値をYahooファイナンスから取り込む テスト'銘柄コードを入力後、 'IE を 起動して Yahooファイナンスのページを表示する 'document.all.tags("TD")でTDタグを抜き出す '左から3文字が[現…

IE を 起動して Yahooファイナンスのページを表示する

動画で三流解説動画の簡単な説明'銘柄コードを入力後、 'IE を 起動して Yahooファイナンスのページを表示する 'その後 TD タグを.tagsで抜いてシートに書き込む Windows XP IE7 Excel2003 で テストソースは http://ken3-info.blog.ocn.ne.jp/objie/2009/02/222_ie_yahoo_b353.html に保存しました。あわせてみてください動画解説やテスト結果www.youtube.com 動画元:…

Excel VBA から OutLookを起動して 受信メールを1つ1つ取り出す

動画で三流解説動画の簡単な説明MailItem オブジェクト http://msdn.microsoft.com/ja-jp/library/cc359390.aspx↑MSDN を参考にして、 ソースは → http://ken3-info.blog.ocn.ne.jp/code_gomibako/2009/02/222_excel_vba_o_94b3.html に保存されてます。 Sub OL_TEST_LOOK_MAIL_0221() 'Excel VBA から Ou…


質問・感想・クレームなど、
気軽にコメント欄に書いてもらえるとうれしいです。

当ブログではGoogle AdSenseおよび各種アフィリエイトプログラムを利用して広告を配信しています。


フッター:最後にKen3Videoの動画一覧を紹介します

YouTubeにアップした動画です。他の動画を一瞬でも見てもらえるとさらに嬉しいです。
再生リスト:[三流君Ken3の最新動画]←リストの一覧形式で表示する


また、ブログを見に来てくださいね。ではまたぁ~