VBA Exceldynamic表单创build

问题：我有一个我在Excel中创build的表单（开发人员模式）。 表单上有一个MutliPage控件。 我可以使用VBA添加一个dynamic的添加新页面到多页面控件。 我不知道如何添加任何内容到我刚刚创build的这个页面上 – 例如添加一个新的checkbox，标签等。

我目前唯一的代码是：

DataQueryForm.DimensionTabs.Pages.Add "MyName", "My Caption" Dim currentPage As Page Set currentPage = DataQueryForm.DimensionTabs.Pages(0) 'this line fails 

正如你所看到的，我甚至不知道如何把第一页变成页面types的variables – 所以很难知道如何开始。

任何指针如何添加新的checkbox到页面将不胜感激。 我真的很努力地find这样的体面的文件，真的，在这个阶段的任何事情都会有所帮助。

谢谢

Answer 1

您需要指定MSForms.Page以便您不会遇到types不匹配（Excel也有一个Page对象），您可以在添加页面时设置该variables：

 Dim currentPage As MSForms.Page Set currentPage = DataQueryForm.Dimensiontabs.Pages.Add("MyName", "My Caption")