Excel 2010 VBA 入门 133 利用窗体制作向导系统

目录

题

码

多页（MultiPage）控件

多页控件的页面

使用代码更改当前显示的页面

Application.SheetsInNewWorkbook属性

---

题

使用一个向导创建工作簿，创建向导的步骤分为三步：第1步，输入工作表的数量；第2步，指定路径；第3步，确认信息并执行创建。

码

        在窗体中添加一个具有3个页面的多页（MultiPage）控件，在3个页面中分别添加与创建向导的步骤中相关的控件。在页面1和页面2中添加“上一步”和“下一步”按钮，并为其编写代码实现页面切换。

步骤1  按组合键【Alt+F11】打开VBE。
步骤2  选择菜单“插入”→“用户窗体”，在窗体中插入一个“多页”控件，右键单击页标签，选择“新建页”，建立一个3页的控件。在第1页插入“标签”和“文字框”，将“标签”的Caption属性更改为“请输入工作表数量”，将“文字框”的名称更改为“tCount”；在第2页插入“标签”和“文字框”，将“标签”的Caption属性更改为“请输入工作簿路径”，将“文字框”的名称更改为“tPath”；在第3页插入4个“标签”，将其中两个“标签”的Caption属性更改为“工作表数量”和“工作簿路径”，将另两个“标签”的名称更改为“lbShowCount”和“lbShowPath”。在窗体中插入两个“命令按钮”，将命令按钮的“Caption”属性更改为“上一步”和“下一步”，将名称更改为“btPre”和“btNext”。最后排列各控件，效果如图所示。