三流君 ken3のmemo置き場

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

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

VBA

パワポ アニメのイベント SlideShowNextBuild などをWithEventsで使用する GetClickCount GetClickIndex ほか

PowerPoint VBAのイベントで、 アニメーションのイベントを探ってみました と言っても WithEvents App As Application で SlideShowNextClick スライドショー内のクリック SlideShowNextBuild アニメーション 表示前 タイミングをテストしただけでした。また…

Outlook VBA 下書きに保存したメールを元に書式を残し置換 MailItem.Copy WordEditorで置換

やりたいこと: detail.chiebukuro.yahoo.co.jp >Outlookで下書きに保存したメールを元に作成してみたいメールがあります。 >文字列を日付に変換するだけなのですが、 >下書きに保存したメールには書式があります。 >OutlookVBAでReplaceしたら書式が消え…

パワポ マクロ 全てのスライドのフォントを一括変更 使い捨てマクロ設置のお話

知恵袋の質問 detail.chiebukuro.yahoo.co.jp 既存のパワーポイントファイルのすべてのスライドのフォントを一気に変更することは出来ないのでしょうか? と あったので マクロを作成し、使い捨てのマクロ処理を設置してみた#パワーポイント #PowerPointVBA …

JRAオッズ取得 ワイドのオッズを取得 MSXML2.XMLHTTPとCreateObject("htmlfile")を使用してデバッグ

JRAのホームページから、 ワイドと三連複のオッズを取得したい と質問があったので、 まず、ワイドのオッズ取得にチャレンジしてみます。私Ken3が大好きだったIEのサポートが終了したので、 MSXML2.XMLHTTP と CreateObject("htmlfile")を使用して JRAオッズ…

VBA Q:標準モジュールのマクロが消えた? A:勘違いかも?落ち着いて表示を切り替えてみてください

VBA

知恵袋の質問 detail.chiebukuro.yahoo.co.jp >エクセルのマクロを開こうと標準モジュールボタンを押してみたところ、 >declarationsと右上に表示されるばかりでその他何も表示されません。 >これは、マクロが消えてしまったということでしょうか? にチ…

パワポ マクロで使い捨ての一回作業 例題:コピーしたオブジェクトを2ページ目以降に連続貼り付け

同じテキストや図形をすべてのスライドに貼り付けたい、 そんな時のために使い捨てマクロを作成してみました。 0.やりたいこと detail.chiebukuro.yahoo.co.jp >30スライドある資料全部にテキスト追加して編集したいのですが、 >全スライドに一括でテキス…

ExcelからOutlook HTMLMail作成 WordEditor時 末尾にデータを追加したい時 カーソル移動のテスト

Set sel = ol.ActiveInspector.WordEditor.Windows(1).Selection .WordEditorで編集 Wordの世界(世界はいいすぎか、Object操作なので、) .Bookmarks("\EndOfDoc").Select この一行を組み込むとよいのでは?下記、いつもの あのあの 解説動画です。 youtu.be …

Word VBA ワード文章をページ単位でテキストファイルに書き出す マクロをデバッグ

ワード文章をページ単位でテキストファイルに書き出す そんな動作を行うマクロをデバッグしてみました。下記、いつもの デバッグ動画です youtu.be https://youtu.be/FXNjGsLen18 目次 00:00 あいさつ、やりたいこと 00:50 1.ページ選択のテスト 03:15 2.ペ…

Outlook予定表に書込み 登録後カレンダー表示 CalendarViewModeを1日単位の日ビュー表示にする

Outlookへ予定を登録後、CalendarViewModeを変更して、カレンダーの表示を変える。 そんな処理にチャレンジしてみました。 Outlookを複数起動していたので、いつも以上にデバッグでハマってしまいました。 お蔵入りレベルのムゴイ動画ですが、よろしくお願い…

パワポ マクロでグラフのリンク更新 LinkFormat.SourceFullNameにFile名セット後LinkFormat.Update

パワポのグラフ元が毎日更新されるエクセルBook 0901.xlsx,0902.xlsx...で 日付別に日々bookが作成される。 パワーポイントのグラフリンク(bookを指定)を更新したい。 とあったので、探ってみました。知恵袋の質問・キッカケ detail.chiebukuro.yahoo.co.jpP…

