(license)みなさん、こんにちは!タカハシ(@ntakahashi0505)です。VBA入門編ということで、図形やテキストボックスのフォントを変更するマクロの作り方をお伝えしています。前回の記事はこちらです。VBAのシリーズとして、全てのシェイプについてフォントを変更するマクロの作成を目指しています。今回はフォントを設定するFontオブジェクトを取得する方法をお伝えします。tonari-it.com2018.09.09Shapeオブジェクトのフォント設定をするFontオブジェクトの取得についてお伝えしました。VBAでテキストのフォントを変更するいろいろなプロパティまとめをお伝えします。前回のおさらい題材としているプレゼンテーションはこちら。それで、前回作成したコードがコチラですね。Sub1ページ目のスライドの各Shapeオブジェクトについて、Fontオブジェクトを取得してそのフォント名を表示するというものですね。あとは設定していくだけ...!5行目で紹介しているNameプロパティ含めて、フォントを設定するいろいろなプロパティを紹介していきます。VBAで設定できるFontオブジェクトの主なプロパティまとめフォント名まず、真っ先にShapeオブジェクトのフォントの種類を変更したいのですが、PowerPointでは英数字用のフォント日本語用のフォントの二種類のフォント種類を設定できます。いうか、両方の設定を念頭に置いておかないといけません。以下の「フォント」ダイアログを見てみればわかりますよね。英数字用のフォントを変更するにはNameプロパティ、日本語用のフォントを変更するにはNameFarEastプロパティを使います。Fontオブジェクト.NameFontオブジェクト.NameFarEastフォントのスタイル強調、イタリック、アンダーライン、影付き、エンボスなど、フォントのスタイルを変更するには、以下のプロパティで設定します。msoTriStateで列挙されている値を設定します。0msoTrueまたは-1を設定すれば各スタイルが「有効」になりますし、msoFalseまたは0を設定すれば「無効」になります。フォントのサイズフォントのサイズを設定するにはSizeプロパティを使います。Fontオブジェクト.SizeSizeプロパティに設定する値として、ポイントを表す整数を代入すればOKです。フォント色フォントの色を設定するにはColorプロパティを設定します。Fontオブジェクト.Color色の設定としては、RGB関数を使うのが一般的でしょう。RGB関数の書式は以下の通りです。blue)red,green,blueの値を0から255の間の整数で指定することで、色を表現します。シェイプのフォントを設定するプロシージャ以上を踏まえて、1ページのスライドについて、フォントを設定するプロシージャを作成しました。shp実行すると1ページ目のスライドの各シェイプのテキストのフォントを、以下のように設定することができます。実行結果はこちらです。うまくフォントの設定を変更できていますね。Withステートメントでオブジェクトを省略するちょっと補足しておきますね。5~9行目ですが、Withステートメントという構文を使っています。書式は以下の通りです。Withに挟まれた部分(Withブロックといいます)では、指定したオブジェクトの表記を省略できるというものです。そのオブジェクトに対するメソッドやプロパティは、Withブロック内ではピリオドから書き始めることができます。今回の例では「shp.TextFrame.TextRange.Font」を省略しています。省略したほうが良いです。VBAでシェイプのフォント設定をする色々なプロパティまとめについてお伝えしました。今回のプロシージャでは、1枚目のスライドしか対象にならないので、全部のスライドに対応させたいですよね。次回は、その点について解説を進めていきます。VBA初心者向けに、プレゼンテーションの全ての描画オブジェクトのフォントを変更するマクロをお伝えしています。Each文とFor文のループの作り方、またその使い分けについてです。VBAのはじめの一歩PowerPointはお仕事で非常によく使うプレゼンテーション作成ソフトですよね。実は、PowerPointでもVBAでプログラミングができるんです。VBAの初め方についてお伝えしていきます。プランノーツ代表、コミュニティ「ノンプロ研」主宰。ITで日本の『働く』の価値を上げる!」をテーマに、VBA&GASの開発、講師、執筆などをしております。→詳しいプロフィールはコチラ★ご依頼・ご相談はお気軽にどうぞ!→お問い合わせはコチラ★フォロー頂ければ嬉しいです。「コミュニティ+講座」形式で継続性&教え合える環境も提供。!ノンプログラマーがプログラミングスキルを身に着ける支援ををするコミュニティ。セミナー・もくもく会・Facebookグループのサポートで「自らで学び続ける力をつける」支援、「教え合うことで学びの価値を上げる」場の提供をしています。関連記事Excel・VBA活用術Word、Excel、PowerPointのデフォルトフォントを変更する方法Office2016からデフォルトフォントになった「游ゴシック」が非常に見づらい...ということでWord、Excel、PowerPointのデフォルトフォントをそれぞれ変更する方法をお伝えしています。簡単!エクセルVBAでシート上のグラフをコピーしてPowerPointにペーストするエクセルVBAでPowerPointを操作する方法についてお伝えしています。今回はエクセルVBAでエクセル上のグラフをコピーしてPowerPointにペーストをする方法です。2016.10.17Excel・VBA活用術エクセルVBAでグラフのデータ範囲を変更しながらPowerPointに連続して貼り付けるエクセルVBAでPowerPointを操作する方法についてお伝えしています。今回はエクセル上のグラフのデータ範囲を変更しながら次々にPowerPointに貼り付けていくプログラムについて紹介をします。VBAで選択している部分を操作するマクロの作り方をお伝えしています。今回は、ShapeRangeオブジェクトつまり選択しているシェイプのフォントを変更するマクロの作り方についてです。2018.09.30Excel・VBA活用術エクセルVBAでPowerPointのプレゼンテーションを開く方法・スライドを取得する方法エクセルVBAでPowerPointを操作する方法をシリーズでお伝えしています。今回は特定のPowerPointプレゼンテーションファイルを開くプログラムおよびスライドを取得するプログラムです。2016.08.25Excel・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をコピーしました。