三流君 ken3のmemo置き場

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

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

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

VBA の検索結果:

Word VBA ルビの情報を ActiveDocument.Fields(n).Code から探ってみた #Word #VBA #デバッグ

…といて、 Word VBA の ルビ処理について 遊んでみました(遊ばれてます)いつもの あのあの そのその 酔っ払い解説動画・・・ https://www.youtube.com/watch?v=QcljoRs1Rsc ↑※良くイライラすると上級者に言われます・・・・00:00 バグ・不具合内容の説明 02:04 ActiveDocument.Fields(n).Code で ルビの情報が取れます 03:40 ActiveDocument.Fields(n).Select …

VBA Excelで指定した文字をWord文章中から探す 段落オブジェクト Paragraph を使用 Range.Informationで位置を取得 #VBA #Word #デバッグ #Excel

… Sub なかなか、VBA Word の操作ってオブジェクトの操作が大変そうです。 泥縄式で書いているので、もっとスマートなコードがあるなぁ・・・と思いつつ、失礼しますいつもの酔っ払い動画、、、 youtu.be https://youtu.be/dSlL0aNsI28 ↑実行結果の動画と簡単な解説です、気になった人は、YouTube動画を確認してみてください 00:00 作りたい内容 詳細を説明 実行結果 03:50 1.wdApp.ActiveDocument.Parag…

Youtube コメント欄で半角 < > が使えるようになった?でも動画の概要・説明欄では まだ無理だった

…やったぁ、と、喜んだのもつかの間、 動画の概要欄・説明欄にソースコードを貼ってみると、エラーで弾かれた。 ↑ > が やはり、ダメみたいですね。まぁ、コメント欄にVBAなどのコードが貼れそうなので、 今後の動画でコードをコメント欄に貼って、やり取りしてみようかなぁ。以上、独り言の実験結果でした。下記、コメント欄で実験してみました。 https://www.youtube.com/watch?v=JoidvQb2BIE&lc=UgyoviEWfqnTIgr0weR4AaABAg

XXXXXさんへ IEサポート終了後の VBA WEBからのデータ取得について キーワード Selenium で検索すると流行の方法がわかるかなぁ

>ExcelVBAでデータを集め、競輪予想を作っています。 ・ ・ ・ >さて最近、IEのサポート終了が告知されていますが >WEBからのデータ取得はどのような対処がベターなのでしょうか?ご意見をお聞かせください。ベター、ベスト、イロイロな考え方がありますが、 キーワード Selenium で検索すると流行の方法がわかるかなぁgoogle:Selenium VBA https://www.google.com/search?q=Selenium+VBA ↑で検索したりブラウザ…

XXXXXさんへ Excel VBA 1行単位 A列からE列 5つのデータをPowerPointの1スライド 縦に5個並べたテキストボックスにセットする

VBA

… >パワーポイントのVBAを検索していたらこちらに辿り着きました。 >A列~E列までのデータを1枚のスライドの5か所のテキストボックスに流し込むにはどうしたら >いいでしょうか? >テキストボックスは上から下へ同じ大きさのテキストボックスが5行あるような状態です。 いつもの、あのあの、そのその?が多すぎなテスト動画です https://www.youtube.com/watch?v=ZLkCiXC0FzQ www.youtube.com1.事前準備 PowerPoint を新…

XXXXXさんへ VBA IE操作 Java Script サイトのクリックの方法について 質問をいただく

…いて google:vba ie click javascriptなどで検索すると、解決策が出てくるかなぁ。 ↑検索結果に丸投げかよ・・・ 以下、いつもの遠回しな宣伝付き回答 ぉぃぉぃ・・・1.直接起動してみるのも手かなぁ.Script.setTimeout "javascript:関数などかけるので" ページ表示を確認後、HTMLのソースを見て、JavaScriptの関数を呼んでみるのも手かなぁ?検索キーワード google:VBA IE Script setTimeout…

XXXXXさんへ VBA Outlook メールの移動について .ReceivedTimeで受信時刻がわかるので.Move してみただけ

