Erreur 2467 : Expression entrée fait référence à un objet fermé ou supprimé
Bonjour,
A l'ouverture d'un formulaire Access 2003, (évènement OPEN), je déroule entre autre le code suivant afin de rechercher la présence de sous-formulaire et les affecter à une variable de type "form" (Pour des raisons de raccourci d'écriture par la suite dans le code).
Code:
1 2 3 4 5 6 7 8 9 10 11
|
Public Ecran_SF As Form
....
NbRecherche = Forms![F_FormCourant].Count
If NbRecherche > 0 Then
For intI = 0 To NbRecherche - 1
Set SF = Forms![F_FormCourant](intI)
If SF.Name = "SF_De_FormCourant" Then IndForm1 = intI
Next intI
End If
Set Ecran_SF = Forms![F_FormCourant].Controls(IndForm1).Form |
Citation:
Mais lorsque le programme passe sur la dernière ligne j'ai le message d'erreur suivant :
Pour information, cette opération est effectuée dans d'autres formulaires de l'application et cela fonctionne. Ici je suis dans le cas d'un formulaire et d'un sous-formulaires importés.
Merci pour votre aide..