That seems to work! Why would my code not work? Defining pg as a Page
should work I would think.
--
Cheers,
Ryan


"Susan" wrote:

try

dim page as control

:)
susan


On Jul 1, 2:52 pm, RyanH wrote:
I am scattered today. Yesterday this code was working fine and today it is
not. I am getting a Type MisMatch Error indicated below, why?

Private Sub cboIllumination_Change()

Dim pg As Page

'disables all three pages
For Each pg In mpgIllumination.Pages
pg.Enabled = False
Next pg

End Sub

--
Cheers,
Ryan