次のページへ移動userform multipage excel VBA

Question

私はマルチページのuserformに5ページあります。

ユーザーがクリックできる次のボタンが有効な場合は、次の非表示のページに移動する必要があります。私はいつも「Object Required」というエラーが表示されています。

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

このコードは私にとってはうまくいかないようですが、何か助けていただければ幸いです。あなたがスルーステップ時にエラーの原因となっている

Answer 1

ライン

のおかげ？

既存のページが十分にあることを確認します。また、MultiPageオブジェクトの名前が変更されていますか？

以下このコードは（MultiPage1で2ページ、ページ2セットは非表示）ワーキングテスト：

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