Square Beat Engine

Blog for variety of things…

MS-Office

[PowerPoint VBA] テーブルの各行の高さを揃える

投稿日:2015-08-26 更新日:

パワーポイントのテーブルには、「高さを揃える」という機能があるが、VBAにはそれに該当するメソッドが存在しない。
そこで、以下のプロシージャを自作した。

コード

解説

たいしたことは行っていない。
シェイプ全体の高さを行数で割って、1行あたりの高さを算出。
それを繰り返し処理で全行に適用している。

なお、この処理は呼び出し元が限定されていることもあり、エラー処理を入れていない。
引数がShape型なので、テーブルを保持していないShapeが引き渡された場合のエラー処理を入れた方がよい。
HasTableメソッドが役立つはずだ。

お願い

今回はメソッドが存在しないので自作したが、もしかしたら存在するかもしれない。
もしメソッドをご存じの方がいらっしゃれば、教えてくださると大変ありがたいです。

以上!

-MS-Office

執筆者:


comment

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

関連記事

[VBA] ユーザー定義型の使い方

VBAでは、自分で型を定義することができる。 異なる値をひとまとめに扱いたいときに使うと、取り扱いがぐっと楽になる。 ユーザー定義型の構文 宣言部分(モジュール内の冒頭、Optionalのすぐ後)に、 …

[Excel][VBA] ワークブック・ワークシートを明確に指定

前々回・前回に引き続き、セルに文字列を記入するときのコードについて考えてみます。 今回は、ワークブック・ワークシートを明確に指定する必要性を検討します。 なぜ指定するのか セルの操作をする際、ワークシ …

[Excel][VBA] エクセルVBAではValueプロパティを指定しよう

前回は、自動記録マクロの問題点を3つ挙げ、1つめのSelectメソッドの無駄を指摘しました。 今回は、2つめのFormulaR1C1プロパティについて考えます。 プロパティの指定 FormulaR1C …

[Excel][VBA] クリップボードを経由しないコピーを勧める理由

自分の作ったエクセルマクロには、クリップボード経由のコピーは皆無だ。 その理由はいたってシンプルだ。 クリップボードを使わない理由 自分がマクロでクリップボードを使わない理由はたった1つ。 「ほかの作 …

[PowerPoint][VBA] パワーポイントのテキストボックスへ値をコピーする方法

パワーポイントのテキストボックスへ値をコピーする方法。 単に値を記入するだけではなく、数値がプラス・マイナスの場合に応じて色をつける処理を挿入してある。 コード [crayon-5c920cf3697 …