三流君 ken3のmemo置き場

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

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

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

VBA の検索結果:

XXXXXXさんへ Excel VBA コードを VBSで動作させる時にエラーが発生する件

Excel VBA を VBS に変換する作業中に 「オブジェクトでサポートされていないプロパティまたはメソッドです」 エラーが発生しました。 と 質問をいただきました。ここから下質問文※一部カット VBAで無事複数メール送信の構文が出来ました。 そして、一番の難題であるVBSへの変換ですが、 まず私はVBAのマクロをこう作りました。 Enum 列 宛先 = 1 氏名 成績 件名 添付ファイル1 添付ファイル2 添付ファイル3 End Enum Sub メール作成() Dim…

XXXXXXさんへ Outlook 予定表 分類を探る olApptItem.Categories

…com/ja-jp/vba/outlook-vba/articles/appointmentitem-categories-property-outlook 'Display the Show Categories dialog box olApptItem.ShowCategoriesDialog MsgBox olApptItem.Categories を入れて、テストしてみます。いつもの右往左往した酔っ払いテスト動画 【Outlook VBA】予定表 Appointme…

XXXXXXさんへ Outlook サンプルの件 と 他のQAサイトで質問について

> 内容は下記となっております。 > https://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q11192362626 detail.chiebukuro.yahoo.co.jp > > > 先に三流君様に許可をいただいてから、やるべきところを、恥ずかしながら回答者様にご指摘いただくまで、コードのライセンスという概念が無く、質問を行わせていただいておりました。 誠に申し訳ございません。 > >つきましては、現状URLの…

(未解決あとで検索する) XXXXXさんへ IE操作(JRA-IPAT) selectタグが動作しない件について

…ラリの中での話で、 VBA側とは違いそうですし、、、私も、無知で、ヒントすらだせなくてスミマセン。excel vba angularjs で検索すると https://teratail.com/questions/69838 など、見つかります。 ※質問文の一部に私のURLが含まれていて、少しビックリしたけど。アドバイスすら出せなくてすみません。 最近、SELECTタグで選択できない・・ と同じような質問を少しいただくので、 もしかしたら、同じようにangularjsを使用し…

XXXXXさんへ IE操作「Webページからのメッセージ」(Javascriptのalert)を消す方法

…tube.com 【VBA IE操作】Javascriptのalert「Webページからのメッセージ」を消すテスト【三流君】 - YouTube1.テスト環境、再現環境を作る 表示が 「Web ページからのメッセージ」 なので、 テストページでJavascript alertメッセージを使用している http://www.ken3.org/vba/test153.html を使ってみる。 'テスト、IE SELECTタグ 選択後、Javascriptのalertメッセが表示さ…

小話 無くて七癖 コードレビューしてますか?

きっかけは、久しぶりに人力検索はてな q.hatena.ne.jpで回答した後に、 自分の書いたコードを読み返してみて笑ってしまったので。 ※他の回答者のコードに刺激を受けたので、 コードレビューについて少々老害おっさんが小話を行ってみました。ライブ配信のテストを兼ねて小話をしてみました。 【プログラマー小話】無くて七癖 コードレビュー ほか ライブ解説テスト - YouTube www.youtube.com1.範囲チェックで定数<変数And変数<定数に疑問?2.Yes/N…

XXXXXさんへ グラフの単独要素をイベントで取得してみては? WithEvents As Chart

…はないでしょうか? VBA グラフ イベントで検索すると、 いろいろなページがヒットします、 そのなかから、下記の二つを参考にしてみました。埋め込みグラフでイベントを使用する https://msdn.microsoft.com/ja-jp/library/office/ff194070.aspx と Chartでイベント処理を行う-指定位置のグラフ要素を取得するには (Excel 97/2000) http://www.moug.net/tech/exvba/0020010…

XXXXXさんへ JRAオッズ取得 Excel2016でテストしたブックを保存しました

…Excelへ取り込むVBA - YouTube www.youtube.com要望には、すべてこたえられないと思いますが、 気長に、温かい目でお待ちを・・・ではまたぁ。下記の質問をいただく 単勝オッズの取得20170820.xlsmを回答して実行しましたが、動きません。 MENUシートのB2に入れた、「2回新潟9日 リンクが見つかりませんでした」 のMSGBOXが出てオッズを取得できません。こちらの環境はExecl 2013です。もう一つのサンプルで、「三流君VBAでIEのリ…

