VBA
PowerPointの表をVBAから操作するコードを探ってみます ActivePresentation.Slides(2).Shapes("表 2").Table.Cell(3,2).Shape.TextFrame.TextRange.Text = "文字列" の一行紹介の動画でOKなのに無駄に長く、 型宣言して型にハメながら ステップ実行してみま…
Rangeにシート!範囲を渡す1.Set r1 = Range("Sheet2!A1:D5")を初見で見て、ビックリした00:00 派遣先で見たコードにビックリSet r1 = Range("Sheet2!A1:D5")↑これ、できるの?シート名書いてるけど、いけるのか?ってことで、 門外不出の秘密コードを頭の隅…
ひな型スライド複数ページをコピーして使う Slides.Range(Array(1, 2)).Copy をテストExcelからPowerPointにデータをセットする解説動画の コメント欄に テンプレを2枚(複数)をコピーしながら、 Excel A~C,D~FをPowerPointに2枚単位でデータを流し込む、 …
バグ・不具合の原因がウインドウの幅だと思い込み、 決めつけてデバッグした失敗動画ですが VBAデバッグでウォッチ式使用方法の参考となれば幸いです。 youtu.be https://youtu.be/9qlahSwozo8 目次 00:00 現状とやりたいことを説明 01:40 STOPで止めてウォ…
下記のコード1行を #イミディエイト に打ち込んで確認してみてください ActiveInspector.Width = 800 と言われたら?いきなり、経験者・自分たちの目線で話したけど、 ?の人、初めての人は何言ってんだコイツと、あせると思います。youtu.be https://youtu.…
Dim oLABEL As DataLabel グラフのデータラベルオブジェクトに対して表示フィールドの追加 oLABEL.Format.TextFrame2.TextRange _ .InsertChartField msoChartFieldFormula, "=Sheet1!$C$7" で、シートのセルとリンクさせる、そんなテスト動画です。 youtu.b…
ワイドと三連複のオッズを取得したい と質問があったので、 今回は、三連複のオッズ取得に挑戦してみます。下記、デバッグ動画です、うまくコードをアレンジしてみてください。 youtu.be https://youtu.be/MEOvxlcubAw 目次 00:00 挨拶と実行テスト 02:36 オ…
PowerPoint VBAのイベントで、 アニメーションのイベントを探ってみました と言っても WithEvents App As Application で SlideShowNextClick スライドショー内のクリック SlideShowNextBuild アニメーション 表示前 タイミングをテストしただけでした。また…
やりたいこと: detail.chiebukuro.yahoo.co.jp >Outlookで下書きに保存したメールを元に作成してみたいメールがあります。 >文字列を日付に変換するだけなのですが、 >下書きに保存したメールには書式があります。 >OutlookVBAでReplaceしたら書式が消え…
知恵袋の質問 detail.chiebukuro.yahoo.co.jp 既存のパワーポイントファイルのすべてのスライドのフォントを一気に変更することは出来ないのでしょうか? と あったので マクロを作成し、使い捨てのマクロ処理を設置してみた#パワーポイント #PowerPointVBA …
JRAのホームページから、 ワイドと三連複のオッズを取得したい と質問があったので、 まず、ワイドのオッズ取得にチャレンジしてみます。私Ken3が大好きだったIEのサポートが終了したので、 MSXML2.XMLHTTP と CreateObject("htmlfile")を使用して JRAオッズ…
知恵袋の質問 detail.chiebukuro.yahoo.co.jp >エクセルのマクロを開こうと標準モジュールボタンを押してみたところ、 >declarationsと右上に表示されるばかりでその他何も表示されません。 >これは、マクロが消えてしまったということでしょうか? にチ…
同じテキストや図形をすべてのスライドに貼り付けたい、 そんな時のために使い捨てマクロを作成してみました。 0.やりたいこと detail.chiebukuro.yahoo.co.jp >30スライドある資料全部にテキスト追加して編集したいのですが、 >全スライドに一括でテキス…
Set sel = ol.ActiveInspector.WordEditor.Windows(1).Selection .WordEditorで編集 Wordの世界(世界はいいすぎか、Object操作なので、) .Bookmarks("\EndOfDoc").Select この一行を組み込むとよいのでは?下記、いつもの あのあの 解説動画です。 youtu.be …
ワード文章をページ単位でテキストファイルに書き出す そんな動作を行うマクロをデバッグしてみました。下記、いつもの デバッグ動画です youtu.be https://youtu.be/FXNjGsLen18 目次 00:00 あいさつ、やりたいこと 00:50 1.ページ選択のテスト 03:15 2.ペ…
Outlookへ予定を登録後、CalendarViewModeを変更して、カレンダーの表示を変える。 そんな処理にチャレンジしてみました。 Outlookを複数起動していたので、いつも以上にデバッグでハマってしまいました。 お蔵入りレベルのムゴイ動画ですが、よろしくお願い…
パワポのグラフ元が毎日更新されるエクセルBook 0901.xlsx,0902.xlsx...で 日付別に日々bookが作成される。 パワーポイントのグラフリンク(bookを指定)を更新したい。 とあったので、探ってみました。知恵袋の質問・キッカケ detail.chiebukuro.yahoo.co.jpP…
パワポに記載されたノートを読み上げるマクロボタンを作成。 単純にスライドショーのノート SlideShowWindows(1).View.Slide.NotesPage.Shapes.Placeholders(2).TextFrame.TextRange.Text をSAPI.SpVoice .Speakで読み上げただけですが・・・アレンジして処…
前回 ken3memo.hatenablog.com の続きです今回は、 折れ線グラフに直値の系列を追加 してみました。 ActiveChart.SeriesCollection.NewSeries '.NewSeriesで新系列追加 で、できました。 って、何言ってんだコイツ・・・いきなり、話すすめられても?だよね…
グラフ作成時a1:b10の範囲を棒グラフに、 など、セルの範囲を元にしてグラフを作成しますが、 今回、直接、値を使用してみたいと思います。知恵袋の質問 detail.chiebukuro.yahoo.co.jp に答えてみた。#ExcelVBA #MSExcel #Chart #グラフ #マクロ #デバッグ …
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形式のデータ OLE型のデータを取り出し、Wordファイル化してみました。ネタ元は下記のQAサイトです teratail.comいつもの動画解説 あのあの こんな感じ イライラ 解説は下記 youtu.be https://youtu.be/8fqAbKdA…
パワポでスタンプ処理 UserForm イメージオブジェクトを使い連続で図形をセットする。 そんな処理を試作 仕組みは単純で、UserFormのイメージコントロールを使い、 イメージが押された位置にスタンプ図形シェイプをセットしてみました知恵袋の質問 detail.ch…
Excelシートのイメージ B2にフォルダー B6~ファイル名、C,D,E,F列にセット位置 に記載されたExcelの画像ファイル名リスト・表 から パワポのスライドを複数ページ作成するQAサイト teratail.com の質問に答えてみた。いつもの あのあの そのその イライラ動…
知恵袋の質問に、PowerPointで図形を左揃え、上揃え、均等の質問があったので、 パワポ VBA ユーザフォームで図形の配置 整列を探ってみました。知恵袋の質問 detail.chiebukuro.yahoo.co.jp ↑に回答してみました。下記、いつもの あのあの そのその イライ…
イライラ棒的な処理をパワポで作りたい時、 図形のマウス通過を接触判断として、 触れたら、スライドの最後に飛ばす、そんなスライドを作成したい知恵袋の質問 detail.chiebukuro.yahoo.co.jp に答えてみました。下記、いつもの あのあの そのその、イライラ…
知恵袋の質問に答えてみた。: detail.chiebukuro.yahoo.co.jp 下記のようなoutlookvbaでメール返信をしたいのですが、埋め込み図形がそのまま反映してくれません。何か方法はありませんか? Dim objReItem As Outlook.MailItem Set objReItem = ActiveInspec…
昔の記事 Outlook VBA でフラグを付ける処理 三流君VBA:Outlook VBAでフラグ作成 .FlagStatus .FlagRequest .FlagDueBy http://www.ken3.org/vba/backno/vba161.html に下記の質問をいただきました。 教えていただければと思います。 No161のフラッグ設定を…
パワポのデバッグ・確認資料として、ハイパーリンクの一覧を作成したく、 ハイパーリンクのオブジェクトを探るが、 しっくりこなかったお話です。知恵袋の質問 detail.chiebukuro.yahoo.co.jp の回答用に作成する、他の回答者がシンプルなコードを先にUPして…
ExcelからHTMLメールを作成してタグにFontサイズを指定したけど、変わらなかった。 そんな質問に答えてみた。 teratail.com detail.chiebukuro.yahoo.co.jp下記、いつもの あのあの 解説動画・・・ youtu.be https://youtu.be/vuq1fe29JU0 目次 00:00 あいさ…