Application.Visible=False
Résolu
pipive
Messages postés
5
Date d'inscription
lundi 19 novembre 2007
Statut
Membre
Dernière intervention
27 août 2010
-
26 août 2010 à 22:42
cs_Jack Messages postés 14006 Date d'inscription samedi 29 décembre 2001 Statut Modérateur Dernière intervention 28 août 2015 - 27 août 2010 à 09:22
cs_Jack Messages postés 14006 Date d'inscription samedi 29 décembre 2001 Statut Modérateur Dernière intervention 28 août 2015 - 27 août 2010 à 09:22
A voir également:
- Application.visible = false
- Application visible - Meilleures réponses
- Application.visible = true - Meilleures réponses
- Enabled false ✓ - Forum Visual Basic 6
- True false sql ✓ - Forum SQL
- Nbdeploy clienturlpart client.urlpart debugmode false forceredeploy forceredeploy - Forum Java
- Enableeventvalidation="false" ✓ - Forum ASP / ASP.NET
- Php true false ✓ - Forum PHP
3 réponses
cs_Jack
Messages postés
14006
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
79
27 août 2010 à 09:22
27 août 2010 à 09:22
"le fichier excel peut toujours être visible"
Tu veux dire qu'il reste affiché à l'écran ?
Parce que, normalement, il devrait se placer en icone dans la barre des tâches.
Je viens de faire l'essai.
Oui, il faut que ta UserForm soit de type Modeless pour que cela fonctionne - Voir propriété ShowModal de ta UserForm, à mettre à False)
Par contre, cela change la méthode d'appel.
Je viens d'essayer ce code suivant :
Un bouton sur une feuille Excel - mais ce code pourrait se trouver dans Workbook_Open si tu veux que ça s'exécute au lancement du fichier.
Ensuite, dans la UserForm (avec un bouton pour quitter) :
Tu veux dire qu'il reste affiché à l'écran ?
Parce que, normalement, il devrait se placer en icone dans la barre des tâches.
Je viens de faire l'essai.
Oui, il faut que ta UserForm soit de type Modeless pour que cela fonctionne - Voir propriété ShowModal de ta UserForm, à mettre à False)
Par contre, cela change la méthode d'appel.
Je viens d'essayer ce code suivant :
Un bouton sur une feuille Excel - mais ce code pourrait se trouver dans Workbook_Open si tu veux que ça s'exécute au lancement du fichier.
Dim maForme As UserForm1
Set maForme = New UserForm1
maForme.Show ' la forme s'affiche mais rend la main de suite
Do While maForme.Visible
DoEvents ' Boucle d'attente du 'Hide'
Loop
Unload maForme
Set maForme = Nothing
Ensuite, dans la UserForm (avec un bouton pour quitter) :
Private Sub UserForm_Activate()
ThisWorkbook.Application.WindowState = xlMinimized
Me.Show
End Sub
Private Sub CommandButton1_Click()
ThisWorkbook.Application.WindowState = xlNormal
Me.Hide
End Sub
cs_Jack
Messages postés
14006
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
79
26 août 2010 à 23:45
26 août 2010 à 23:45
Salut
Essaye avec un truc du genre (tu es dans ta UserForm) :
Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés
Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)
Essaye avec un truc du genre (tu es dans ta UserForm) :
ThisWorkbook.Application.WindowState = xlMinimized
Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés
Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)
pipive
Messages postés
5
Date d'inscription
lundi 19 novembre 2007
Statut
Membre
Dernière intervention
27 août 2010
27 août 2010 à 00:03
27 août 2010 à 00:03
Merci pour la réponse, mais lorsque j'utilise xlMinimized le fichier excel peut toujours être visible. J'aimerais que celui qui utilise le userform ne puisse pas voir le fichier excel, sans pour autant fermer tous ses autres fichiers ouverts
Cordialement,
Franck
Cordialement,
Franck
