Bhavbhuti

Why don't you make things easy for yourself, and for others to read? :-)

I haven't tested this but would something like the following work:

At the start, before any page selection clicking, Set

Thisform.nActPage = THISFORM.pgf.ACTIVEPAGE

NextButton.Click()

DODEFAULT()
With thisform
  .nLastPage = .pgf.PAGECOUNT
  .nNextPage = .nActPage + 1              & Nominally "active" page but not necessarily active
  If .nNextPage = .nLastPage
      .nNextPage = 1
  Endif
  If not .pgf.Pages( .nNextPage).Enabled  && If chosen page not enabled
      .nActPage = .nNextPage
      This.Click()                        && recursively call this method to try the next
  Else
      .pgf.ACTIVEPAGE = .nNextPage        && SUCCESS!!!
  Endif
EndWith

Terry