单词:从多页用户表单中删除页面

时间:2013-01-10 10:53:22

标签: vba word-vba

我想,根据用户之前的选择,只需看一些标签即可。

一旦我是VBA的新手,我开始显示所有标签,并在用户选择之后,我删除了我不想要的标签。为此我正在使用这行代码

MultiPage1.Pages.Remove "name of the tab"

问题是,如果我没有相同的CAPTION和标签的NAME字段,则不会删除标签。

如果有人为此或其他人提供不同的解决方案而无需更改同名NAME字段的标题,我将非常感激。

由于

2 个答案:

答案 0 :(得分:0)

您可以在“属性”窗口中为多页控件的页面指定与标题不同的名称。您可以从“查看”菜单访问它。

Screenshot of Properties Window

我已将黄色控件的名称和aqua中的标题高亮显示。

答案 1 :(得分:0)

如果字幕是唯一的,您可以使用Select Case语句根据标题获取名称。用户实际上是在输入他们想要的标签的标题,还是从复选框中选择?在任何一种情况下,标题都必须是唯一的,所以你可以这样做:

Select Case True
   Case Check1.Value
      MultiPage1.Pages.Remove Pages("kp").Index

   Case Check2.Value
      MultiPage1.Pages.Remove Pages("jp").Index
End Select

这有点粗糙,但这是一般的想法吗?