Run-time error "438"

[Haaris]

Thanks Paul for the reply, here part of the code where the error is:

        Sheet1(User1).Visible = True --------> this is where the error shows :(
        Sheet2(User2).Unprotect (txtPass.Text)
        Sheet3(User3).Activate

        bOK2Use = True
        Unload UserForm1
    
    End If
    
End Sub

The run-time error code "438" says - Object doesn't support this property or method