文字列を縮小して全体を表示(ShrinkToFit プロパティ)
ShrinkToFit プロパティ
ShrinkToFit プロパティは、セルに表示されている値がセル幅を超えている場合に、セル幅に収まるように自動的に文字を縮小して表示するかどうかを設定します。
設定値が True の場合に、セルの値は縮小表示されます。
<取得>
rsult = object.ShrinkToFit
<設定>
object.ShrinkToFit = boolean
引数・戻り値
- object ・・・ 対象となる Range オブジェクトを指定します。
- boolean ・・・ セル幅に合わせて自動的に縮小表示させる場合は、True、そうでない場合は、False を指定します。
- result ・・・ 指定されたセル範囲内のすべてのセルで文字が自動的に縮小表示される設定になっている場合は True となります。指定されたセル範囲内のすべてのセルで縮小表示設定になっていない場合は False を返します。指定されたセル範囲内に縮小表示設定とそうでない設定が混在する場合は Null を返します。
WrapText プロパティ(折り返して全体を表示する設定)が、True になっている場合は、ShrinkToFit プロパティを True にしても WrapText プロパティの方が優先されます。
ShrinkToFit プロパティ 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
Sub Sample_ShrinkToFit() Range("B2").Value = "あいうえおかきくけこ" Range("B7").Value = "たちつてとなにぬねの" 'セル「B2」の「ShrinkToFit プロパティ」を「True」にする Range("B2").ShrinkToFit = True 'セル「B8」の「ShrinkToFit プロパティ」と '「WrapText プロパティ」の両方を「True」にする Range("B7").ShrinkToFit = True Range("B7").WrapText = True End Sub |
実行結果
関連記事
-
-
使用中のセル範囲を取得(UsedRange プロパティ)
UsedRange プロパティ UsedRange プロパティは、指定したワーク …
-
-
配列数式を取得または設定する(FormulaArray プロパティ)
FormulaArray プロパティ FormulaArray プロパティは、対 …
-
-
セルを挿入する(Insert メソッド)
Insert メソッド Insert メソッドで、指定した場所に新規の空白セルを …
-
-
セルの特定の要素のみをペーストする(PasteSpecial メソッド)
PasteSpecial メソッド PasteSpecial メソッドは、Cop …
-
-
セルを削除する(Delete メソッド)
Delete メソッド Delete メソッドで、指定したセル・セル範囲を削除し …
-
-
セル・セル範囲をコピーする(Copy メソッド)
Copy メソッド Copy メソッドは、セル範囲をコピーし、指定したセル範囲に …
-
-
フリガナ(Phonetics プロパティ)
Phonetics プロパティ Phonetics コレクションを返します。値の …
-
-
文字の向きを表す値を取得・設定する(Orientation プロパティ)
Orientation プロパティ Orientation プロパティで、文字列 …
-
-
直前のセル・直後のセルを参照する(Previous プロパティ・Next プロパティ)
Previous プロパティ・Next プロパティ Previous プロパティ …
-
-
対象のセル・セル範囲に数式があるかどうか調べる(HasFormula プロパティ)
HasFormula プロパティ HasFormula プロパティは、対象のセル …