パワポでノートを読み上げるマクロボタンを設置する PowerPoint VBA SAPI.SpVoice Speak

パワポに記載されたノートを読み上げるマクロボタンを作成。 単純にスライドショーのノート SlideShowWindows(1).View.Slide.NotesPage.Shapes.Placeholders(2).TextFrame.TextRange.Text をSAPI.SpVoice .Speakで読み上げただけですが・・・アレンジして処…

Excel VBA 折れ線グラフに直値の系列を追加 .NewSeriesで新系列追加

前回 ken3memo.hatenablog.com の続きです今回は、 折れ線グラフに直値の系列を追加 してみました。 ActiveChart.SeriesCollection.NewSeries '.NewSeriesで新系列追加 で、できました。 って、何言ってんだコイツ・・・いきなり、話すすめられても?だよね…

Excel VBA グラフの範囲 値を直値にする セルの範囲を使わないで強引に配列に入れた値をセット

グラフ作成時a1:b10の範囲を棒グラフに、 など、セルの範囲を元にしてグラフを作成しますが、 今回、直接、値を使用してみたいと思います。知恵袋の質問 detail.chiebukuro.yahoo.co.jp に答えてみた。#ExcelVBA #MSExcel #Chart #グラフ #マクロ #デバッグ …

Access OLE型で登録された Wordアートの文字列を取り出し 文字を読み上げる

Access VBAでOLE型に登録されたWordアート内の文字列を読み上げる下記、いつもの解説動画です。 youtu.be https://youtu.be/0ZkhpOj-uDU 目次 00:00 0.あいさつ、テスト実行 03:45 1.単体 Access VBAで文字を読み上げる 04:59 2.単体 ワードアート内の文字列…

Access OLE型のフィールドに埋め込まれているWordデータをファイルに保存 TypeName(Me!OLE型.Object)=Document

Accessフォーム経由でOLE型に埋め込まれたWord形式のデータ OLE型のデータを取り出し、Wordファイル化してみました。ネタ元は下記のQAサイトです teratail.comいつもの動画解説 あのあの こんな感じ イライラ 解説は下記 youtu.be https://youtu.be/8fqAbKdA…

PowerPoint UserForm イメージオブジェクトを使い図形の連続セット スタンプ処理もどき

パワポでスタンプ処理 UserForm イメージオブジェクトを使い連続で図形をセットする。 そんな処理を試作 仕組みは単純で、UserFormのイメージコントロールを使い、 イメージが押された位置にスタンプ図形シェイプをセットしてみました知恵袋の質問 detail.ch…

Excel複数画像ファイルリスト から パワポのスライドに図・画像を貼り付ける パワポ図を作成

Excelシートのイメージ B2にフォルダー B6~ファイル名、C,D,E,F列にセット位置 に記載されたExcelの画像ファイル名リスト・表 から パワポのスライドを複数ページ作成するQAサイト teratail.com の質問に答えてみた。いつもの あのあの そのその イライラ動…

パワポ マクロ 図形の配置 整列を探る PowerPoint VBA ShapeRangeに対してAlign Distribute メソッドを使用

知恵袋の質問に、PowerPointで図形を左揃え、上揃え、均等の質問があったので、 パワポ VBA ユーザフォームで図形の配置 整列を探ってみました。知恵袋の質問 detail.chiebukuro.yahoo.co.jp ↑に回答してみました。下記、いつもの あのあの そのその イライ…

パワポ マクロで図形の動作設定 マウス通過動作をセットする PowerPoint VBA ActionSettings ppMouseOver

イライラ棒的な処理をパワポで作りたい時、 図形のマウス通過を接触判断として、 触れたら、スライドの最後に飛ばす、そんなスライドを作成したい知恵袋の質問 detail.chiebukuro.yahoo.co.jp に答えてみました。下記、いつもの あのあの そのその、イライラ…

Outlook VBA 図を含んだ返信メール作成 .WordEditorで編集 .Paragraphs段落を使ってみた

知恵袋の質問に答えてみた。: detail.chiebukuro.yahoo.co.jp 下記のようなoutlookvbaでメール返信をしたいのですが、埋め込み図形がそのまま反映してくれません。何か方法はありませんか? Dim objReItem As Outlook.MailItem Set objReItem = ActiveInspec…

