Excel ユーザーフォームのテキストボックスのフォントを変更する-Font

Excelで、ユーザーフォームテキストボックスフォントを変更する記録です。

下図はExcel2016です。

< スポンサーリンク >





ユーザーフォームのテキストボックスのフォントをプロパティで設定

ユーザーフォームのテキストボックスをアクティブにし、プロパティウィンドウのボタンをクリックします。

Excelユーザーフォームテキストボックスフォント

 

プロパティウィンドウの「Font」欄の「…」ボタンをクリックします。

Excelユーザーフォームテキストボックスフォント

 

フォント名や斜体、太字、フォントサイズなどを設定し、[OK]をクリックします。

Excelユーザーフォームテキストボックスフォント

 

ユーザーフォームを実行すると反映されています。

Excelユーザーフォームテキストボックスフォント

 

ユーザーフォームのテキストボックスのフォントをVBAで設定

VBAで設定するには、Initializeイベントを使ってみます。

ユーザーフォームをダブルクリックします。

Excelユーザーフォームテキストボックスフォント

 

右側のプロシージャボックスで「Initialize」を選択します。

Excelユーザーフォームテキストボックスフォント

 

テキストボックスのフォントサイズを20ポイントにしてみます。

Private Sub UserForm_Initialize()
    TextBox1.Font.Size = 20
End Sub

Excelユーザーフォームテキストボックスフォント

 

ユーザーフォームを実行すると、テキストボックスのフォントが20ポイントになっています。

Excelユーザーフォームテキストボックスフォント

 

< スポンサーリンク >※広告先のお問い合わせは広告主様にお願いします