構文
Range.Size
Size・・・セルのフォントサイズを取得/設定
Rangeオブジェクトの FontのSize プロパティでフォントサイズを取得/反映します。
シート内のフォントを統一し、見やすくする場合などに設定します。
Font.Sizeプロパティのサンプルコード
Public Sub sample()
'■セルA1のフォントサイズを「10.5」ポイントにする
Range("A1").Font.Size = 10.5
'■セルA1を含む表に対して、フォントサイズを「15」ポイントにする
Range("A1").CurrentRegion.Font.Size = 15
'■セルB1に対して、フォントサイズを「12」ポイントにする（変数で反映）
Dim tmp As Long: tmp = 12
Range("B1").Font.Size = tmp
'■シート全体のフォントサイズを「10」ポイントにする
Cells.Font.Size = 10
'■セルA1のフォントを取得する
Debug.Print Range("A1").Font.Size '10
End Sub
注意点
- Excelの標準のフォントサイズを取得や設定する場合はStandardFontSizeプロパティを使用します。
- あくまでもFont.Sizeプロパティを使用する場合は、該当のセルに対して文字サイズを設定します。
コメント