excel - 将新标签页复制并粘贴到 MSForms.Page

Question

我在 Excel 中有一个带有 MultiPage 对象的用户窗体。我需要通过复制和粘贴现有标签页之一动态地将更多标签页添加到 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

快照