下記の質問をいただく >OUTLOOKで受信したメールで作業実施日を毎朝8時とすると >そこからからマイナス15時間から朝8時の範囲で受信したメールだけを >任意のサブフォルダーに移したいときはどのようにすればよいのでしょうか。 .ReceivedTime で受信時刻がわかるので、 .Move してみただけですが下記、メール移動のサンプルコードです 参考となれば・・・ Option Explicit '2021-04-08 .Move でメールを移動させる 'カウンターを使用…

Win10でExcel VBA GetPhoneticを使い フリガナ候補を全て連続で取得したいのにサンプルが正常動作しない Win7だとテストOK Win10だと次の候補を取得できない そんなテスト結果

…net/excel/vba/tips/tips49.htm officetanaka.net より ※注意:これ、最近はできなくなったようですね。Excelというか、MS-IMEの仕様変更かもしれませんね。せっかくですから、コンテンツは残しておきます。 が見つかります。気になったので、提示されたサンプルコードを私も実行してみました ※最近はできなくなった、 古いネットにつなげていないWin7でテストすると 動いたり、、、※※解決策になってないなぁ・・・Win7の古いPCで実行…

バグ付きなので参考程度に Excel VBA アクティブシート内の表をPowerPointへコピペ(転記)する 複数の表を探す #デバッグ #バグ

…みます。Excel VBA 範囲 などをキーワードに探すと、 便利なメソッドなどがみつかるので、組み合わせてテストしてみます。 Option Explicit 'シート内の表を探すには? 'シート内の表を探してみます Sub test20210223_excel_シート内の表を探す001() 'セル範囲の取得 セル範囲の取得 ' http://officetanaka.net/excel/vba/cell/cell10.htm 'より '>ワークシートで使用されているセル範囲…

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

VBA

…outube.com/watch?v=3FLXPRyaJhw や https://www.youtube.com/watch?v=ye4nVjf-ihw など、やっていたり・・・VBA Sleepで検索すると https://www.google.com/search?q=VBA+Sleepwww.sejuku.netやe-vba.comなど、みつかるので、参考にしてみては?解決の糸口となれば幸いです。 三流プログラマー Ken3ken3memo.hatenablog.com

XXXXXさんへ VBA配列での高速サーチ COUNTIFS について

…ネットで色々と見て、VBAで配列でとか書いていますが >解かりりかねますので、何卒ご教示お願いいたします こんにちは。 VBA配列での高速サーチについてですが、 私も詳しくなく、お力になれずスミマセン。 >COUNTIFSをで実施するとかなり時間がかかります COUNTIFSで、毎回自動再計算がかかって、遅くなるパターンならgoogle:COUNTIFS 高速化 で検索すると、 識者の方々がイロイロと工夫されているみたいです。Excel COUNTIF 高速化20分→5秒|A…

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

…、だから、どのようにVBAでIE操作するんだよVBA input type="image" 操作 などで検索して、解決方法を探ってみてください。下記、日付順で検索に出てきた質問teratail.com より teratail.com など読者の声:なんだよ、ここまで読んで損した・・・お力になれず、スミマセン。 検索や解決のヒントとなれば幸いです。 頼りにならない三流プログラマー Ken3でした。 自分の記事を探すと・・・ あれれ、、、2013年に書いた昔の記事だったけど、 k…

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

VBA

….ken3.org/vba/backno/vba100.html )」を参考になんとかシートごとに出力はできたのですが、出力開始セルがA1からでないとうまく出力できません。テンプレートなので貼付け開始セルをI21からセットしたいのですが、うまくいきません。このプログラムで貼付け開始セルの指定はどうしたらいいのか途方に暮れています。 参考になるページなどありましたら、教えていただけたら幸いです。よろしくお願いします。 で、返信を作成する。こんにちは。 お急ぎのところ、返信遅れて…

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

…・ やったこと 1.VBAのSplit関数を使用して、セル内改行された文字列を vbLf で区切り取得 strBOX = Split(objRANGE.Cells(1, 1), vbLf)2.Characters(Start:=開始位置, Length:=文字数).Font.Size = フォントサイズ セル内のフォントを部分的に変更したかったので、 マクロ記録された .Characters を使用する3.エラーチェックで分割された文字列の数を数える 必ず固定の改行があると決…

人力検索から浮気して隣の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で、記録されたプロパティやメソッドを検索すると、 先人が書…

Ken3 ホームページ 目次

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

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



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