Fermeture d'un Userform : Erreur 424

Bonjour à tous,

Je m'initie au VBA et je suis actuellement confronter à un problème.

Je souhaite créer un userform qui s'ouvre automatiquement à l'ouverture d'Excel, tout va bien jusque là. Mais au moment de le fermer avec la croix du userform, j'ai une erreur 424 sur le "Moda11.show". Je pense que c'est quelque chose de basique que je n'ai pas saisi. Quelqu'un pour m'expliquer ?

j'ai mis un fichier en Annexe pour l'exemple .

Bonjour TRIS

Change ton code

Sub Workbook_Open()
   frmDiagInput2.Show
End Sub

Bonjour,

A ta place j'aurais fais comme cela:

Sub Workbook_Open()
    frmDiagInput2.Show
End Sub

Private Sub UserForm_Initialize()
        frmDiagInput2.Caption = "Ma saisie personnalisée"
End Sub

J'avais déjà essayé comme vous m'avez proposé tous les 2 mais le titre de l'userform part si je fais comme vous avez fais. Je vais mettre mon vrai fichier Excel, ce sera plus simple. C'est exactement la même erreur mais ce sera plus près de la réalité.

Je n'ai pas encore finis mais ce qui sera coché / choisit dans l'userform complétera des colonnes de mon futur tableau.

Essaye d'insérer ça :

Unload frmDiagList

avant la fin de ta fonction.

Edit : Non ce n'est pas la solution .. excuse moi

Je viens d'essayer donc dans :

Module

Modliste

 Else
        ' si DiagOK = False =>  la saisie a été annulée
        MsgBox "Saisie annulée"

    End If

End With

Unload frmDiagList

End Function

J'ai aussi essayé avant le End with et avant le End if, cela ne change rien

D'accord pas de problème, merci quand même. Tu as une solution à proposer de ce fait ?

j'ai une solution comme ça.. (j'ai remplacé la fonction par un sub)

Ne me demande pas pourquoi le fichier apparaît en .zip c'est le grand mystère

Super merci énormément,

c'est à cause de "show" que cela ne fonctionnait pas ? Il fallait mettre "call" à la place, c'est bien ça ?

Oui, tout à fait.

De rien :)