三流君 ken3のmemo置き場

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

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

VBA の検索結果:

人力検索から浮気して隣のQAサイトに初投稿してみた VBA IE フレームのページ

VBA IE フレームページ 系の質問が隣のQAサイト teratail.com にあったので、 浮気して隣のQAサイトに初投稿してみた ぉぃぉぃteratail.com↑に回答を初投稿、下記、回答 もしかして、フレームが三分割されていませんか? html フレーム 三分割 で検索すると https://www.tagindex.com/html_tag/frame/frame_examples.html などがみつかり、ソースの例が出ているのですが <frameset ro…

人力検索の回答下書き ExcelのA列をPowerPointのスライド 1ページ単位で作成する

…コードをExcel VBAの標準モジュールに貼り付けて、実行してみてください Option Explicit 'A列(A1から)にセットされたデータを使用して、 '1行1スライドのタイトルにして、 'PowerPointのスライドを作成する Sub スライド作成test() Dim oApp As Object 'PowerPoint の 起動、インターフェース用のオブジェクトを作る Set oApp = CreateObject("PowerPoint.Applicatio…

XXXXXさんへ IE操作 このサイトは安全ではありません とエラーメッセージが表示される

…、win10 IE vba このサイトは安全ではありませんをキーワードに検索しただけですが、google:win10 IE vba このサイトは安全ではありません で検索するとhttps://www.manageengine.jp/support/kb/OpManager/?p=9959 ↑VBAじゃないのですが、 あまり、いじりたくないけど 信頼済みサイトに追加 してみるとか? ※でも変に設定をいじると ソーンの移動で qiita.com https://qiita.com…

Access クエリーに演算フィールド 式を作り 条件として利用する 文字数15以下を抽出する

…be.com計算式と言っても、難しく考えないで、 VBAの標準関数を好きに使うことができますフィールドができたので、 あとは条件に<15などを設定しますポイント 1.フィールドの値をVBAの関数に渡す 2.必要ならフィールド名を付ける(式1:を直す) 3.抽出条件を入れる 4.表示する、しないを選択。※検索条件だけで表示が必要ない時などなんか、質問の意味を間違えたような気もしつつ、回答してみます。 ※質問の意味を勘違いしていたらスミマセン。クエリー作成の参考となれば幸いです。

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

…となれば幸いです。 VBA IE操作 F8ステップ実行 デバッグ風景 アクティブに注意?「中断モードでは入力できません。」【三流君】 - YouTube www.youtube.com私もよく使っているのが、 デバッグモードでコードを止めて、 F8でステップ実行して動作を確認してみては? と言ってますが、 下記のような質問が来たので、チャレンジして恥の上塗りしてみます。 こんにちは。 >コピーしたデータを自ブックのシートに貼り付けさせようとすると、 >ステップイン動作時に「中…

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

…bin/group/vba_ie_frame.asp イ.これも無いだろうけど、広告処理などで見かける IFRAME …… インラインフレームを作る http://www.htmq.com/html/iframe.shtml で、作られた入力エリアで直接見れないobjectそのものが取得できていない ので、そもそもまだ無理なので、次の段階ですが、 フォーカスが当たっていないと、動かないJavascriptだったら '表示位置を調整する objIE.Document.getEl…

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

やりたいこと サイトの中の、ID付与されているボタン(具体的には、「帳票」を示す、“LinkButton4”)をクリックしたい、というものです。 2.取得したいID(”LinkButton4”)が記載されている(と思われる)箇所のHTML。 (「要素の検査」を使ったら、表示された行です)、 <dl> <!-- Report --> <dt><img id="LinkButton4" src="../Images/ico_report.png"onclick="javascri…

自動巡回テスト用なら i3やi5の古い 中古ノートパソコン や 中古訳ありPC を検討?

VBA IE操作のテスト用PCとして、楽天スーパーセール中の安い中古PCを検討中 ※ぉぃぉぃ 検討中と書きつつの アフィリエイト リンクかよ中古ノートパソコンをキーワードに探すと、 リースアップされた?i3やi5の古い 中古ノートパソコン や 中古わけありPCが見つかります。テスト用だしセレロンでもいいんですが、 セール中なので少し欲がでて、i3やi5 安いのは第二世代が多いかなを探してみた中古ノートパソコン https://item.rakuten.co.jp/oa-pla…

XXXXXさんへ InStr関数などで文字があるか?チェックして、あったらE列にセットするとか?

質問お願いします VBA IE にてテーブル取得するのに 上記例ですが 『お菓子』が含まれているせるがそれぞれA~C列に10行目まであります A列の1行目からC列10行目まで 順番にさぐり 『お菓子』が含まれていれば セルの内容をそのままE列にコピーする ようにしたいです ご教示どうぞよろしくお願いいたします HP上のテーブル ナンバー__1__________2_________3 1_______お菓子です__山田さん___食べた 2_______須崎さん____お菓子…

name=tbs value=qdr:d3 m3 で更新 三日以内 三ヶ月以内など期間を指定 はてなブログ 本文にgoogle検索窓を設置してみる テスト004

…わせてテストしてみたVBA Outlook の話題 知恵袋・三か月以内 Windows Update をマイクロソフトで三日以内 など、テストしてみる 探す言葉: を←好きな検索文字を入れてからボタンを押す 検索結果の表示件数:5件10件25件50件 XXXX以内指定: 指定なし(全て)3時間3日3週間3ヶ月3年 サイト指定:人気QAサイト や 一次情報MS本家を指定する QA 人の多いYahoo知恵袋 chiebukuro.yahoo.co.jp QA おしえてgoo! o…

name=sitesearch で検索場所ドメインを指定 はてなブログ 本文にgoogle検索窓を設置してみる テスト003

…55 value="VBA Outlook"> を<input type=submit name=btnG value="Google 検索">←好きな検索文字を入れてからボタンを押す 検索結果の表示件数:<input type=radio name=num value="5">5件<input type=radio name=num value="10">10件<input type=radio name=num value="25" checked >25件<input …

name=num Valueで検索結果の表示件数を指定 はてなブログ 本文にgoogle検索窓を設置してみる テスト002

…55 value="VBA Outlook"> を<input type=submit name=btnG value="Google 検索">←好きな検索文字を入れてからボタンを押す <input type=hidden name=num value="20"> </form> <!-- SiteSearch Google --> 2.ラジオボタンで選択させる あまりやらないかもしれませんが、ラジオボタンで選択させてみます。 探す言葉: を←好きな検索文字を入れてからボタン…

name=qで検索文字 はてなブログ 本文にgoogle検索窓を設置してみる テスト001

…入れることができますVBA Outlookを初期値で入れてみます 探す言葉: を←好きな検索文字を入れてからボタンを押す <!-- SiteSearch Google --> <form method=get action="https://www.google.co.jp/search" target="_blank"> <a href="https://www.google.co.jp/"><img src="https://www.google.com/logos/Lo…

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

VBA

…消化できなくて、、、VBA ダイアログを条件に検索してみると 探す言葉: を 検索場所から:人気QAサイト や 一次情報MS本家を指定する QA 人の多いYahoo知恵袋 chiebukuro.yahoo.co.jp QA おしえてgoo! oshiete.goo.ne.jp 回答率90%以上 teratail.com Qiita 知識を記録・共有 qiita.com 私も利用中 最近過疎ってる失礼 人力検索 q.hatena.ne.jp 一次情報MSDNなどのmicroso…

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

…イルを固定の D:\VBA\ に書き出すテスト '新規起動したExcelブック・シートに書き込むテスト '2019-06-06 .Move でメールを移動させるが不具合作成をテスト Sub outlook_test20190606_001() 'Excel 起動処理 Dim objEXCEL As Excel.Application 'アプリケーションを入れる箱 Set objEXCEL = CreateObject("Excel.Application") 'エクセルのアプ…

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

…nsert("D:\VBA\IMG_0107.JPG").Select Range("A5").Select End Sub 写真の追加は、 .Pictures.Insert("ファイル名") 無事に調べることができました。3.コードを変えてテストしてみよう 確認ついでに、変更できそうな部分を変えてテストしてみます ここでは、ファイル名を変えてみました。4.記録された、プロパティやメソッドをググってみよう googleで、記録されたプロパティやメソッドを検索すると、 先人が書…

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

…す Outlook VBA で メールに添付された写真をExcelに貼る処理のイメージがあっているか、わからないが、 下記の用に作成してみましたhttps://www.youtube.com/watch?v=SF9w8ILrO1Q ← テスト動画です、参考になれば。 'Outlook で メールに添付された写真をExcelに貼る 'サブフォルダ ここでは 写真テスト 固定です の 受信メール読み込むサンプル '件名と添付ファイル名(複数)を取り出す(表示する) '添付ファイル…

XXXXXさんへ お坊ちゃんプログラムで申し訳ない IE操作 JRAオッズ取り込みが動作しない件

…ackno/guchi084.html上記は置いといて、9~12Rの生データ 他の方からの要望も多い、自動時間取得と組み合わせがよさそうなので、 何かの機会にとは思いますが、お約束はできない状態です。最新版は http://ie.vba-ken3.jp/test/20181209.zip ↑ですが、こいつが動かない感じですよね?他の掲示板やサイトなどで解決策や良いサンプルが見つかるといいのですが。動作不良の対応策もない返信メッセージですがご勘弁を。 三流プログラマー Ken3

XXXXXさんへ VBA IE操作 リモート サーバーがないか、使用できる状態ではありません について

>実行時エラー '462': >リモート サーバーがないか、使用できる状態ではありません。 > とでます。 >デバッグでは、 > objIE.Navigate strURL >ここでとまります。 >何か特別な参照設定がひつようなのでしょうか? >リモート サーバーがないか、使用できる状態ではありません連続実行をしていると、 ( Create と .Quit などを繰り返していると) たまに発生したりしますが、Googleでエラーメッセージをそのまま検索すると、https://…

XXXXXさんへ IE操作 シートの値でURLを作り処理を行う

質問をいただきました、最近、返信遅くてスミマセン。 Dim objIE As Object 'IEオブジェクト参照用 Set objIE = CreateObject("InternetExplorer.application") 'IEのオブジェクトを作る objIE.Visible = True '見えるようにする(お約束) '.Navigate で 指定した文字列のURLを開く objIE.Navigate "https://www.boatrace.jp/owpc/p…

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

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

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

…を追加する。 そんなVBAをライブで作成して、 マクロ記録で太字のFont.Boldを探せなかったり、 追加したタグがクロスしてしまうバグ・不具合を発見しました。いつものデバッグ風景です。ライブは怖いので録画で ぉぃぉぃ。 https://www.youtube.com/watch?v=V7ZTH8ymryU www.youtube.com ※録画なのに↑失敗してます・・・だめだこりゃ・・・1.太字の判断 太字・強調表示の判断は Font.Bold = True/False …

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://www.youtube.com/watch?v=jHnqqQP3FC4&start=4701.先週の修正結果の確認 先週修正…

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

…をいただきました。 VBAでIEをヤフーとAmazonを同時に開く事は可能でしょうか。 また開くソースを教えて頂けますでしょうか。 お手数ですが、 宜しくお願い致します。 単純に二つの変数を使って起動したパターン と 隣のタブに表示するパターン 二つを作成してみました。www.youtube.com 【VBA IE操作】.Navigate2 メソッド &H800指定で新規タブ 隣のタブ表示のテスト【三流君】 - YouTube Option Explicit '変数を二つ使っ…

実験 テキストのHTMLソース TABLEテキストをコピペ Excelへ貼り付けてみた

…Excel2016 VBA IE表の取り込み - YouTube の終わりに、 チャットのコメントで テーブルのOuterhtmを貼り付けたほうが簡単だよ と アドバイスをいただいたことです。58:27 ​テーブルのOuterhtmをクリップボードに取り込んで PasteSpecial Format:="テキスト", NoHTMLFormatting:=True で貼り付けたら楽なんじゃ?アドバイスをいただけるって、ありがたいですね。以上、私だけかもしれないけど、びっくりして…

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

…イブ デバッグ動画 VBA IE操作 バグ修正 発送時刻とオッズの時刻が変 JRA単勝オッズの取り込み デバッグ ・・・ ライブ プログラミングほか テスト - YouTube www.youtube.com1.バグ・不具合の再現 発走時刻とオッズの時刻が変2.原因の特定 処置・対策HPの表示内容が変更になったので、 発走時刻のセット、取得方法を変更しました。.Document.body.innerText から、 文字を探して、Midで抜き出しただけです。 Public F…

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

…Excel2016 VBA IE表の取り込み - YouTube www.youtube.com一つでもデバッグ時の参考となれば幸いです。修正したExcel2016のブックを http://ie.vba-ken3.jp/test/20181209.zip ↑からダウンロードして遊んでみてください。 Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) 'IEオブジェクトを受け取り、表示を待つ Sub I…

にしむくさむらい 月末最終日 日付の判断 西向く侍(士)って何?知ってた?

…から-1(前日)が2018年12月の末また、意味不明なこと書いたけど、 4.1 復習 Excelで日付-1をテストしてみよう 4.1.1 2018/1/1 ~ 2018/12/1 をオートフィルで入力してみて 4.1.2 =来月の日付-1 の計算式を入れてみて 4.1.3 表示形式の練習、表示形式をddにしてみて考えながら解説予定を書いていたら、長くなったので、 VBAの日付関数はまた今度ぉぃぉぃ ※今度時間がある時に飲みに行きましょう・・・と同じで、いつになるやら ぉぃぉぃ

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

…た。朝からデバッグ VBA Excel UserForm リストボックスのイベントについて実験する・・・三流プログラマー の 独り言 ライブ プログラミングほか テスト中 - YouTube www.youtube.com1.質問の理解 ユーザフォーム(テキストBOX)からセルに書き込みを行う際、listboxのChangeイベントが発 生しうまく値を書き換えることができません。(値の変更をフォームより行いたいのですが、セルに書き込み時 にLISTBOXのChangeイベント…

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

Excel VBAでAsc関数 Chr関数 Offsetを使って 処理を変更してみました。前回作成のサンプル ken3memo.hatenablog.com に追加の要望がきました。追加の要望: 前回の質問時は満足していたのですが 本日色々と試してみると ランダム数値の区分がグループ分けした後 確認できればと思ってしまいました 後出しですみませんが、 引き続きご教示よろしくお願いします 【問題】 班 人数 A 20 B 15 C 8 D 90 E 16 【答え】 班 人数 1…

Ken3 ホームページ 目次

分類:HPを大きく分けると4つの柱(分類)です。
・[Excel/Access VBA]の解説
・[ASP(Active Server Pages)]の解説。
・[元コンビニ店長時代の話]が弟に巻き込まれ、失敗した脱サラ、畑違い?の仕事で失敗。
・[プログラマーの愚痴]では、あまり見せたくない三流プログラマーの内面かな。
三流君を踏み台にする
主に上記4つの分類でHP作成やメルマガの発行を行ってます。
※更新頻度が落ちていて情報の鮮度が悪いです。



Googleを使用して検索する

読者の声:三流君の説明・解説じゃ よくわからなかったから、Googleを使って、自分で検索します。
三流君:残念です。あっ、下記にGoogleの検索窓を設置しました。
いろいろ指定して試してみてください。

Google
探す言葉:気になる単語や,オブジェクト(Document),プロパティ(.Busy)やメソッド(.Navigate)などを入れて検索してみてください。


言語を指定:見つからない時は指定無しで探す

サイト指定:人気QAサイト や 一次情報MS本家を指定する
一次情報・二次情報まとめから探る
QAサイトの質問から探る
検索実行: ←オプション確認後に検索ボタンを押してください

期間指定:情報の鮮度も大切?
検索実行: ←オプション確認後に検索ボタンを押してください


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