動画で三流解説動画の簡単な説明ソースコードと解説は http://d.hatena.ne.jp/ken3memo/20120407/1333765069 を見てください。 全体の流れは http://ken3hitori.g.hatena.ne.jp/bbs/30 を見てください。 'シェルのオブジェクトを作成する Set objShell = Cre…

前回の回答 XXXXXさんへ ExcelでOutlookの受信メールを読むサンプル - 三流君 ken3のmemo置き場 http://d.hatena.ne.jp/ken3memo/20120415/1334453463 が失敗した と 感じたので、追加メッセージ・・・(ぉぃぉぃ) >if subFolder.name="****" Then など、処理…

>ＯＵＴＬＯＯＫをエクセルに読み込みたくコードを真似して作ったのですが >動作しません。ご指南頂けると助かります。 Cells(y, "A") = objMAIL.CreationTime Cells(y, "B") = objMAIL.SenderName Cells(y, "C") = objMAIL.Subject Cells(y, "D") = objMAIL…

次は、開催地、競馬場単位でループさせてみます。場名を覚えた後にループさせてみます。'競馬場・開催地でループする。 jのループ For j = 0 To nJYO - 1 '↑上で保存したnJYOの分だけ回る でループを作り、 'name=m の オプションのj番目を選択する objSELEC…

変数を２つ作成して、 レース番号 と オッズの種類を覚えます。 Dim nR 'レース数 Dim strR_NAME(13) 'レース 通常連番だからいらないんだけど・・・ 'SELECTのタグを集める .getElementsByTagName("SELECT")を使用 Set objSELECT = objIE.Document.getEleme…

目的のテーブルを If objTABLE(n).Rows(0).Cells(0).InnerTEXT = "枠番" Then で探すことができたので、 中のデータ(テキスト)を取り出し、カンマ区切りで出力してみます。ポイントは、 .Rows.Length で 行数、 .Rows(y).Cells.Length で 列数 が取得できる…

テーブルの左上が枠番となっているテーブルを探したかったので、Wscript.ECHO objTABLE(n).Rows(0).Cells(0).InnerTEXT みたいな感じて、 .Rows(0)で１行目、 .Cells(0)で１列目 の .InnerTEXTで中の文字を取得できるので、 If objTABLE(n).Rows(0).Cells(0)…

テーブルのソースを確認したかったので、 表示済みのIEを探し、 .getElementsByTagName("TABLE")を使用して、テーブルを集めて、 Set objTABLE = objIE.Document.getElementsByTagName("TABLE") .Lengthで個数のチェック、 中身(.OuterHTML)をWscript.ECHOで…

また また また、ダメでした、、と連絡をいただく(涙)(涙)(涙) >テキストボックスにカーソルが存在するのではなく、 >テキストボックス以外の場所でマウスが動いたことで送信されるようです。 > >わたしの力ではVBAでマウスの動きを感知させる手段が思いつき…

XXXXXさんへ Aタグ リンクの文字を探して押す - ken3memo (三流君) と XXXXXさんへ IE操作で DoEventを入れたり処理待ちを入れてみては？ - ken3memo (三流君) の 流れ、続きです。(※三度目の正直、二度あることは三度ある・・・(ぉぃぉぃ))またまた、ダメで…

XXXXXさんへ Aタグ リンクの文字を探して押す - ken3memo (三流君) の 続きで ダメでした、、と連絡をいただく(涙) >幾度と申し訳ございません。 > > For Each objA In objIE.document.all.tags("A") 'Aのタグを.allから抜く > MsgBox "確認用" & objA.inner…

下記の質問がきました。 <li class="mode"><a tabindex="2" href="javascript:void(0)" onClick="send()">返信</a></li> <li class="wmode" style="display:none;"><a tabindex="3" href="javascript:void(0);" onClick="Question();">質問</a></li> <li class="dmmode" style="display:none;"></li>

画面がオッズの画面に切り替わったら、テストで、 レース番号を選択(テストで11Rを選択) オッズの種類(一番上の 単・複 を選択) してまみす。 <SELECT name="s"> <OPTION value="3121210" selected>1R</OPTION> <OPTION value="3121220">2R</OPTION> ・ ・ <OPTION value="31212a0">10R</OPTION> <OPTION value="31212b0">11R</OPTION> <OPTION value="31212c0">12R</OPTION> </SELECT>

本当は、レース番号のオッズボタンを押すのが正しいと思いますが、 ここでは、一番初めに見つけた オッズ の ボタンを押してみます。 ※1Rに決め打ちして、オッズの画面に切り替える処理としては、同じように .getElementsByTagName("INPUT")で集めて、 Set o…

