Erreur Vba Access

une fenetre apparait en me disant erreur d' éxecution '424' objet requis. Je compren pas!

Help me!

Function trouve_année()
trouve_année = Formulaires![F MAJ des informations]![Choix_année]
End Function

Function trouve_hôtel()
trouve_hôtel = Formulaires![F MAJ des informations]![clé_hôtel]
End Function

Function trouve_mois()
trouve_mois = Formulaires![F MAJ des informations]![Choix_mois]
End Function

Thanks...