excel - 新しいタブページをコピーしてMSForms.Pageに貼り付けます

Question

MultiPageオブジェクトを含むExcelのユーザーフォームがあります。既存のタブページの1つをコピーして貼り付けることにより、MultiPageオブジェクトにさらにタブページを動的に追加する必要があります。どんな助けでもいただければ幸いです。

ありがとうございました

Answer 1

このコードを使用してこれを行うことができます

Option Explicit

Private Sub CommandButton1_Click()

    '~~> Change 1 to the respective page index which you want to replicate
    MultiPage1.Pages(1).Controls.Copy

    '~~> Add a New page
    MultiPage1.Pages.Add

    '~~> Paste the copied controls
    MultiPage1.Pages(MultiPage1.Pages.Count - 1).Paste

End Sub

スナップショット