G
G'Claire
Guest
Bonsoir le forum
Je me permet de reposer ma question, car je ne trouve pas la solution et en plus je ne peut mettre mon fichier en piece joint car il dépasse 50 Mo.
J'ai un fichier, quand je clique sur exit (Dans un UserForm) cela me donne comme erreur :
Erreur d'execution '402'
Vous devez d'abord fermer ou masquer la feuille modale de premier plan.
Et dans ce code cela surligne
USF_Menu.Hide
Voici le code de Thierry pour avoir un retour au menu dans toutes les feuilles:
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If ActiveSheet.Name <> "Tool_Menu" Then
Tool_Menu = False
With USF_Menu
.StartUpPosition = 3
.Show 0
End With
Else
USF_Menu.Hide
End If
End Sub
Qu'es-ce que cela signifie t-il?
Merci pour votre aide, G'Claire
Je me permet de reposer ma question, car je ne trouve pas la solution et en plus je ne peut mettre mon fichier en piece joint car il dépasse 50 Mo.
J'ai un fichier, quand je clique sur exit (Dans un UserForm) cela me donne comme erreur :
Erreur d'execution '402'
Vous devez d'abord fermer ou masquer la feuille modale de premier plan.
Et dans ce code cela surligne
USF_Menu.Hide
Voici le code de Thierry pour avoir un retour au menu dans toutes les feuilles:
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If ActiveSheet.Name <> "Tool_Menu" Then
Tool_Menu = False
With USF_Menu
.StartUpPosition = 3
.Show 0
End With
Else
USF_Menu.Hide
End If
End Sub
Qu'es-ce que cela signifie t-il?
Merci pour votre aide, G'Claire