Détecter si un contrôle est dans un sous formulaire [Résolu]

[Stef999]

Bonjour,

J'ai une procédure qui est déclenchée au double clic sur un contrôle Zone deTexte

je souhaiterais qu'elle détecte si ce contrôle est inclus dans un sous formulaire ou non.

Code :

1
2
3
4
5
    If Me.Parent Then
        ...
    Else
        formprincipal = Me.Parent.Name
    End If

Dans le cas où la zone de texte n'est pas dans un sous formulaire un me.parent renvoie une erreur 2452. En traitant cette erreur que je vais savoir que le contrôle n'est pas dans un sous formulaire.

Peut-on récupérer le nom du formulaire principal quand il existe plus simplement ?

Merci

[sendme]

Bonjour,

Un début de réponse en interceptant l'erreur en question :

Code :

1
2
3
4
5
6
7
8
9
On Error GoTo err_ZoneTXT
 
err_ZoneTXTt:
     Select Case err.Number
        Case 2452
            MsgBox "Ton message d'erreur ici", vbcritical, "Titre fenêtre"
        Case Else
            'Ici autre message, si autre numéro d'erreur
    End Select

En espérant t'avoir un peu aidé...

[Stef999]

Bjr Sendme,

C'est ce que je pensais mettre en place ... mais je me demandais s'il existait une fonction qui pouvait détecter avant le passage en erreur que l'expression me.parent renvoyait une erreur car il n'y a pas de parent à me ...

Mais bon le traitement de l'erreur me va !

Merci en tout cas