多頁用戶窗體 Excel - 添加下一步按鈕

Question

是否可以在具有多頁的用戶表單的第一頁上添加一個按鈕，以便將您帶到其他頁面？ sopmeone 可以為此發布一個簡單的代碼嗎？

Answer 1

多頁控件的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