OfficeType

VBA~ユーザーフォームのマルチページの文字列を変更しよう~Excel

ユーザーフォームのマルチページのタブの文字列はデフォルトではPage番号ですが文字列を変更したい場合はCaptionプロパティを設定します。

書き方

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

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

UserForm1というユーザーフォームを作成し、MultiPage1というマルチページを設定した場合、下のコードを実行するとマルチページの各タブの文字列が変更されます。

Sub test1()

Load UserForm1
UserForm1.MultiPage1.Page1.Caption = "月"
UserForm1.MultiPage1.Page2.Caption = "火"
UserForm1.Show

End Sub

image-01