Bonsoir,
Public Menu '#
Déclaration niveau module d'une variable publique (accessible de tout autre module), non typée et donc de type Variant.
Sub Afficher_Menu() '#
Choix_du_menu.Show '#
1er# : Déclaration de procédure de type Sub, nommée Afficher_Menu (1re partie de la déclaration, la 2nde partie est constituée par End Sub)
2e# : Commande d'ouverture du Userform Choix_du_menu...
Menu = "" '#
Nombre = "" '#
Réinitialisation des variables Menu et Nombre, de niveau module (qui ne disparaissent donc pas à la fin d'une procédure. Plus besoin de leur valeur donc on réinitialise...
NB- Visiblement Menu est utilisée comme variable String et aurait due être typée comme telle, de même pour Nombre qui aurait due être typée Integer. Si as de raison de ne pas typer, on a intérêt à le faire (plus rapide).
Private Sub UserForm_Initialize() '#
Déclaration (1re partie) de procédure d'initialisation d'un userform. Il s'agit d'une procédure d'évènement : l'évènement Initialize se produit lors du chargement du userform en mémoire, avant son affichage (il ne se reproduit pas si le Userform est masqué puis affiché à nouveau (contrairement à l'évènement Activate qui lui se produit à la suite et se reproduit à chaque réaffichage du Userform).
Cordialement.
edit : Salut Steelson, je n'ai pas pris le temps de lire pour voir ce qu'on avait écrit d'identique...