XXXXXさんへ Outlook VBA 送信時にフラグのセット について

昔の記事 Outlook VBA でフラグを付ける処理 三流君VBA:Outlook VBAでフラグ作成 .FlagStatus .FlagRequest .FlagDueBy http://www.ken3.org/vba/backno/vba161.html に下記の質問をいただきました。 教えていただければと思います。 No161のフラッグ設定を…

PowerPoint VBA ハイパーリンクを探る ExcelからパワポのHyperlinkを取得するマクロ

パワポのデバッグ・確認資料として、ハイパーリンクの一覧を作成したく、 ハイパーリンクのオブジェクトを探るが、 しっくりこなかったお話です。知恵袋の質問 detail.chiebukuro.yahoo.co.jp の回答用に作成する、他の回答者がシンプルなコードを先にUPして…

Excel HTMLメール作成 GetInspector().WordEditorでWordオブジェクトを編集 デバッグ

ExcelからHTMLメールを作成してタグにFontサイズを指定したけど、変わらなかった。 そんな質問に答えてみた。 teratail.com detail.chiebukuro.yahoo.co.jp下記、いつもの あのあの 解説動画・・・ youtu.be https://youtu.be/vuq1fe29JU0 目次 00:00 あいさ…

XXXXXさんへ スクレイピング関連の質問について 年金関連のqaページ

下記の質問をいただく、 (が、いつものように、できない、難しい・・・の後ろ向き回答、ぉぃぉぃ) >さてこのたび仕事の関係で某厚生労働省の年金関連のqaページをエクセルの表にして抽出したいと考えています。最低限A列にQ(質問内容)、B列に(回答内容)…

Excel VBAで表示変更 10倍以下を赤 小数点を0.0でそろえる 例題:JRA 単勝オッズ取得

タイトルサムネイル1.小数点をそろえる、オッズ10倍以下を赤にする 見た目を少し、修正してみます。 時間稼ぎの見た目修正よりも、異常なオッズや勝ち馬を探すロジックを組み込めよ・・・ なんて、声が聞こえてきますが。。。下記、いつもの あのあの 解説動…

Excel VBA グラフ選択時のイベント処理を探る クラスモジュールにWithEvents As Chartを書きイベント取得

タイトルサムネイルWithEvents myChartClass As Chartを使い、グラフのイベントをクラスモジュールで処理する グラフ選択で軸の値を表示、ダブルクリックで修正、そんな処理を作成しました。 グラフの軸の値は、 With myChartClass.Axes(xlValue) Debug.Prin…

XXXXXさんへ ExcelからPowerPoint連続設定 自動画面切り替え 秒数の設定 を Excelから連続で行う VBA マクロ デバッグ

VBA

Excel A列に切替タイミングの秒数を入力、PowerPointの画面切り替え タイミングにセットする そんな処理を行ってみます。 タイトルサムネイルYoutubeのコメント欄で下記の質問をいただきました パワーポイントの自動画面切り替えの秒数の設定において、エス…

PowerPoint 全てのスライドをjpg画像で出力 VBA マクロ .Exportで簡単にできました

タイトルサムネイルPowerPointのスライドで複数サムネイル画像を作成 各スライドをjpgファイルに保存したいと思い、 VBAを探ってみたら、 .Export で 簡単に画像ファイルを作成できました。 youtu.be https://youtu.be/Gf1AGfSdN5c 目次 00:00 挨拶 やりたい…

ExcelからPowerPointへ 項目名が同じ名前のオブジェクトにデータをセットする

タイトルとサムネイル下記、知恵袋の質問に触発され detail.chiebukuro.yahoo.co.jp ExcelのデータをPowerPointに転記する そんな処理をやってみます。勝手に作った仕様は、 Excel:A1一行目~項目名 2行目からデータ pp:図やテキストボックスに名前を付け、…

CreateObject("htmlfile")でDocumentを作りweb上のhtmlデータを抜き出す 例題でJRAオッズを取得してみた

タイトルとサムネイルDim oDocument As Object Set oDocument = CreateObject("htmlfile") で作成したhtmlfileドキュメントオブジェクトに html文字列を書き込む、そんなデバッグ風景です。下記、いつもの あのあの そのその 解説動画です www.youtube.com h…

Ken3 ホームページ 目次

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



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