Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Use..apparitre puis dispairaitre

D

Didier

Guest
Bonjour à tous
Je voudrais faire apparaitre puis disparaitre un userform à
l'ouverture de mon fichier
Merci.
 
J

Jean-Claude Renou

Guest
salut Didier,
Il suffit de l'appeler dans une macro auto_open qui s'activera à l'ouverture du fichier.

sub auto_open
UserForm1.Show
end sub

et voilà pour autant que ton UserForm s'appelle UserForm1

Jean-Claude
 
@

@+Thierry

Guest
Bonsoir Didier, Bonsoir Jean Claude, Bonsoir les Ami(e)s

Pour Jean Claude :
Autpen et Auto_Close sont des anciennes procédures évènementielles de Excel 4.0, elles sont toujours gérées par Excel 10 (XP) mais après discussion avec Ti, nous recommandons à tous les nouveaux développeurs de NE PLUS LES UTILISER car tôt ou tard elleS ne seront plus gérées puisque remplacées depuis Excel 8 (1997) par les Private Modules de Macro évènementielles :

Module => ThisWorkBook

Private Sub Workbook_Open()
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
End Sub


Pour Didier :
Si tu as bien créé un UserForm nommé (par défaut) UserForm1, il devrait s'activer avec le code que t'a donné Jean Claude... (?) soit tu n'as pas de UserForm1 (un autre nom "UserForm2 ou UserForm3 etc ou UserFormDidier etc etc)

Si tu veux essayer avec une macro évènementielle pour l'activation automatique d'un UserForm. Tu mets çà dans le Private Module "ThisWorkBook"

Private Sub Workbook_Open()
UserForm1.Show
End Sub

Voilà
Bonne Soirée
@+Thierry
 
D

Didier

Guest
Bonjour Thierry
J'ai essayer les 2 solutions Macro et dans workbook et ça marche pas je n'ai pas renommer l'user form donc j'ai tapé userform1 j'aurais voulu qu'il apparaisse à l'ouverture pour ensuite le faire disparaitre avec un boucle
un peu comme un message toujous pour mon planning je vous est déja demander plusieurs fonctions, (Vélriland,Monique..) et je vous en remercie
car c'était pour mon frère et il en est content(j'ai lu la ficelle Robert)
bon dimanche à tous et toutes.
Didier
 
@

@+Thierry

Guest
Salut Didier,


Je pense que dans ce cas là un petit exemple vaut mieux qu'un long discours......

Regardes bien les Modules :
*) ThisWorkBook
*) Module1

Ce n'est pas sorcier!
Bon Dimanche...
@+Thierry
 

Pièces jointes

  • Didier.zip
    10.9 KB · Affichages: 29
  • Didier.zip
    10.9 KB · Affichages: 27
  • Didier.zip
    10.9 KB · Affichages: 29

Discussions similaires

  • Résolu(e)
Microsoft 365 Dotation license
Réponses
4
Affichages
265
Réponses
14
Affichages
333
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…