VBA の検索結果:
…owerPoint VBAで複数スライドの書式を一括変更する方法 PowerPointで資料を作成する際、複数のスライドに同じ書式を設定したい場面はよくありますよね。しかし、手作業で一つずつ書式をコピー&ペーストしていくのは、非常に面倒で時間がかかります。 そこで今回は、PowerPoint VBAを使って、この面倒な書式設定を自動化する方法を紹介します! Shape.PickUp メソッドと Shape.Apply メソッドを組み合わせることで、複数のスライドにある同じ位置…
…owerPoint VBAでOLE埋め込みWordにルビを振る方法 概要 PowerPointに埋め込まれたWord文書にルビを振るには、PowerPointとWordを連携させる必要があります。 このVBAマクロは、ExcelからPowerPointを操作し、スライド内のOLE型のWordオブジェクトにルビを振る処理を行います。 処理の流れは以下の通りです。 起動済みのPowerPointを取得 PowerPoint内のスライドとシェイプをループ処理 OLE型のWordオブ…
…の表示を選択すると、VBAのコードエディタが表示されます。 コードの内容については動画では詳しく説明されていませんが、ListViewにドラッグアンドドロップされたファイル名が取得できるように記述するようです。タイミングの確認と意図的なミス (9:02 - 10:22) このパートは、タイトルと説明が一致していないようです。動画の内容を確認すると、コードの記述ミスを意図的に仕込み、ドラッグアンドドロップしてもファイル名が取得できない状態にするようです。ドラッグアンドドロップイ…
…jp/office/vba/api/excel.chart(object) よりChart.CopyPicture おっコレかな?と思ったが、これは、クリップボードだった。※将来のメモChart.Export メソッド (Excel) https://learn.microsoft.com/ja-jp/office/vba/api/excel.chart.export 式。エクスポート (FileName、 FilterName、 Interactive)例 次の使用例は、グ…
…x "処理終了、画像を確認してください" End Sub 解説位置: https://www.youtube.com/watch?v=RD5ovhJncsY&t=1464パワーポイント リンク切れグラフの値を取り出す PowerPoint マクロ VBA https://www.youtube.com/playlist?list=PL8vZhsyiiFhuAVnLl4S9tWujchW7rqOUm 再生リスト↑貼り付けたExcelグラフがリンク切れ 値を救いたい 吸い出したい
….comExcel VBA で PowerPointのタイトルテキストを取得したい Shapes から テキストを取り出す ken3memo.hatenablog.com だと、すべて、取得してしまうので、 現在処理中のスライドのみ、データを落とすように変更する。蛇足2.Excelでアクティブスライドのppオブジェクトに名前を付ける※名前の変更 蛇足2.パワポのアクティブスライドのシェイプ名.Nameに値をセットして変更する'起動済みのパワーポイント スライド .Shapes…
ken3memo.hatenablog.comhttps://youtu.be/jP0O2KlXeLE 目次 00:00 1.処理のタイミングをとりたい 00:32 1.2 標準モジュールにOnSlideShowPageChange 03:20 1.4 ん?一回目にコードが走らない?なんだこれ? 05:55 2.事前準備で名前を付ける 08:12 3.1 1ページ目でランダムの数値をセットする 11:37 3.2 スライド2ページ目に移動したら、1ページ目の値をセットする 1…
…PowerPointVBA #マクロ記録 #Shapes #AddMediaObject #デバッグ .AddMediaObject は 2013で廃止され、 .AddMediaObject2 を使用する感じです。 Sub Macro4() ' ' マクロ記録日: 2022/5/18 ユーザー名: Ken3 O ' ActiveWindow.Selection.SlideRange.Shapes.AddMediaObject(FileName:="G:\0-新規プロジェクト.…
…PowerPointVBA #マクロ記録 #PageSetup #デバッグ Sub Macro3() ' ' マクロ記録日: 2022/5/18 ユーザー名: Ken3 O ' With ActivePresentation.PageSetup .SlideSize = ppSlideSizeOnScreen .FirstSlideNumber = 1 .SlideOrientation = msoOrientationVertical .NotesOrientation =…
…PowerPointVBA #マクロ記録 #Presentations #Add #デバッグ Sub Macro2() ' ' マクロ記録日: 2022/5/18 ユーザー名: Ken3 O ' Presentations.Add WithWindow:=msoTrue ActiveWindow.View.GotoSlide Index:=ActivePresentation.Slides.Add(Index:=1, Layout:=ppLayoutTitle).SlideI…
…=653#ExcelVBA #PowerPointVBA #マクロ #自動転記 #デバッグExcelからパワポにデータをセットしてみました。 Excelのソース ※パワポを開いた状態でテストしてみてください Option Explicit Sub Excelから起動済みのパワポにデータセット20220425() '起動済みのパワポを捕まえる Dim ppApp As Object Set ppApp = Nothing On Error Resume Next 'エラーが発生…
…Sub ExcelのVBAで.Speakを使用すると、簡単に読み上げが可能です Application.Speech.Speak もあって、 セル読み上げだけじゃなく、好きな言葉を読み上げることができます。MsgBoxと組み合わせてみたけど、チョット、イマイチでした。 視聴者のみなさんで、面白い使い方があったら、 ぜひコメント欄で教えてください。 youtu.be https://youtu.be/c4mH9szOo2w#ExcelVBA #Speak #読み上げ #Spee…
ken3memo.hatenablog.com ↑で使用する、メニューの名前がわからないとき、、右クリック メニューへ マクロを追加したい時、 どのメニューか?調べる時に使ってみてください。現在の設定をExcelシートへ書き出してみました。 Sub CommandBarの内容をセルに書き出す() Dim n As Integer Dim y As Integer Dim x As Integer y = 2 For n = 1 To CommandBars.Count 'いつ…
…docs/word-vba-selecting-start-documents.html から引用 ActiveDocument.Bookmarks("\StartOfDoc").Select '文字列を探す、ターゲット位置決め Selection.Find.Execute FindText:="バグ内容", Forward:=True '見つけた↑下の行に移動 ↑でFindTextが見つからなかった時の処理が入ってないや n = Selection.Move(Unit:=w…
Excel VBA UsedRange で使用範囲を取得して Rows.Count で行数 最終行は Cells(objRANGE.Rows.Count, 1).Row なんて感じで遠回りで取得してみたDim objRANGE As Range Set objRANGE = ActiveSheet.UsedRange 'セルの使用範囲を取得VBA Excel 表 範囲 で検索すると 下記のわかりやすいページがヒットしますセル範囲の取得 セル範囲の取得 http://offic…
Excel VBA CurrentRegion で含まれている範囲が取得可能です ショートカットキー操作のShift+Ctrl+:(コロン)の範囲をVBAで取得できますDim objRANGE As Range '範囲を入れるRange型 Set objRANGE = ActiveCell.CurrentRegion 'アクティブセルを含む範囲を取得VBA Excel 表 範囲 で検索すると 下記のわかりやすいページがヒットしますセル範囲の取得 セル範囲の取得 http://…
https://www.youtube.com/watch?v=Irr_9wx6CAY 標準モジュールにDCountを利用したチェック関数を追加する Option Compare Database Option Explicit '0.商品コードを受け取り '1.マスターに、受け取ったコードがあるかチェック '2.明細、履歴にダブりがあるか、チェックする '商品コードを受け取りをチェック結果をエラーならTrueで返す関数 Public Function chk商品コード(st…
VBAのプロパティやメソッドを探る時、 マクロ記録を使う方法 そんなお話をダラダラ撮った動画 youtu.be https://youtu.be/dENBobeb5lY です。プログラム作成の参考となれば幸いです。はてなの質問 q.hatena.ne.jp の回答用に作成したコードと動画です。下記、動画で記録されたコードとテストで使ったコードです Sub Macro1() ' ' マクロ記録日: 2019/11/1 ユーザー名: Ken3 O ' ActiveWindow.S…
… そんなお話です。【VBA】配列の初期化で Array関数を使用 と Split関数で配列作成、UBoundで個数の判断【三流君】 - YouTube www.youtube.com配列の初期化を行いたかったので、Array関数 を使用してみました。外見の調整とArray関数を使用して配列作成 http://www.ken3.org/asp/backno/asp014.html で、 'Array関数を使用して、評価コメントを初期化 strBOX = Array("かなり不満…
前回のライブで、テンパって マクロ記録でプロパティを調べるといいですよ・・・ と 言って、セルを部分的に太字にする、 .FontStyle = "太字"を疑問に感じながら、 紹介したけど、 やはり .Bold=Trueで太字にできました。テスト動画: https://www.youtube.com/watch?v=_SP__GgVwiY www.youtube.comいつものことながら、前置きが長い。1.まずは単純にセルに対して.Font.Bold = True Range(…
…ので、 ExcelのVBA イミディエイトやネットでxlDownの値を調べて書く? xlDown 4121 Option Explicit Dim ex, bk, sh, i Set ex = GetObject(,"Excel.Application") '開いているExcel Set bk = ex.Workbooks(1) 'ブック Set sh = bk.Worksheets(1) 'シートを指定 For i = 2 To sh.Range("A1").End(-41…
…ダグタな解説動画 【VBA IE操作】指定したYouTube動画から はてなブログ の本文を作成する そんな転記プログラム【三流君】 - YouTube www.youtube.com下記、作成したソースコードです。 Option Explicit '標準モジュールにAPI宣言を書く Declare Sub SetForegroundWindow Lib "user32" (ByVal hwnd As Long) ' https://www.moug.net/tech/acv…
単体で動作確認ができたので、 結合処理を行ってみます下記、いつもの酔っ払い解説動画です。 https://youtu.be/Ymk_TSO7dQk youtu.be結合処理中のエラー、不具合 を 面白おかしく説明しようと がんばってみましたが、 うまく料理できませんでした。失敗やエラーのシナリオなど、うまく考えないとなぁ。ただ単体のコードをつなげただけの意味ない動画ですが、 よろしくお願いします。テスト作成したコード Option Explicit Declare Sub S…
…こと手作業で説明2.VBAで作成してみるまず、セットしたい項目をあらいだす。 記事画面のページでhtmlソースを表示して 検索の周りを探して、Formを見つけます。 <form class="entry-search-form js-entry-search-form" role="search" action="/search" method="get"> <select name="category" class="js-categories-selector"> <op…
IEで表示されている編集画面の中から、 本文 テキストエリア を探して、内容を置き換える。そんな処理を探ってみたいと思います。デバッグ風景の動画 https://www.youtube.com/watch?v=qdSxWCeNa2w www.youtube.com1.表示されているIEを捕まえる URLに /edit が入っているかを条件にIEを探す2.ソースの中から、本文・テキストエリアを探る <textarea id="body" class="editor-body-t…
…owerPoint VBA 二つのスライド 次ページ処理を同時に行う方法をライブ配信で探ってみた・・・ - YouTube www.youtube.com場所と名前は、 ? Application.Presentations(1).Name プレゼンテーション1.pptm ? Application.Presentations(1).Path D:\VBA\20180222 かなぁ。スライド起動中の判断で ? application.SlideShowWindows(1).P…
…owerPoint VBA 二つのスライド 次ページ処理を同時に行う方法をライブ配信で探ってみた・・・ - YouTube www.youtube.comマクロのボタンを押すと、 立ち上がっている二つのスライド を 単純に次のページにするなら 18:32 のような処理でいいなら Sub next2() Application.SlideShowWindows(1).View.Next 'スライド1番目を次ページ Application.SlideShowWindows(2).…
…OX" NAME="VBA">VBA<br> <INPUT TYPE="CHECKBOX" NAME="24H">コンビニ系<br> <INPUT TYPE="CHECKBOX" NAME="GUCHI">愚痴系<br> <INPUT TYPE="submit" VALUE="検索する"> </FORM> <% 'ADO DB Connection オブジェクトを作成する、英文そのままじゃん Set db=Server.CreateObject("ADODB.Connecti…
…on value="VBA">VBAのコメント</option> <option value="GUCHI">愚痴系</option> <option value="24H">24Hコンビニ</option> </SELECT> <INPUT TYPE="submit" VALUE="検索する"> </FORM> <% 'ADO DB Connection オブジェクトを作成する、英文そのままじゃん Set db=Server.CreateObject("ADODB.Conn…
…T_X + objCELL.colSpan 'カラム分 横に移動 Next SET_Y = SET_Y + 1 Next 小細工の解説は、動画を見てください ぉぃぉぃ・・・ 単勝表の取り込み バグ修正 VBA IE操作 JRA Ken3 ライブ プログラミング テスト中 です・・・ - YouTube www.youtube.com 積み残し 問題点 この処置だと、まだまだで 8枠18番みたいに、ひと枠に3頭 馬が入るとまだまだエラーになるかなまだまだ、先が長いですね。。。。