Ooops! No can do. I just realized that Dim pg as Control disables all the
controls in the page. I guess I will have to do this below. I figured I'd
just use the For Each Loop

'disables all three pages
For i = 0 To 2
mpgIllumination.Pages(i).Enabled = False
Next i
--
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