Question

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

我目前唯一的代码是：

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

正如您所看到的，我甚至不知道如何将第一个页面转换为Page类型的变量 - 因此很难知道如何开始。

任何有关如何向页面添加新复选框的指示都将非常受欢迎。我真的很难找到合适的文件，真的，现阶段的任何事情都会有所帮助。

由于

Answer 1

您需要指定MSForms.Page以便不会出现类型不匹配（Excel也有Page个对象），您可以在添加页面时设置变量：

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

VBA Excel动态表单创建

1 个答案: