三流君 ken3のmemo置き場

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

挨拶・自己紹介:
失敗続きのAB型の変わり者 :三流プログラマー Ken3です
フリーのエンジニア・個人事業主です・・と書くと聞こえはイイが(それとなくカッコよく聞こえるが)、 現在は小さな案件の受注請負 と 短期派遣 で 日々つつましく?ほそぼそと暮らしてます。
Ken3三流君の連絡先:
[google formsで連絡する]
上記の問い合わせフォームに質問・感想など気軽に書き込んでください

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

Word, 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).Se…

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

ExcelからWordの段落オブジェクトParagraphsを使用して検索文字列の位置Range.Informationを探してみました ※人力検索から浮気して teratail の質問に回答してみた。いつもの人力検索のノリなので、常連さんに怒られないか心配しつつ・・・浮気先(質問元) teratail.com 他の回答やコメントも参考にしてください。 実現したいこと: エクセルの<検索文字列>シートのA列に列挙されている検索文字列群(A1からA2、A3、、、に検索したい文字…

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

ソースコードをUPするときに If a > 10 など、大なり、小なり、 半角が少し前まで、使えなかった記憶があって、 いつも > と全角で変換して書いていたが、 間違ってコピペした引用文章がそのまま貼り付いたので実験 ↑おっ、できますね。やったぁ、と、喜んだのもつかの間、 動画の概要欄・説明欄にソースコードを貼ってみると、エラーで弾かれた。 ↑ > が やはり、ダメみたいですね。まぁ、コメント欄にVBAなどのコードが貼れそうなので、 今後の動画でコードをコメント欄に貼って、…

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.事前準備…

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

下記の質問をいただいたので、google検索キーワードを紹介してみます。 Java Scriptが利いているサイトのクリックの方法について google:vba ie click javascriptなどで検索すると、解決策が出てくるかなぁ。 ↑検索結果に丸投げかよ・・・ 以下、いつもの遠回しな宣伝付き回答 ぉぃぉぃ・・・1.直接起動してみるのも手かなぁ.Script.setTimeout "javascript:関数などかけるので" ページ表示を確認後、HTMLのソースを見…

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

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

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

テスト動画を冒頭に移動※先に観てもらう? https://www.youtube.com/watch?v=JoidvQb2BIE www.youtube.com ↑こんな感じの結果です。下記質問をいただいたので、テストしてみる。 Sub aaa() Dim strWORK As String '呼び出しは簡単で、調べたい文字列を渡す strWORK = Application.GetPhonetic("三流君") While strWORK <> "" Debug.Print…

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

www.youtube.com1.Range("B2:D5")など固定エリアをパワーポイントに貼り付けてみる https://www.youtube.com/watch?v=iMavOYyH2ac2.シート内の表を探す https://youtu.be/iMavOYyH2ac?t=3293.とりあえず、一つ表をエクセルからパワーポイントへコピー・貼り付け https://youtu.be/iMavOYyH2ac?t=7294.シート内の複数表を探す https://youtu…

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

VBA

下記の質問をいただきました。 WEBページからのメッセージに困っていましたが objIE.navigate "JavaScript:function confirm() { return true; }" のおかげで次に進む事が出来ました。 本当にありがとうございます。ただ次の問題が新たに発生しました。 実行ボタンを押すと ①confirm画面がポップアップ 特定条件にヒットすると ②confirm画面がポップアップ→alert画面がポップアップ。 となるケースがあり、 ob…

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

>大量のデータをCOUNTIFSをで実施するとかなり時間がかかります >約1時間~2時間ぐらい?です > >ネットで色々と見て、VBAで配列でとか書いていますが >解かりりかねますので、何卒ご教示お願いいたします こんにちは。 VBA配列での高速サーチについてですが、 私も詳しくなく、お力になれずスミマセン。 >COUNTIFSをで実施するとかなり時間がかかります COUNTIFSで、毎回自動再計算がかかって、遅くなるパターンならgoogle:COUNTIFS 高速化 で検索…

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

下記の質問をいただいたが、回答ができなかったお話。 csvをDownloadする画面に行くのですが、 そこのボタンがJavaScriptで動くように設定されているのですが、 動かすことができません。 下記がボタンのソースです。 input type="image" name="XXXXXX_SubmitCsv" src="xxxx_dl_csv.gif" style="cursor: pointer;" alt="CSVデータ保存" title="CSVデータ保存" widt…

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

VBA

下記の質問をいただく Accessからエクセルのテンプレートへ1シート10件ごとに出力させようとしています。 件数も毎回変わります。 件数が増えるごとにテンプレートシートをコピーして増やします。(依頼書1、依頼書2・・・)「シートへデータを転記( http://www.ken3.org/vba/backno/vba100.html )」を参考になんとかシートごとに出力はできたのですが、出力開始セルがA1からでないとうまく出力できません。テンプレートなので貼付け開始セルをI21…

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

こりずに はてなの質問 q.hatena.ne.jp https://q.hatena.ne.jp/1576623097 にチャレンジしてみた↑質問が載ってます。 ※他の回答やコメント含めてみてください。いつものデバッグ風景・・・ミスしまくりで恥ずかしいけど・・・ www.youtube.com https://www.youtube.com/watch?v=g3KKlVqscDE ↑失敗したデバッグ解説最初から※失敗を時間のある時に見て笑ってください・・・ やったこと 1.…

人力検索から浮気して隣の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ページ単位で作成する

下記の人力検索の質問に回答してみた q.hatena.ne.jpここから下書き、テスト操作方法のテストとコードの設置方法 ※Office365 の ExcelとPowerPointでテストしました https://youtu.be/MOxfmcQcAk0 youtu.be ↑処理イメージが合っているか?確認してください下記のコードをExcel VBAの標準モジュールに貼り付けて、実行してみてください Option Explicit 'A列(A1から)にセットされたデータを使用…

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

下記の質問をいただく。 今まで動いていたプログラムが【このサイトは安全ではありません】というエラーが出てしまいます。 このエラーメッセジが出ないようにするにはどうすればよいのでしょうか。 軽く、win10 IE vba このサイトは安全ではありませんをキーワードに検索しただけですが、google:win10 IE vba このサイトは安全ではありません で検索するとhttps://www.manageengine.jp/support/kb/OpManager/?p=9959…

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

ネットの恥は残り続けるのに、下記の人力検索の回答にチャレンジしてみた。 q.hatena.ne.jpデータの文字数を数えたいなら、 クエリーに演算フィールド 式を作る文字数を数えたいなら、 文字数: Len([書名])フィールドに フィールド名(式をフィールド名にする): 計算式 Len([フィールド名]) を書くAccess クエリーに演算フィールド 式を作り 条件として利用する 文字数15以下を抽出する https://www.youtube.com/watch?v=jz…

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

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

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

デバッグ時の手作業で見つかるオブジェクトが プログラムで走らせると(実行時)見つからないパターン>> objectそのものが取得できていないエラーとなりました。 >> また、ジャバスクリプトを直接動かすほうは、実行しても、「反応しない」という状況です。よくあるのが、ページの表示待ち次がページがフレームのページ? or カーソルが進まないとデータを取得できないパターン https://youtu.be/6yo4PJnzwk0?t=1474 ↑スクロールするとデータが作られるパタ…

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…

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

通常は、検索文字を全ての期間から探すのですが、 最新の情報や新しい情報を探したい時に、 1時間以内、一週間以内、一か月、一年・・ など、XXX以内に更新・発信されたページを探すことができます。https://www.youtube.com/watch?v=sneaggvAoLA 1.ドラマの感想など 1時間指定、3時間指定、時間指定で検索してみるhが時間 d 日 w 週 m 月 y 年なので、ラジオボタンで選択 テストしてみます。 探す言葉: を←好きな検索文字を入れてからボ…

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

通常は、検索文字を全てのサイトから探すのですが、 指定したサイトから探すこともできます。そんな時に便利なのが name=sitesearch で検索場所ドメインを指定 することができます。https://www.youtube.com/watch?v=rS8LtZwHXPs 1.QAサイトを指定してみた 人の多いYahoo知恵袋 chiebukuro.yahoo.co.jp おしえてgoo! oshiete.goo.ne.jp 私も利用中 最近過疎ってる失礼 人力検索 q.h…

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

googleの検索結果は自信アリで10件なのですが、 (レスポンスの関係もありそうですが) もう少し一度に見たい、 いつも 次のページ チェックしている そんな人のために?検索結果を name=num Valueで指定することができます。https://www.youtube.com/watch?v=qi5czKv0pWY 1.20件固定で返すように input type=hidden name=num value="20"Formの隠し項目にして、 input type=h…

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

1.google検索窓の設置単純にHTML Form を作成して、 name=q の 検索文字の入力枠を設定してみました。https://www.youtube.com/watch?v=AqJwS0D1I1o 探す言葉: を←好きな検索文字を入れてからボタンを押す <!-- SiteSearch Google --> <form method=get action="https://www.google.co.jp/search" target="_blank"> <a hr…

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

VBA

当店人気のIE操作質問がくるも・・・ >ダイアログボックスが2~3回開く業務系では上記の処理がsendkeysメソッドでしかできません。 >ご存じの通りsendkeysメソッドは不安定で度々エラーが発生し業務使用するのは厳しい状況です。 >何か良い方法はありますか?せっかく良いネタ・メッセージをいただいたのですが、 ダイアログ処理は私もなかなかスッキリできなくて困っています。 なので、かっこつけた回答ができなくてスミマセン。自分やみなさんが困っている処理は、 需要がありとても…

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

処理済みのメールを他のフォルダー ここでは、受信トレイの下の 名称"処理済み"に.Move 移動先Folderオブジェクト を使って移動させました。'処理が終わったメールを移動する ※6 ループの中で移動させる時は注意する mITEM.Move oFolder.Folders("処理済み")ここで、ありがちな不具合・問題点を実演してみます。 https://www.youtube.com/watch?v=I4XZYWltfqA 001 .Moveでメール移動のテスト'メールア…

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

マクロ記録で写真の挿入を探ってみます。 1.記録してみよう 開発のタブから、マクロ記録で実際の操作を記録します。下記、実際の操作と簡単な解説です。 https://www.youtube.com/watch?v=wIu31e36Qew 2.コードを見てみよう 次に記録されたコードを確認します。 プロパティやメソッドがわかります。 Sub Macro1() Range("C2").Select ActiveSheet.Pictures.Insert("D:\VBA\IMG_01…

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

はてなの質問 q.hatena.ne.jp にチャレンジしてみた。テストしてみた >【指定フォルダ or 指定件名を含むメールの本文内の画像をエクセルに貼り付け】 >複数人からiPhoneのメールで送られてくる画像を >1クリックでエクセルにまとめて貼り付けしたいです Outlook VBA で メールに添付された写真をExcelに貼る処理のイメージがあっているか、わからないが、 下記の用に作成してみましたhttps://www.youtube.com/watch?v=SF9…


質問・感想・クレームなど、
気軽にコメント欄に書いてもらえるとうれしいです。

[Googleフォームにコメントを残す]
↑質問・コメントの入力フォームです、気軽に書いてください


フッター:最後にKen3Videoの動画一覧を紹介します

YouTubeにアップした動画です。他の動画を一瞬でも見てもらえるとさらに嬉しいです。
再生リスト:[三流君Ken3の最新動画]←リストの一覧形式で表示する


また、ブログを見に来てくださいね。ではまたぁ~