三流君 ken3のmemo置き場

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

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

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

VBA

XXXXXさんへ VBA IE操作 confirm() とalert() 両方を消したい

VBA

下記の質問をいただきました。 WEBページからのメッセージに困っていましたが objIE.navigate "JavaScript:function confirm() { return true; }" のおかげで次に進む事が出来ました。 本当にありがとうございます。ただ次の問題が新たに発生しました。 実行…

XXXXXさんへ Q: Yahoo競馬の着順情報を取りたい A: DIV Class=XXXX を.ClassNameで取り出す テスト

' objTABLE.rows(行).cells(列) Set objCELL = objTABLE.Rows(y).Cells(x) 'これがwebの列 で取り出したデータに対して、さらに、その中から、DIVタグを取り出して、名前を調べる'DIVタグを抜き classの名前を取得してみる Set objDIVs = objCELL.getElement…

XXXXXさんへ input type="image" のボタン操作 VBA IE操作で気になったこと

下記の質問をいただいたが、回答ができなかったお話。 csvをDownloadする画面に行くのですが、 そこのボタンがJavaScriptで動くように設定されているのですが、 動かすことができません。 下記がボタンのソースです。 input type="image" name="XXXXXX_Submi…

XXXXXさんへ AccessからExcel データ転記の開始位置について

VBA

