構文
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プロパティを使用する場合は、該当のセルに対して文字サイズを設定します。
コメント