多页UserForm Excel – 添加下一个button

是否有可能在页面上添加一个用户窗体上的多个button的button，以便它将带你到其他页面？ 可以sopmeone发表一个简单的代码呢？

Answer 1

MultiPage控件的Value属性设置/获取活动页面。

---

  Private Sub cmdNext_Click() Dim lCurrentPage As Long lCurrentPage = Me.MultiPage1.Value + 1 If lCurrentPage = Me.MultiPage1.Pages.Count Then MsgBox "You are on the last page." Else Me.MultiPage1.Value = lCurrentPage End If End Sub