VBA～ユーザーフォームのコマンドボタンの文字を変更しよう～Excel

ユーザーフォームのコマンドボタンはデフォルトではCommandButtonですが文字列を変更したい場合はCaptionプロパティを設定します。

書き方

オブジェクト名.Caption = "文字列"

初期値が文字列の場合は"(ダブルクォーテーション)で囲んでください。

オブジェクト名はユーザーフォームのオブジェクト名と、コマンドボタンのオブジェクト名を指定します。オブジェクト名の確認方法は作成したユーザーフォームファイルをクリックするとユーザーフォームが表示されます。ユーザーフォーム全体を選択するとプロパティウィンドウにオブジェクト名という項目があるので、それがユーザーフォームのオブジェクト名になります。次にコマンドボタンを選択すると同じようにコマンドボタンのオブジェクト名が確認できます。プロパティウィンドウが表示されていない場合はメニューの表示からプロパティウィンドウをクリックすると表示されます。

UserForm1というユーザーフォームを作成し、CommandButton1というコマンドボタンを設定した場合、下のコードを実行するとコマンドボタンの文字列がOKに設定されます。

Sub test1()

Load UserForm1
UserForm1.CommandButton1.Caption = "OK"
UserForm1.Show

End Sub

プロパティウィンドウで設定

作成したユーザーフォームのファイルをクリックしプロパティウィンドウの選択欄からコマンドボタンを選択します。プロパティウィンドウにCaptionの項目があるので、文字列を入力すると設定されます。

直接入力

作成したユーザーフォームのファイルをクリックするとユーザーフォームが表示されます。コマンドボタンを選択してからもう一度クリックすると入力カーソルが表示されるので文字列を入力できます。