Afficher un userform automatiquement
agsles
-
gillesdemev Messages postés 135 Date d'inscription Statut Membre Dernière intervention -
gillesdemev Messages postés 135 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je suis un néophyte de VBA pour Excel. J'ai développé une petite application qui utilise un formulaire. Cet application est sauvegardé dans un fichier appelé abc.xls
J'aimerais que le formulaire (userform) apparaissent automatique lorsque j'ouvre le fichier abc.xls
J«,ai essayé
Private Sub UserForm_Initialize()
End Sub
Mais ça ne fonctionne pas
Merci à l'avance
agsles
Je suis un néophyte de VBA pour Excel. J'ai développé une petite application qui utilise un formulaire. Cet application est sauvegardé dans un fichier appelé abc.xls
J'aimerais que le formulaire (userform) apparaissent automatique lorsque j'ouvre le fichier abc.xls
J«,ai essayé
Private Sub UserForm_Initialize()
End Sub
Mais ça ne fonctionne pas
Merci à l'avance
agsles
A voir également:
- Afficher userform sur feuille excel
- Feuille de score belote excel - Forum Excel
- Liste déroulante excel - Guide
- Feuille de pointage excel - Télécharger - Tableur
- Word et excel gratuit - Guide
- Comment trier par ordre alphabétique sur excel - Guide
5 réponses
Bonjour agsles,
Il faut écrire le code dans "ThisWorkbook"
par exemple ce code que j'ai écri appelle volontairement la Sub ouverturemenu() dans un module
Public Sub workbook_open()
Call ouverturemenu
End Sub
Ainsi si l'utilisateur ferme le userform en affectant une touche ctlr+o (par exemple)
le userform peut être ré-ouvert avec facilité
Public Sub ouverturemenu()
Load UserForm1
UserForm1.Show 0 ' le paramètre 0 permet de reprendre la main sur la feuille sans fermer le userform
Call listercat
Worksheets("Publipostage").Activate
End Sub
Ai-je été clair et ceci marche t'il pour toi car mon problème c'est d'être compliqué dans mes explications
Avec toute la cordialité possible
Gilles
Il faut écrire le code dans "ThisWorkbook"
par exemple ce code que j'ai écri appelle volontairement la Sub ouverturemenu() dans un module
Public Sub workbook_open()
Call ouverturemenu
End Sub
Ainsi si l'utilisateur ferme le userform en affectant une touche ctlr+o (par exemple)
le userform peut être ré-ouvert avec facilité
Public Sub ouverturemenu()
Load UserForm1
UserForm1.Show 0 ' le paramètre 0 permet de reprendre la main sur la feuille sans fermer le userform
Call listercat
Worksheets("Publipostage").Activate
End Sub
Ai-je été clair et ceci marche t'il pour toi car mon problème c'est d'être compliqué dans mes explications
Avec toute la cordialité possible
Gilles