Excel ユーザーフォームのコマンドボタンの文字の大きさを変更する

Excelで、ユーザーフォームのコマンドボタンの文字の大きさを変更する記録です。

下図はExcel2016です。

Excelユーザーフォームボタン文字サイズ

 

< スポンサーリンク >

 

プロパティで設定

コマンドボタンの文字の大きさを16ポイントにしてみます。

VBE上でコマンドボタンをアクティブにし、プロパティウィンドウのボタンをクリックします。

Excelユーザーフォームボタン文字サイズ

 

プロパティウィンドウの[Font]欄の[...]をクリックします。

Excelユーザーフォームボタン文字サイズ

 

フォントサイズを16ポイントを選択し、[OK]をクリックします。

Excelユーザーフォームボタン文字サイズ

 

ユーザーフォームを実行すると、コマンドボタンの文字が16ポイントになっています。

Excelユーザーフォームボタン文字サイズ

 

VBAで設定

Initializeイベントを使って、コマンドボタンの文字の大きさを20ポイントにしてみます。

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

Excelユーザーフォームボタン文字サイズ

 

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

Excelユーザーフォームボタン文字サイズ

 

コマンドボタンの文字サイズを20ポイントに設定するコードです。

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

Excelユーザーフォームボタン文字サイズ

 

ユーザーフォームを実行すると、コマンドボタンの文字が20ポイントになっています。

Excelユーザーフォームボタン文字サイズ

 

< スポンサーリンク >



サブコンテンツ

このページの先頭へ