Microsoft 365 Option selon le userform actif

[A-Jelil]

Bonjour / Bonsoir !
Je souhaite faire prendre option selon mon formulaire (entre plusieurs) qui est actif. Par exemple :
IF usf (actif) est usf1 Then
Fais ceci
ElseIf usf (actif) est usf2 then
Fais cela ,,
Et ...
Que devrais-je faire, s'il vous ?

 

[Dudu2]

Si tu tiens absolument à valoriser DIRECTEMENT la TextBox du UserForm qui a appelé le UserForm Calendrier et NE PAS UTILISER la solution triviale de passer par une variable globale d'échange (variable Date ou Objet cible) dont je t'ai indiqué le principe en post #12 et sous forme d'exemple en post #13, il faut passer par une solution NON GÉNÉRIQUE qui effectivement utilise l'objet bien SPÉCIFIQUE: UserFormX.TextBoxY.Value.

A supposer que tes 2 ou 3 ou N UserForms ne sont pas chargés en même temps, et donc qu'un seul UserForm à TextBox soit chargé, j'ai ça qui pourrait t'aider.

'--------------------------
'Test si UserForm est actif
'--------------------------
Public Function IsUserFormLoaded(UserFormName As String) As Boolean
    Dim UsF As Object

    For Each UsF In VBA.UserForms
        If UsF.Name = UserFormName Then Exit For
    Next UsF

    If Not UsF Is Nothing Then IsUserFormLoaded = True
End Function

Il faut bien sûr que tu testes SPÉCIFIQUEMENT chacun de tes UserFoms candidats via ce module.
Pourquoi faire simple ?

 

[A-Jelil]

Parfois, faire simple est synonyme d'efficacité.
Merci beaucoup pour les réponses claires et précieuses.

 

[Dudu2]

En fait la phrase complète est: pourquoi faire simple quand on peut faire compliqué.