下記の質問をいただく Accessからエクセルのテンプレートへ1シート10件ごとに出力させようとしています。 件数も毎回変わります。 件数が増えるごとにテンプレートシートをコピーして増やします。(依頼書1、依頼書2・・・)「シートへデータを転記( http:…

はてなの質問に答えてみた Excel VBA セル内を改行(VBLF)で区切られた文字列のフォントを行単位で変更するテスト

こりずに はてなの質問 q.hatena.ne.jp https://q.hatena.ne.jp/1576623097 にチャレンジしてみた↑質問が載ってます。 ※他の回答やコメント含めてみてください。いつものデバッグ風景・・・ミスしまくりで恥ずかしいけど・・・ www.youtube.com https://www.…

XXXXXさんへ ie.Document.getElementsByName の件 ソース一行から、イロイロと想像してみた

下記の一行コードの質問をいただく。 >三流君さん、お久しぶりです。 >もし解読出来たら教えて頂きたい構文があります。 >ie.Document.getElementsByName(' routeSettingList[' & n & '].trafficCd').item(0) >です。もし解読出来ましたら教えて下さい その…

XXXXXさんへ IE使用時にページ移動後のHTMLDocumentを再取得 について

下記の質問をいただく。 >IE使用時にページ移動後のHTMLDocumentを再取得したいのですができません。 >ご教授いただけないでしょうか?? >IE使用時にページ移動後のHTMLDocumentを再取得 ですが、 通常は、移動後もそのまま使えるので、 ※逆に、移動前のペー…

VBA IE操作 F8ステップ実行 デバッグ風景 アクティブに注意?「中断モードでは入力できません。」

デバッグの失敗動画ですが、何かの参考となれば幸いです。 VBA IE操作 F8ステップ実行 デバッグ風景 アクティブに注意?「中断モードでは入力できません。」【三流君】 - YouTube www.youtube.com私もよく使っているのが、 デバッグモードでコードを止めて、…

XXXXXさんへ VBA IE操作 手作業で見つかるオブジェクトが見つからないパターン

デバッグ時の手作業で見つかるオブジェクトが プログラムで走らせると(実行時)見つからないパターン>> objectそのものが取得できていないエラーとなりました。 >> また、ジャバスクリプトを直接動かすほうは、実行しても、「反応しない」という状況です。…

XXXXXさんへ VBA IE操作 帳票ボタンをクリックしたい件について 妄想回答案です

やりたいこと サイトの中の、ID付与されているボタン(具体的には、「帳票」を示す、“LinkButton4”)をクリックしたい、というものです。 2.取得したいID(”LinkButton4”)が記載されている(と思われる)箇所のHTML。 (「要素の検査」を使ったら、表示された…

XXXXXさんへ IE ダイアログボックス 処理について 2019-06-20返信

VBA

当店人気のIE操作質問がくるも・・・ >ダイアログボックスが2~3回開く業務系では上記の処理がsendkeysメソッドでしかできません。 >ご存じの通りsendkeysメソッドは不安定で度々エラーが発生し業務使用するのは厳しい状況です。 >何か良い方法はあります…

Outlook VBA 受信メールを .Move 移動先Folderオブジェクトで移動させる ループに注意

処理済みのメールを他のフォルダー ここでは、受信トレイの下の 名称"処理済み"に.Move 移動先Folderオブジェクト を使って移動させました。'処理が終わったメールを移動する ※6 ループの中で移動させる時は注意する mITEM.Move oFolder.Folders("処理済み")…

エクセルのマクロ記録で写真の挿入を記録して .Pictures.Insert を探ったお話

マクロ記録で写真の挿入を探ってみます。 1.記録してみよう 開発のタブから、マクロ記録で実際の操作を記録します。下記、実際の操作と簡単な解説です。 https://www.youtube.com/watch?v=wIu31e36Qew 2.コードを見てみよう 次に記録されたコードを確認しま…

Outlook VBA 添付ファイル写真の取り出し はてなの質問にチャレンジしてみた。テストしてみた

はてなの質問 q.hatena.ne.jp にチャレンジしてみた。テストしてみた >【指定フォルダ or 指定件名を含むメールの本文内の画像をエクセルに貼り付け】 >複数人からiPhoneのメールで送られてくる画像を >1クリックでエクセルにまとめて貼り付けしたいです …

XXXXXさんへ 形の違うweb上の表・テーブル から指定された 項目・列を取得したい

下記の質問をいただく VBA IEでHP等から表をエクセルに抜き出したい場合ですが 以前に競馬の表の取り込み例として'TABLEタグを抜き 複数のテーブルをセット Set objTABLEs = objIE.document.getElementsByTagName("TABLE") '↑で代入したオブジェクトからテーブル…

XXXXXさんへ ページが変わるたびにset mi=objie.documentとしなくてもよいのでしょうか?

IEのDocumnetについておしえてください。 以下のようなプログラムいおいて、①でmiに OBJIE.documnetをいれてますが、ページが変わって miをウオッチでみると変わったページのプロパティ要素が取得されてます。これは、ページが変わる(次のリンク先を読み込…

Excel VBA A列から .Charactersで Font 色や太字を判断してHTMLタグを作成する

前回、Excel A列から文字の色や太字を判断して、HTMLタグを追加する。 そんなVBAをライブで作成して、 マクロ記録で太字のFont.Boldを探せなかったり、 追加したタグがクロスしてしまうバグ・不具合を発見しました。いつものデバッグ風景です。ライブは怖い…

JRA単勝オッズ取得でIEを前面にして IEスクロール SendKeysとjavascript:scrollToを使ってみた

VBAから表示したIEの画面をスクロールさせてみました。 SendKeysとjavascript:scrollToを使ってみたhttps://www.youtube.com/watch?v=jHnqqQP3FC4&start=470 youtu.be ※前半は先週のテストなので、IEのスクロール処理は 7:55 ~ 動画を見てください。 https:…

XXXXXさんへ VBA IEで二つのページを表示 .Navigate2 メソッド &H800指定で新規タブ 隣のタブ

下記の質問をいただきました。 VBAでIEをヤフーとAmazonを同時に開く事は可能でしょうか。 また開くソースを教えて頂けますでしょうか。 お手数ですが、 宜しくお願い致します。 単純に二つの変数を使って起動したパターン と 隣のタブに表示するパターン 二…

バグ修正 .Document.body.innerTextから発走時刻とオッズの時刻をMidで抜き出す デバッグ Excel VBA JRAオッズ取り込み

昨日修正したJRA 単勝オッズ 取り込みサンプル下記 ken3memo.hatenablog.com ですが、発走時刻とオッズ時刻が正しくない と連絡を速攻でいただく。最後まで、確認をしていなくてスミマセン。すぐに修正をしてみます。 ※またまた、ライブネタにして、恥を重ね…

デバッグ JRA HP表示変更で単勝オッズの取り込みに失敗 F12で要素を確認して修正する

だいぶ前に試作した(試作したとか予防線を張りつつ、ぉぃぉぃ) 取り込みに失敗すると連絡をいただく 有料ソフトに組み込んだサブルーチンが動かなくて困っています。 12/5にJRAがHPの仕様を変更したためだと思うのですが、 単勝オッズ取り込みが出来なくなっ…

XXXXXさんへ Excel VBA セルに書き込み時にLISTBOXのChangeイベントが発生について

朝からデバッグ Excel リストボックスのイベントについて実験したみた。朝からデバッグ VBA Excel UserForm リストボックスのイベントについて実験する・・・三流プログラマー の 独り言 ライブ プログラミングほか テスト中 - YouTube www.youtube.com1.質…

XXXXXさんへ Excel VBA Asc関数 Chr関数 Offsetを使った泥縄デバッグ実演 仕様変更?追加依頼された時

Excel VBAでAsc関数 Chr関数 Offsetを使って 処理を変更してみました。前回作成のサンプル ken3memo.hatenablog.com に追加の要望がきました。追加の要望: 前回の質問時は満足していたのですが 本日色々と試してみると ランダム数値の区分がグループ分けした…

Excel VBA Worksheet_Changeイベント内でセルを変更すると再度Changeイベントが発生する

前回のサンプル完成した・・と思ってたら、質問者から不具合の連絡があった q.hatena.ne.jp コードを実行すると、 日付が記載されると2秒くらいフリーズしたりエクセルが点滅、読み込み直しをしているような何とも苦しそうな挙動をします。 ごめんなさい、私…

Excel VBA WorksheetのChangeイベントに処理を書いてみたテスト

q.hatena.ne.jp に回答してみた。シートのコード に、 Private Sub Worksheet_Change(ByVal Target As Range) If Target.Count = 1 And Target.Row < 100 Then Cells(Target.Row, "E") = Now End If End Sub を書くと、WorksheetのChangeのイベントで、 タイ…

XXXXXさんへ VBA Outlook グラフ送信について

http://www.ken3.org/vba/backno/vba183.html の VBA Outlook リッチテキスト形式のメール で グラフを送る ですが、 昔作成したサンプルなので、 Office2010からメニューがリボンになったので、 貼り付けが動かないみたいです。下記のサイトで指摘されてた…

XXXXXさんへ Access VBA MAIL アドレス帳から選択・送信操作について

>Outlookでファイルを添付する件で送信先を固定せずにアドレス帳から任意に選択することは可能でしょうか?アドレス関係は軽く追加とかしか、やったことはないのですが、VBA Outlook アドレス帳 連絡先選択 で検索すると、 https://qiita.com/Q11Q/items/c5a…

XXXXXさんへ IE操作 SELECTタグで動的に変化するページの操作について

vbaでWEBの、select操作を行いたいのですが、valueを設定するも、うまく動作しません。下記、①のselectで馬連を選択しても、②方式選択が更新されません For Each obj In ie.document.getElementsByTagName("select") If obj.Name = "betType" Then obj.Value…

XXXXXXさんへ JRA サイトから レース結果を取り込む

私のサンプルを改造した視聴者様から下記の質問をいただいたので、 チャレンジしてみたいと思います。土曜日のレース中にテストチャレンジ 下記のグダグダ修正を笑ってくださいね。 JRA サイトから レース結果をExcelに取り込む・・・三流プログラマー の 独…

XXXXXXさんへ Outlook送信アカウントの切り替え .SendUsingAccount についてハマったテスト結果

Outlook VBA 送信アカウントの切り替え .SendUsingAccount = Session.Accounts("アカウント名")でハマってる・・下記の質問をいただいたので、試してます。 VBAでOutlookのメールを立ち上げることに成功しました。 差出人をデフォルトではなく、 別のアカウ…

Ken3 ホームページ 目次

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

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



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