競馬場 開催地 選択のソースを見ると <FORM method=post action=http://info.ipat.jra.go.jp/p/s> <INPUT name=g value=Mnu01 type=hidden> <INPUT name=s value=0000000 type=hidden> <INPUT name=j value=6123500000 type=hidden> <INPUT name=w value=3e2c27747c352f23 type=hidden> <TD> <SELECT size=4 name=m> </select></td></form>

IPAT情報メインメニュー https://info.ipat.jra.go.jp/p/s を探します。また、馬鹿の一つ覚えで CreateObject("Shell.Application") から探ってみました。 おまけで、みつけたIEのFORMタグを表示してみました。操作動画: http://www.youtube.com/watch?v=dwN…

上で見つけた、IEから、情報メニューを押したかったので、 .getElementsByTagName("A") で、 リンクのAタグを集めて、 .OuterHTMLで中身のソースを確認、 中に、情報メニューがあるか？(InStr関数で探し) If InStr(objA(n).OuterHTML, "情報メニュー") > 0 T…

ここから、情報メニューが表示されているIEを探して、処理を行うには？似ている処理、入金処理からコードをコピーして使ってみます(ぉぃぉぃ)'シェルのオブジェクトを作成する Set objShell = CreateObject("Shell.Application")ここから、 For Each objWind…

動画で三流解説動画の簡単な説明右上のツールボタン(alt+x)を押して インターネットオプションを選択します。 次に、 タブの設定を選択します。ポップアップの発生時 を 常に新しいウインドウにしてみたり、リンクを開く方法 を 新しいウインドウにしたり設…

動画で三流解説動画の簡単な説明文字を書く フォトライフの写真を ここの間↓に はりつけたいAAAAAAAa ZZZZZZZZ貼りつけがバグなのか？ 貼りつけると、なぜか消えてしまう・・ 違うよ、おじさんの操作方法が違うんだよ。 若い人は、写真を選択してから、 再度…

動画で三流解説動画の簡単な説明Webクエリーをはじめに作成してから、編集処理をマクロ記録してみます。URLの編集場所、記録されたコードを探し、アレンジしてみます。http://q.hatena.ne.jp/1333545025 の 回答サンプルとして作成しました。。。動画解説や…

インクをそんなに使用した記憶が無いけど、 ※年賀はがきも作らなかったし、カラーで印刷した記憶があまり無いんだけど 一色無くなってしまったので・・・そろそろ購入しないとなぁ。 . Canon キヤノン 純正 インクカートリッジ BCI-7e(C/M/Y) 3色マルチバッ…

下記のような質問メッセージをいただきました。 >「三流」とはおっしゃっていますが、私から見たらあなたが羨ましいかぎりです。 >どうすれば、三流君のようにスラスラプログラムが書けるのか、、、と動画を感心して観ていました。 >本当は、メールアドレス…

動画で三流解説動画の簡単な説明手作業で JRA IPT 情報メニュー オッズを押してみた そんな、プログラム作成前の確認動画です。JRA IPAT で オッズの情報を取得する事前準備、手作業で処理の順番 流れを確認する1.複数のIEから 情報メニューを選択(画像をク…

動画で三流解説動画の簡単な説明はてなダイアリー 公開デザイン一覧 から サンプルを選択 して 取り込む操作動画。公開デザイン一覧 イラスト http://d.hatena.ne.jp/designset?category=illustration動画解説やテスト結果www.youtube.com 動画元: はてなダ…

動画で三流解説動画の簡単な説明ソースコードは http://d.hatena.ne.jp/ken3memo/20120328 を見てください(※合わせてアレンジして遊んでください。)Folderオブジェクトを受け取ったら、 受け取ったオブジェクトの名前 と フォルダー内のアイテム (ここではメ…

動画で三流解説動画の簡単な説明ソースコードは http://d.hatena.ne.jp/ken3memo/20120328 を見てください(※合わせてアレンジして遊んでください。)Outlookで作成したVBA マクロを Excelで動作させたいので、 移植してみます (※移植は大げさですね、移動・微…

予定では、↓と続く予定なんだけど・・1.IPAT ログインhttp://www.ipat.jra.go.jp/ に ログインする ログイン処理 ログイン処理 解説とソースコード ↑を見てください。 2.入金処理投票する前に 軍資金を入金しないといけないので、 入金処理 解説とソースコー…

2012年3月30日から、カラースターを削除すると再利用できなくなります - はてなスター日記 で告知されていた機能が 本日、無事に？ 実行されたみたいですね。 カラースターを削除すると再利用できなくなる変更を実施いたしました - はてなスター日記 カラー…

前回の http://d.hatena.ne.jp/ken3memo/20120328/1332887607 Outlookで受信フォルダーを下の階層まで調べるコード を Excelで動かしたくて、チャレンジしてみました。やりたいこと: Outlookで作成したVBA マクロを Excelで動作させたい 移植してみます (※移…