Scribd
Importer
559 vues2 pages

Créez et gérez des UserForms VBA

Le document décrit comment créer et personnaliser un UserForm dans VBA en Excel. Il explique comment ajouter des événements à l'UserForm et modifier ses propriétés comme la taille via le code.

Transféré par

boy jorg
Copyright
© © All Rights Reserved
Nous prenons très au sérieux les droits relatifs au contenu. Si vous pensez qu’il s’agit de votre contenu, signalez une atteinte au droit d’auteur ici.
Formats disponibles
Téléchargez aux formats PDF, TXT ou lisez en ligne sur Scribd
559 vues2 pages

Créez et gérez des UserForms VBA

Le document décrit comment créer et personnaliser un UserForm dans VBA en Excel. Il explique comment ajouter des événements à l'UserForm et modifier ses propriétés comme la taille via le code.

Transféré par

boy jorg
Copyright
© © All Rights Reserved
Nous prenons très au sérieux les droits relatifs au contenu. Si vous pensez qu’il s’agit de votre contenu, signalez une atteinte au droit d’auteur ici.
Formats disponibles
Téléchargez aux formats PDF, TXT ou lisez en ligne sur Scribd

Cours VBA : UserForm http://www.excel-pratique.com/fr/vba/userform.

php

Pour ajouter un UserForm, procdez de la mme manire que pour un nouveau module :

La fentre de l'UserForm ainsi que la "Bote outils" apparaissent :

Si la fentre des proprits n'est pas prsente, affichez-la et commencez par modifier le nom de l'UserForm (pour mieux s'y retrouver par la suite) :

Tout comme le classeur ou les feuilles, l'UserForm a ses propres vnements. Pour ajouter des vnements, double-cliquez sur la fentre de l'UserForm :

Pour prendre un exemple, nous allons crer deux vnements. Le premier pour dfinir les dimensions initiales de l'UserForm et le second pour augmenter ses
dimensions de 50 pixels au clic.

L'vnement UserForm_Initialize se dclenche au lancement de l'UserForm :

1 of 2 16/10/2016 14:19
Cours VBA : UserForm http://www.excel-pratique.com/fr/vba/userform.php

La proprit Height est la hauteur, Width la largeur :

Private Sub UserForm_Initialize()


Mon_userform.Height = 100
Mon_userform.Width = 100
End Sub

Pour simplifier le code, nous pouvons remplacer le nom de l'UserForm par Me (puisque ce code est plac dans l'UserForm sur lequel on souhaite agir) :

Private Sub UserForm_Initialize()


Me.Height = 100
Me.Width = 100
End Sub

Le second vnement est dclench au clic sur l'UserForm :

Private Sub UserForm_Initialize()


Me.Height = 100
Me.Width = 100
End Sub

Private Sub UserForm_Click()


Me.Height = Me.Height + 50
Me.Width = Me.Width + 50
End Sub

Pour lancer un UserForm depuis une procdure, utilisez Show :

Sub lancer_userform()
Mon_userform.Show
End Sub

2 of 2 16/10/2016 14:19

Vous aimerez peut-être aussi