Home » パワーポイントマクロ・PowerPoint VBAの使い方 » プレースホルダー » タイトルの一文字目だけ・先頭の最初の文字だけ大きくするパワポマクロ

タイトルの一文字目だけ・先頭の最初の文字だけ大きくするパワポマクロ

対象:PowerPoint2003, PowerPoint2007, PowerPoint2010

「パワポ タイトルの最初の文字だけ大きくする」
という検索が行われていました。

PowerPointでタイトルの最初の文字・先頭の一文字だけを大きくする方法を探している方による検索です。

[スポンサードリンク]

タイトルプレースホルダの一文字目を大きくするサンプルマクロ

ここで「タイトル」と表現されているのが、タイトルスライドなのか、タイトルプレースホルダなのかはっきりしませんが、タイトルプレースホルダの一文字目だけを大きくするマクロを作成してみました。


Sub タイトルプレースホルダの一文字目だけ大きくする()

 Dim sld As Slide

 For Each sld In ActivePresentation.Slides
 With sld.Shapes

  If .HasTitle Then
   .Title.TextFrame.TextRange _
     .Characters(Start:=1, Length:=1).Font.Size = 72
  End If

 End With
 Next

End Sub

上記のマクロを実行すると、アクティブなプレゼンテーションファイルの全スライドのタイトルプレースホルダの一文字目だけが72ptに設定されます。

サンプルマクロの解説

アクティブなプレゼンテーションファイルの全スライドをFor Each~Nextループで回して、
 For Each sld In ActivePresentation.Slides

もしタイトルプレースホルダがあったら
 With sld.Shapes
  If .HasTitle Then

タイトルの1文字のフォントを72ptに
   .Title.TextFrame.TextRange _
     .Characters(Start:=1, Length:=1).Font.Size = 72
設定しています。

関連語句
VBA, Visual Basic for Applications
[スポンサードリンク]

Home » パワーポイントマクロ・PowerPoint VBAの使い方 » プレースホルダー » タイトルの一文字目だけ・先頭の最初の文字だけ大きくするパワポマクロ

TrackBack:0

TrackBack URL

Home » パワーポイントマクロ・PowerPoint VBAの使い方 » プレースホルダー » タイトルの一文字目だけ・先頭の最初の文字だけ大きくするパワポマクロ

「プレースホルダー」の記事一覧

検索


Copyright © インストラクターのネタ帳 All Rights Reserved.

.