三流君 ken3のmemo置き場

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

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

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

excel

Excel AとBの組み合わせ全てを展開 PowerQueryを使用して作成する方法 カスタム列追加 テーブル結合 などを説明

エクセルでA,Bデータの組み合わせを全て取得したい時、どうする? Excel PowerQuery初心者の操作方法・作成方法の動画です。 二つの表を組み合わせて結果を全て取得、固定のカスタム列を追加して作成してみました。youtu.be https://youtu.be/0B3aSCOKd2I 目…

VBA Excelから起動したAccess.Applicationを残したい .UserControl = Trueを実験してみた

accApp.UserControl = True を入れてテストしてみました。 ※よし実験終了、QAサイトの回答に得意気に書こうとしたら、 質問が解決済みになっていたのは内緒です。youtu.be https://youtu.be/qyL7ozYEds0 目次 00:00 やりたいこと 00:30 1.不具合の再現 01:28…

メモ 行や列 の 全体選択後に右クリックやダブルクリックされた時はTarget.Countで件数もみたほうがいいのかなぁ・・・

Excelのシートイベントで 行や列 の 全体選択後に 右クリックやダブルクリックされた時は Target.Countで件数もみたほうがいいのかなぁ・・・ 6行目を選択後に右クリックでTarget.AddressとTarget.Countイベント処理で ByVal Target As Range で対象がわかる…

Excelからテンプレ・ひな型のPowerPointを開き B列のデータセット後 A列の名前を付けて保存する そんなテスト

B2のパワポファイル、フルパスを開き、B3で指定したスライドページの B4名前のテキストボックスにB10列~データセット後、A10列の名前で上書き保存する 図1.シートイメージまぁ、↑シートイメージを見た方が早いですね。テスト動画 youtu.be https://youtu.be…

Excel表(セル範囲) を パワポの表TABLEへ転記する PowerPoint Table Row Column Cell VBA

0.やりたいこと Excelシート+セル範囲のテキストデータ を パワポのPage指定した表TABLEへ転記する。 ※データを流し込む、差し込む、イメージですyoutu.be https://youtu.be/x68nZfCgFGc 目次 00:00 0.やりたいこと 00:58 1.シートのセル範囲をパワポの指定P…

Excel VBAで見慣れないコード Range("Sheet2!A1:D5")を見てビックリした話

Rangeにシート!範囲を渡す1.Set r1 = Range("Sheet2!A1:D5")を初見で見て、ビックリした00:00 派遣先で見たコードにビックリSet r1 = Range("Sheet2!A1:D5")↑これ、できるの?シート名書いてるけど、いけるのか?ってことで、 門外不出の秘密コードを頭の隅…

Excel A列~C列,D列~F列をPowerPointスライド2枚単位でデータを作成・流し込む 蛇足で三択クイズスライド

ひな型スライド複数ページをコピーして使う Slides.Range(Array(1, 2)).Copy をテストExcelからPowerPointにデータをセットする解説動画の コメント欄に テンプレを2枚(複数)をコピーしながら、 Excel A~C,D~FをPowerPointに2枚単位でデータを流し込む、 …

Excel VBA グラフのラベルとセルをリンク As DataLabel InsertChartField msoChartFieldFormula

Dim oLABEL As DataLabel グラフのデータラベルオブジェクトに対して表示フィールドの追加 oLABEL.Format.TextFrame2.TextRange _ .InsertChartField msoChartFieldFormula, "=Sheet1!$C$7" で、シートのセルとリンクさせる、そんなテスト動画です。 youtu.b…

JRA三連複のオッズ取得 JRAのHPから三連複のオッズをExcelに取り込む デバッグ

ワイドと三連複のオッズを取得したい と質問があったので、 今回は、三連複のオッズ取得に挑戦してみます。下記、デバッグ動画です、うまくコードをアレンジしてみてください。 youtu.be https://youtu.be/MEOvxlcubAw 目次 00:00 挨拶と実行テスト 02:36 オ…

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

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

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

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

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

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

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

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

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

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

Excel英単語から機械音声付きの縦スライドPowerPointを作る 自動転記マクロのテスト