Excel UserForm Mode モードレスとIEを前面 おまけの WithEvents IE

…ストしていました。【VBA IE操作】IEの切り替え 前面にもってくるには?SetForegroundWindow【三流君】 - YouTube www.youtube.comせっかく、選んで、グローバル変数IEに保存しているのだから、 自然な流れで、前面にくるといいなぁ・・・VBA API 前面 で 検索 すると、下記のサイトなどが見つかります。https://www.moug.net/tech/acvba/0020028.html 指定したウィンドウをフォアグラウンドウィ…

Excel Formから起動済みのIEを選択 テーブルを取得するテスト

…が来ました。 > 【VBA IE操作】テーブル単体を取り出す にて勉強中の老人です。 > 上記サンプルはURLを記述して表示して >WEBページにテーブルの内容を取得しておりますが、 >当方も目的はページを次から次に切り替えて >その都度にテーブルの内容をEXCLEに蓄積したいと思っ > てます。(手動で開いたページのテーブル等) と、 既存IEを手動で操作して、データを抜く、 そんな質問が来ました。前回、既存IEの取得まで行ったので、 今回は、 テストでテーブルを探し、 選…

Excel Formから起動済みのIEを選択 Bodyの値を取得するテスト

…が来ました。 > 【VBA IE操作】テーブル単体を取り出す にて勉強中の老人です。 > 上記サンプルはURLを記述して表示して >WEBページにテーブルの内容を取得しておりますが、 >当方も目的はページを次から次に切り替えて >その都度にテーブルの内容をEXCLEに蓄積したいと思っ > てます。(手動で開いたページのテーブル等) と、 既存IEを手動で操作して、データを抜く、 そんな質問が来たので、 初めの一歩として、今回は、テストで起動済みのIEを探し、 グローバル変数に…

テスト JRA単勝オッズをレース別に複数蓄積する

…ス別に複数蓄積する VBA IE操作 Ken3 ライブ プログラミング テスト中 - YouTube www.youtube.comポイントは、 単勝順のオッズを一時的に Sheets("作業用") に書き込む次に、 1.初回は、馬番 馬の名前を書き込む 2.二回目以降は、時刻とオッズを書き込む 上記をポイントに処理を行ってみたいと思います。初回のチェックは、 一枠一番の馬名が変化したかを単純にチェックしました。 あとは、単純にデータを作業用シートからレース1R..12Rにコ…

クリップボード から テキスト取得して選択セルに追記してみた

…をもらってしまった。VBA クリップボードで検索する とイロイロなページがヒットします。 ExcelのVBAで、クリップボードのデータ形式を確認する。〜パソコンの小技・備忘録 Office TANAKA - Excel VBA Tips[クリップボードを操作する(1)] クリップボードとデータのやりとりをする:Excel VBA|即効テクニック|Excel VBAを学ぶならmoug上記を参考にして、参照設定で 「Microsoft Forms 2.0 Object Libra…

JRA オッズの発表時間を取得します 蛇足で.getElementsByClassNameのテスト

