移動到下一個頁面上的用戶窗體多頁Excel的VBA

Question

我曾在多頁用戶窗體5頁。

如果啓用了一個按鈕，它可以通過用戶點擊，那麼它應該移動到下一個隱藏的頁面，我總是得到一個錯誤「必選對象」它讓我發瘋。

Private Sub btnGenerate_Click() 
iPageNo = MultiPage1.Value + 1 
MultiPage1.Pages(iPageNo).Visible = True 
MultiPage1.Value = iPageNo 
End Sub 

該代碼似乎不適用於我，任何幫助將不勝感激。

謝謝

Answer 1

哪一行導致錯誤，當你一步一步？

確保有足夠的現有頁面。此外，已在多頁對象的名稱改變了嗎？下面

該代碼測試工作（2頁在MultiPage1，第二頁集合隱藏）：

Option Explicit 

Private Sub CommandButton1_Click() 
    Dim iNextPage As Long 
    With Me.MultiPage1 
     iNextPage = .Value + 1 
     If iNextPage < .Pages.Count Then 
      .Pages(iNextPage).Visible = True 
      .Value = iNextPage 
     End If 
    End With 
End Sub