Excelに入力された英単語から機械音声を作成し、 PowerPointの縦スライドに転記する#ExcelVBA #PowerPointVBA #自動転記 #英単語 #縦スライド #マクロ youtu.be https://youtu.be/pHpxR_IaJ3M 目次 00:00 0.実行結果 00:53 1.単体の部品説明 06:50 2.不具合0…

Excel wav作成 機械音声変換 言語の指定を409英語にして音声ファイル.wavを作成してみた

youtu.be https://youtu.be/OEQRDtOinmw 目次 00:00 0.恥ずかしいお話・・・ 02:55 1.機械音声の言語を英語USにしてみた 05:00 2.組み込み結果0.恥ずかしいお話・・・ 音声ファイルの作成で、英単語を読ませたら、そのまま日本語読みしていた・・・ apple ba…

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

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

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

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

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…

Excelで読み上げ Range(範囲).Speak で簡単にできました Application.Speech.Speakもアリかな

タイトルExcelのVBAで.Speakを使用すると、簡単に読み上げが可能です Application.Speech.Speak もあって、 セル読み上げだけじゃなく、好きな言葉を読み上げることができます。MsgBoxと組み合わせてみたけど、チョット、イマイチでした。 視聴者のみなさん…

Excel VBA 短い台詞から.wavファイル 機械音声を作成してみた

Excelで入力された文字列(台詞)からwavファイルを作成してみた。 機械音声のファイルを作成してみました。 意外と簡単に音声ファイル .wavを作ることができそうなので、 コードをアレンジしながら使ってみてください。 何か面白い使い方、アイデアがあったら…

Excel VBA 右クリック メニュー に自作マクロを追加する CommandBarを探ってみた

自作マクロVBAをExcelの右クリックメニューに追加したかったので、 いつものように デバッグ テスト してみます。 ※最後の後始末がうまくいかなかったのは・・・実力・確認不足です。下記、いつもの、あのあの そのその 動画解説です youtu.be https://youtu…

実行時エラー 1004 : RangeクラスのAutoFilterメソッドが失敗しました Excel VBA .AutoFilter フィルター処理を勝手にデバッグ

実行時エラー 1004 : RangeクラスのAutoFilterメソッドが失敗しました 質問元: teratail.com ↑が質問元です。※回答してから勘違いに気が付く、痛恨のパターン・・・落ち着け・・・VBAからフィルターを使ったこと無かったので、 勝手にデバッグ動画を作成 htt…

ExcelからWord #データ差し込み 処理を #デバッグ してみた Excel VBA IsDate("1200-10") が True になるので小細工してみた・・・

IsDateで日付かチェック可能なのですが、 1200-12 みたいなYYYY-MMと取れる文字列を真 Trueと判断する まぁ、当たり前のお話なのかなぁ・・・なので、追加で、書式が文字列かチェックしてみたり、 置き換え前の文字に 日 が入っているか?チェックしてみたり…

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

ExcelからWordの段落オブジェクトParagraphsを使用して検索文字列の位置Range.Informationを探してみました ※人力検索から浮気して teratail の質問に回答してみた。いつもの人力検索のノリなので、常連さんに怒られないか心配しつつ・・・浮気先(質問元) te…

XXXXXさんへ エクセル 入力禁則 ドロップダウンリスト =INDIRECTの#REF!のエラーについて

Excelのドロップダウンリストのエラーで、いくら調べてもエラーを解決できないため、どうかお力を貸して下さい。例えば、以下のような表があるとします。取扱者 契約者 被保険者 A D I A E A F I A F j A D K B G K B G L B D M C H C H N上記の様な表記に対…

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

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

プロ野球開幕のニュースを見て Excel 円グラフ の 色をネタにすることを思いつくも しっくりこなかった話

キッカケ: ニュースでプロ野球開幕カードを見て、カープvsドラゴンズ このカードを題材にして架空のアンケートで 赤ヘル カープのデータで青色の円グラフを作る失敗を例題にして色の話を展開するも、なかなかうまく説明できなかった。 作成後にニュースでサ…

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

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

Ken3 ホームページ 目次

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

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



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