… 最終オッズの判断 VBA IE操作 Ken3 ライブ プログラミング テスト中 - YouTube www.youtube.com次は、 最終オッズ や 99:99(XX時XX分) などの、 オッズの集計時間を取得してみたいと思います。1.現物の確認 レースが終了していると、 <td class="cTtl headerOdds"> 2017年7月30日(日)&nbsp;2回新潟2日&nbsp;&nbsp;<span class="headerOdds2">最終オッズ(馬番…

JRA 単勝オッズ取得 いただいた要望 開催日とレースの指定にチャレンジ

…催地とレースを指定 VBA IE操作 Ken3 ライブ プログラミング テスト中 - YouTube www.youtube.comもらった要望 ア.一つだけご教示お願いしたいことがあります。 '開催日を探す Dim strJYOBOX(10) As String Dim j As Integer '開催日のリンクをあさる j = 0 For i = 0 To objIE.Document.Links.Length - 1 '右端の"日"を条件に判断する If Right(o…

JRA オッズ取得 Click処理を共通化後 単勝オッズ人気順にチャレンジ

…しくお願いします。【VBA IE操作】JRA オッズ取得 Click処理を共通化後 単勝オッズ人気順にチャレンジ - YouTube www.youtube.com1.ドキュメントのリンク オブジェクトを押す処理を共通化.Document.Links(i) のリンクを探して押す処理を外側に出してみます。 ※サブルーチン化してみますパターン的には、 表示中のIE と 条件を渡し クリックさせる2.共通化のサブ関数ができたので、 これを使い、 人気順の単勝オッズ取得を作成してみる…

JRA 単勝オッズ取得 コードまとめ と Sleep DoEventsの違いをテスト

…Eventsの違い VBA IE操作 Ken3 ライブ プログラミング テスト中 です・・・ - YouTube www.youtube.com1.共通のコードをまとめましょう 泥縄式でコードをコピペ、 テスト 実行 修正 再テスト・・・を繰り返していると、 コードが長くなるし、 メンテもしにくいので、 共通のコードはまとめましょう。2.ページの表示待ちをまとめる リンクなどをクリックした後 必ず ページの表示を待っています、 ここを まず まとめてみます。 まとめ方は Ca…

JRA HP から 単勝オッズの取り込み 開催場所でループ

…催場所のループ処理 VBA IE操作 Ken3 ライブ プログラミング テスト中 です・・・ - YouTube1.開催日を取り出す 開催日を取り出します ※日曜日は前日の土曜日があるので、 単純にはいかないけど、今回はすべて取り込む2.開催日のループを作成 12Rまで取得終了したら、 次の開催地のオッズへ移動 1Rから取得を 開催日がなくなるまで行う onclick="return doAction('/JRADB/accessO.html','pw15oli00/6D')…

IE操作 Web上の表 取り込み rowspan の対応を少し考えてみた

…取り込み バグ修正 VBA IE操作 JRA Ken3 ライブ プログラミング テスト中 です・・・ - YouTube www.youtube.com簡単な解説 と コード単勝取り込みテスト現在単勝の表を下記のコードで取り込むと、 'Webの表をシートへ転記(代入する) For y = 0 To objTABLE.Rows.Length - 1 '行のループ For x = 0 To objTABLE.Rows(y).Cells.Length - 1 '列数分ループ ' o…

ライブ配信でIE操作の参照設定など JRAオッズ取得できなかったけど・・

…設定とデバッグ風景 VBA IE操作 JRA Ken3 ライブ プログラミング ・・・ - YouTube www.youtube.com ↑が配信したYouTubeライブのアーカイブです。動画で作成した、途中まで作成したテスト用のソース Sub ie_test() 'IEの表示をテストする。 'IEの起動 Dim objIE As InternetExplorer '変数を定義します。 Set objIE = CreateObject("InternetExplorer.A…

XXXXXさんへ outlook 予定表 日本語のプロパティ・メソッドページの紹介ありがとう

…るのかなあ ぉぃぉぃ 実力者が気持ちよく 活躍できる QAサイトがあるといいのかな?なんてね。 ※おっと、人力検索があるじゃないか・・・VBA Outlook 予定表 日本語のページ https://msdn.microsoft.com/ja-jp/library/office/ff869026.aspx も 参考にしてみてください。XXXXXさんへ 今度は直接 ブログにコメントに書いてくれればいいのになんて。 ※書き込み ありがとうございます。助かります。勉強になりました。

XXXXXさんへ .Sensitivity = olPrivate VBA Outlook 予定表 非公開設定について

…おります。 マクロ(VBA)で追加する予定を、非公開設定にしたいのです。 2週間あちこちwebを検索しましたが、 どのプロパティ(?)に何をセットすればいいのか、 まだわかりません。ご教示願えませんでしょうか。 以上、よろしくお願い致します。 こんにちは。 .Sensitivity = olPrivate 'olPrivate=2 非公開 プライベート で目的の処理になるとよいのですが。 Dim aITEM As Outlook.AppointmentItem '予定、アポ …

Amazon プライムデー で Fire HD8とFire TVを購入してしまった。。。

ホームページが一時つながりにくくなるほどの人気の Amazon プライムデー で Fire HD8 と Fire TV を購入してしまった。。。折り返しのメールを見ると、 注文日: 2017/07/10 Fire HD 8 タブレット (Newモデル) 16GB、ブラック ¥ 11,980 Fire TV Stick (New モデル) ¥ 4,980 商品の小計: ¥ 16,960 配送料・手数料: ¥ 0 割引: -¥ 8,000 注文合計: ¥ 8,960 一瞬、えっ、…

XXXXXさんへ もしかして、OPTIONタグに.FireEvent ("OnChange")は無いのかも?

…xt 単純に 三流君VBA:IE操作 .parentElement で親のタグを参照? http://www.ken3.org/vba/backno/vba180.html で動作するかわかりませんが、 For Each Obj In ObjIE.Document.getElementsByTagName("OPTION") If Obj.Value = "Black Gunmetal" Then Obj.Selected = True Obj.parentElement.F…

XXXXXさんへ 未解決 あとで調べる ◆質問「VBAのIE操作でリスト選択時にFireEventが効かない」

…みる・・・ ◆質問「VBAのIE操作でリスト選択時にFireEventが効かない」〇VBAコーディングFor Each Obj In ObjIE.Document.getElementsByTagName("OPTION") If Obj.Value = "Black Gunmetal" Then Obj.Selected = True Obj.FireEvent ("OnChange") Exit For End If Next 上記質問に対して、の 回答がイベントが発生し…

未解決 あとで調べる XXXXXさんへ VBA OUTLOOKの予定表の本文(Body)の一部を太字にしたい

…べる >EXCELのVBAで生成したOUTLOOKの予定表の本文(Body)の一部を太字にしたいです。 ひと目、HTMLメール リッチテキストメールと勘違いしてしまったが、 予定表なんですよね。。。 ^^^^^^^※メールなら、HTML形式やリッチテキスト形式のサンプルが少しは見つかりますが、少し、予定表やoutlook vba 文字色を探ってみましたが、 よいページをgoole検索などで見つけることができませんでした。AppointmentItem.RTFBody プロパテ…

XXXXXさんへ IE操作 msgBox を 入れて、デバッグする 三流な方法?

…バッグ動画です。 【VBA IE操作】デバッグでMsgBox を 入れて、デバッグする 三流な方法? 【三流君】 - YouTube www.youtube.com下記のような質問をいただきました。 >http://inquiry.daihatsu.co.jp/gradeweb/default.aspx >ダイハツのグレード検索で、 >最初の同意するのボタンを押した後の >テキストへ2か所Tableタグで取得できたのですが、 >マクロで再起動させるとタグが見つからずエラーがし…

XXXXXさんへ VBA IE操作 1ページに複数のテーブルがある場合

…さいね。ぉぃぉぃ。#VBA #IE操作 #TABLE #デバッグ風景 #getElementsByTagName #Lengthテストで使用したソースファイルhttp://ie.vba-ken3.jp/test/20161101j1j2.html ↑テストの表 ここから 下記のコードでデータを抜く・・・ Option Explicit Sub le_test20161206_複数テーブルを取得() 'IE起動 Dim objIE As Object 'IEオブジェクト参照用 …

Acronis True Image WD Edition を使いHDDのクローンを作成

作業内容:ノートパソコンのHDDを換装 交換してみました。ノートPC 内蔵された300GのHDDを、 新規に購入したウェスタンデジタルの1TのHDDに換装 交換したかったので、 今回は、WDで無料使用可能なツールを使用して作業を行ってみます。 ※本当は、SSDに換装したかったけど、 HDD300→SSD240とサイズダウンするので(じゃ480買えよ...) 無難に容量アップでHDD 1テラにしました。 簡単にOS全体を移行したかったので、 HDDのクローンを作成する方法で作業…

YouTube アナリティクス リアルタイム 分析でニヤニヤ?したいなぁ

…動画で システム系 VBAの小話 https://www.youtube.com/watch?v=0i7mehG4A-s上記二本をアップしたので、アクセス数を確認してみます。クリエイターツールから、 アナリティクス リアルタイム を選択して、確認と意外と簡単に確認できます。 実際の操作確認動画: 【YouTube】アナリティクスで分析 リアルタイムを使ってみた 【三流君】 - YouTube www.youtube.com過去2日間 48時間 を 1時間単位の棒グラフ と 過…

Ken3 ホームページ 目次

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

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



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