Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

文字列を縮小して全体を表示（ShrinkToFit プロパティ）

2015/07/25

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ソース

　
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

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

　

実行結果

- セルの操作 Range オブジェクト, ShrinkToFit プロパティ, VBA基本, エクセルVBA, セルの操作

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: A1 形式と R1C1 形式を変換、相対参照と絶対参照を変換（ConvertFormula)

ConvertFormula メソッド数式で参照しているアドレスの相対参照と絶 …

: 入力規則（エラーメッセージの設定）Validation オブジェクト

無効値を入力時に、エラーメッセージの表示 Validation.ShowErro …

: VBA で、ワークシート関数を使用（WorksheetFunction プロパティ）

VBA で、ワークシと関数を使用 VBA から、ワークシート関数を呼び出す場合、 …

: フリガナ（Phonetics プロパティ）

Phonetics プロパティ Phonetics コレクションを返します。値の …

: オートフィルタの設定と解除（AutoFilter メソッド）

AutoFilter メソッドオートフィルタを設定する場合、AutoFilte …

: 入力規則（リストで制限する）Validation.Add メソッド

ドロップダウンリストで入力値を制限 Validation.Add メソッド（また …

: 対象のセルが配列数式の一部かどうか（HasArray プロパティ）

HasArray プロパティ HasArray プロパティは、対象のセルが配列数 …

: フリガナの取得（GetPhonetic メソッド）

GetPhonetic メソッド GetPhonetic メソッドは、指定した文 …

: 使用中のセル範囲を取得（UsedRange プロパティ）

UsedRange プロパティ UsedRange プロパティは、指定したワーク …

: 数式を設定・取得する（Formula プロパティ・FormulaR1C1 プロパティ）

Formula プロパティ（FormulaR1C1 プロパティ） Formula …

PREV: 文字列をセル幅で折り返す（WrapText プロパティ）
NEXT: 罫線の設定（Borders プロパティ）