(license)みなさん、こんにちは!タカハシ(@ntakahashi0505)です。VBAの入門シリーズとして、図形やテキストボックスのフォントを変えるマクロの作成を目指しています。VBAの入門シリーズをお送りしています。VBAでプレゼンテーションのスライドを取得する方法、コレクションとは何かについてお伝えします。tonari-it.com2018.09.06スライドオブジェクトを取得する方法をお伝えしました。Presentationオブジェクト→Slideオブジェクト...と来ましたので、次はいよいよ図形やテキストボックスなどの描画オブジェクトを表すShapeオブジェクトですね。VBAでShapeオブジェクトを取得する方法です。Each文でループを回す方法を使いますよ。前回までのおさらい以下のプレゼンテーションを題材として使用します。2枚のスライドがありますが、両方のスライドに配置してある、全ての図形、テキストボックスについて、そのフォントを変更するマクロを目指していきます。前回までで、以下のようにSlideオブジェクトの取得まではできるようになりました。Sub今回は描画オブジェクト、つまりShapeオブジェクトの取得を目指していきます。VBAでは図形、オートシェイプ、テキストボックス、図など、スライドに配置する描画オブジェクトは、全てShapeオブジェクトとして取り扱うことができます。当然ながら、スライド上には複数のShapeオブジェクトが存在する可能性がありますので、まずはShapesコレクションとして取得する必要があります。Shapesコレクションを取得するSlideオブジェクトからShapesコレクションを取得するには、Shapesプロパティを使います。Slideオブジェクト.Shapes例えば、以下のプロシージャを前述のプレゼンテーションについて実行をすると、イミディエイトウィンドウに「6」と表示されます。SubCountプロパティはShapesコレクションの要素数を取得するものです。Shapesコレクション.CountShapesコレクションからShapeオブジェクトを取得するこれでShapesコレクションが取得できたので、その中からShapeオブジェクトを特定してみましょう!...って、どうするんですかね?前回の記事でコレクションからオブジェクトを取得するには、インデックスか名前かを使うとお伝えしたのですが、どちらもわかりません...Shapeコレクションについてループを回すそんなときには、コレクションに含まれる全てのShapeオブジェクトについてループを回すという方法があります。Each文という構文があります。変数まず、コレクションからオブジェクトを一つ取り出して、それを変数にセットします。変数というのは、値やオブジェクトを入れることができるものです。Eachブロックといいます)で、そのオブジェクトを指し示すものとして利用できます。Eachブロックの処理が終われば、また別のオブジェクトを変数にセットして、ブロック内の処理をします。このようにコレクションから全てのオブジェクトを取り出し終わるまで繰り返します。Each文を実際に使ってみましょう。以下のプロシージャを作成して実行してみます。Subすると、イミディエイトウィンドウに以下のように出力がされます。NameプロパティはShapeオブジェクトの名前を取得するものです。Shapeオブジェクト.NameShapeオブジェクトの名前も、Slideオブジェクトのそれと同様、PowerPointが内部的に決めているもので、外側からは把握することができません。今回のようなマクロを実行して調べる、ということはよくやります。変数の宣言コードの3行目ですが、変数の宣言を行っています。先ほどもお伝えしましたが、変数とは、値やオブジェクトを入れることができるものです。Each文内では「shp」という変数を使用しています。こちらの記事でお伝えした通り、「変数の宣言を強制する」ようにしましたので、「これからこの変数を、このタイプで使うよ」という宣言が必要なのです。変数の宣言はDimステートメントで行います。型なお、変数名は基本的に好きに決めることができます。日本語も使えますが、一般的にはアルファベットを使うことが多いです。VBAでShapeコレクションについてループを回す方法をお伝えしました。これで、Shapeオブジェクトも取得して操作をすることができるようになりました。次は、Shapeオブジェクトからテキストを取得する方法を見ていきます。VBAのシリーズとして、図形やテキストオブジェクトのフォントを変更するマクロを作成する方法をお伝えしています。今回は、Shapeオブジェクトのテキストを取得する方法です。VBAのはじめの一歩PowerPointはお仕事で非常によく使うプレゼンテーション作成ソフトですよね。実は、PowerPointでもVBAでプログラミングができるんです。VBAの初め方についてお伝えしていきます。プランノーツ代表、コミュニティ「ノンプロ研」主宰。ITで日本の『働く』の価値を上げる!」をテーマに、VBA&GASの開発、講師、執筆などをしております。→詳しいプロフィールはコチラ★ご依頼・ご相談はお気軽にどうぞ!→お問い合わせはコチラ★フォロー頂ければ嬉しいです。「コミュニティ+講座」形式で継続性&教え合える環境も提供。!ノンプログラマーがプログラミングスキルを身に着ける支援ををするコミュニティ。セミナー・もくもく会・Facebookグループのサポートで「自らで学び続ける力をつける」支援、「教え合うことで学びの価値を上げる」場の提供をしています。VBA初心者向けに、プレゼンテーションの全ての描画オブジェクトのフォントを変更するマクロをお伝えしています。Each文とFor文のループの作り方、またその使い分けについてです。2018.09.11Excel・VBA活用術エクセルVBAでPowerPointの特定のシェイプのインデックス番号を調べる方法エクセルVBAでPowerPointを操作する方法についてシリーズでお伝えしています。PowerPintのシェイプを操作するにはインデックス番号が必要ですので、それを調べる方法についてお伝えをします。2016.09.14Excel・VBA活用術エクセルVBAでPowerPointでタイトルを変更しながらスライドを大量に生成するエクセルVBAでPowerPointを操作する方法についてお伝えしています。今回はエクセルVBAでPowerPointスライドをスライドタイトルを変更しながら複製する方法についてお伝えします。2016.09.22Excel・VBA活用術エクセルVBAでPowerPointのプレゼンテーションを開く方法・スライドを取得する方法エクセルVBAでPowerPointを操作する方法をシリーズでお伝えしています。今回は特定のPowerPointプレゼンテーションファイルを開くプログラムおよびスライドを取得するプログラムです。VBAのシリーズとして、全てのシェイプについてフォントを変更するマクロの作成を目指しています。今回はフォントを設定するFontオブジェクトを取得する方法をお伝えします。2018.09.09Excel・VBA活用術エクセルVBAでPowerPointを操作するための準備と最も簡単なプログラムエクセルVBAでPowerPointを操作するシリーズ、第一回目です。エクセルVBAでPowerPointを操作をすべく最初の一歩としてパワポを開いて閉じるだけの簡単なプログラムを紹介します。「コミュニティ+講座」形式で継続性&教え合える環境も提供。詳細・お申込はこちら隣ITを応援する当ブログを「応援したい!」「役に立ったよ!」というお気持ちを、コチラからお支払いただくことができます。日々更新の活力倍増いたします。※PayPalアカウントが必要です。※金額は変更可能です。Platform23HTML・CSS32iPhone・アプリ29Monaca・スマホアプリ開発7PC全般・Windows86PowerPoint・VBA28Python87RPA1VBScript15Vue.js・JavaScript13WEBサービス・クラウド68WordPress・ブログ88Word・VBA42コミュニティ・イベント109セミナーのお知らせ11チャットワーク72データ分析・アクセス解析40仕事・生産性・働き方73動画配信8商業出版21起業・フリーランス72電子書籍・Kindle3運営会社プランノーツは"IT×働き方改革"をお手伝いする会社です。「コミュニティ+講座」形式で継続性&教え合える環境も提供。詳細・お申込はこちら隣ITを応援する当ブログを「応援したい!」「役に立ったよ!」というお気持ちを、コチラからお支払いただくことができます。日々更新の活力倍増いたします。※PayPalアカウントが必要です。※金額は変更可能です。Platform23HTML・CSS32iPhone・アプリ29Monaca・スマホアプリ開発7PC全般・Windows86PowerPoint・VBA28Python87RPA1VBScript15Vue.js・JavaScript13WEBサービス・クラウド68WordPress・ブログ88Word・VBA42コミュニティ・イベント109セミナーのお知らせ11チャットワーク72データ分析・アクセス解析40仕事・生産性・働き方73動画配信8商業出版21起業・フリーランス72電子書籍・Kindle3運営会社プランノーツは"IT×働き方改革"をお手伝いする会社です。Scriptが「V8ランタイム」をサポート!モダンなECMAScript構文が使えるようになった2020.02.072020.02.08GASでコピーしたGoogleスライドのプレゼンテーションを取得する方法2020.02.052020.02.05Facebookページいつも隣にitのお仕事タイトルとURLをコピーしました。