タブストリップにページを追加

タブを追加するには、Addメソッドを使います。

最終ページを指定するには、Valueプロパティに、Countで取得した総ページから-1した値をセットします。
タブの名前はコマンドボタン等と同様に、Captionプロパティにセットします。

実行画面

追加する前のタブストリップを配置したフォーム
タブストリップ使用サンプルソフト

タブストリップに新しいページを追加し、名前を変更しています。
タブ名変更ソフト

実行VBAコード

Option Explicit

Private Sub CommandButton1_Click()

    'タブの追加
    TabStrip1.Tabs.Add
    '最終ページを開く
    TabStrip1.Value = TabStrip1.Count - 1
    'タブのタイトルを変更
    TabStrip1.SelectedItem.Caption = "新しく追加したタブ"

End Sub

Homeに戻る > ExcelコントロールTipsへ

■■■
このサイトの内容を利用して発生した、いかなる問題にも一切責任は負いませんのでご了承下さい
■■■
当ホームページに掲載されているあらゆる内容の無許可転載・転用を禁止します