Is this Correct??? Cause its not working it Gives me the Error Invalid
Use of Property With the Word Pages Highlighted :| Any Idea How to do
this?

Private Sub Found(StrNameFound As String)
Dim sh As Worksheet
Set sh = ActiveSheet
If sh = Worksheets("Shelter") Then
FormLoad.MultiPage1.Pages ("Dependency") And _
FormLoad.MultiPage1.Pages("TPR").Visible = False
End If