Home » パワーポイントマクロ・PowerPoint VBAの使い方 » 表・テーブル » PowerPoint VBAで表内文字列を上下中央に

PowerPoint VBAで表内文字列を上下中央に

動作検証バージョン:Windows版PowerPoint(バージョン1907 ビルド11901.20218)

「PowerPoint VBA Table 文字列 上下中央揃え」
という検索キーワードで、このサイト『インストラクターのネタ帳』へアクセスがありました。

表内文字列を(左右の)中央揃えにするPowerPointマクロを既にご紹介しています。

[スポンサードリンク]

表内文字列をすべて上下中央揃えにするサンプル

上下中央揃えにする場合は、以下のようなコードです。


Sub 表内文字列をすべて上下中央揃えにする()
 With ActivePresentation.Slides(1).Shapes(2).Table
  Dim r As Long, c As Long
  For r = 1 To .Rows.Count
   For c = 1 To .Columns.Count

    .Cell(r, c).Shape.TextFrame _
      .VerticalAnchor = msoAnchorMiddle

   Next c
  Next r

 End With
End Sub

上記のSubプロシージャを実行すると、アクティブプレゼンテーション先頭スライドの、2つ目のShape内に存在する表の、全文字列が上下中央揃えになります。

上下方向はTextFrame.VerticalAnchor

上記のSubプロシージャのとおり上下方向の配置は、TextFrameオブジェクトのVerticalAnchorプロパティで取得・設定できます。

MsoVerticalAnchor列挙型として定義されているmsoAnchorMiddle(実際の値は3)を指定すれば、

上下中央になります。

[スポンサードリンク]

Home » パワーポイントマクロ・PowerPoint VBAの使い方 » 表・テーブル » PowerPoint VBAで表内文字列を上下中央に

TrackBack:0

TrackBack URL

Home » パワーポイントマクロ・PowerPoint VBAの使い方 » 表・テーブル » PowerPoint VBAで表内文字列を上下中央に

「表・テーブル」の記事一覧

検索


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

.