Wikiversité

« Macros-commandes VBA/Création de Formulaire » : différence entre les versions

Navigation interactive dans l’historique
← Modification précédenteModification suivante →
Contenu supprimé Contenu ajouté
VisuelWikicode
m Robot : Remplacement de texte automatisé (-\b(\d+)ème\b +\1{{e}})
Ligne 305 :
* Rechercher la propriété RowSource de la ComboBox et entrer simplement :
** 1ère option : les références de la feuille Excel comme ceci : Feuil1A1 : A3 – Il s’agit tout simplement de la source des données affichées dans la ComBox / l'adresse de la plage contenant les données ou,
** 2ème2{{e}} option : un nom défini (onglet formules/définir un nom) faisant référence à la plage souhaitée ou,
** 3ème3{{e}} option : la référence à une colonne d'un tableau Excel : par exemple Projet [Nucléaire] si le tableau s'appelle Projet et le titre de la colonne est Nucléaire. Pour cela il faut que les données source soient sous forme de tableau.
( Cette option présente un avantage comparé aux précédentes : elle permet d’intégrer automatiquement dans la liste sur le formulaire s’il y a ajout de données dans la colonne en question. )
 
Ligne 372 :
C'est utile si l'on souhaite par exemple récupérer les données de la feuille puis les trier par ordre alphabétique ou ne conserver que les valeurs répondant à un critère particulier.
 
Par défaut, la propriété par défaut Value d'une ListBox ou d'une ComboBox renvoie la valeur de la première colonne. Si vous voulez que ce soit par défaut la valeur de la 2ème2{{e}} colonne ou autre, il faut le préciser en utilisant la propriété BoundColumn
 
'''''Illustration :'''''
Ligne 585 :
==== Zone de liste (ComboBox) ====
 
Dans les cellules A1 à A15 de la feuille 2 (Feuil2) du classeur entrer des noms de ville. ''''11ème11{{e}} image'''' http://imageshack.com/a/img89/4760/5wnz.jpg
 
Revenir à l'éditeur Visual Basic (« Alt » + « F11 »), sélectionner le formulaire, y placer une zone de liste modifiable ==> ''''12ème12{{e}} image'''' http://imageshack.com/a/img23/6808/nwxn.jpg
 
Dans les propriétés => Données => RowSource, rentrer la zone ciblée : Feuil2!A1:A15 ==> ''''13ème13{{e}} image'''' http://imageshack.com/a/img801/245/3pfh.jpg
 
Double-cliquer sur la zone de liste (ComboBox) et rentrer ce code:
Ligne 601 :
=== Utiliser un bouton Option ===
 
* Pour cet exemple nous allons créer 2 boutons d'option pour choisir entre : « Fille » ou « Garçon », il faut placer avant tout chose un cadre (Frame) sur l'UserForm. Propriété => Caption : « Fille ou garçon » ==> ''''14ème14{{e}} image'''' http://imageshack.com/a/img20/8900/4bvh.jpg
* Il faut ensuite placer sur ce cadre 2 boutons d'option, nommer le 1er : « fille », le 2ème2{{e}} : « garçon », se servir des propriétés « BackColor, ForeColor, Font etc » pour la mise en forme ==> ''''15ème15{{e}} image'''' http://imageshack.com/a/img4/6462/anbj.jpg
* Double-cliquer sur le premier bouton (Fille) et entrer ce code:
 
Ligne 625 :
</source>
 
Cela écrira dans la cellule C4 "Vous êtes un garçon" lorsque ce bouton sera coché ==> ''''16ème16{{e}} image'''' http://imageshack.com/a/img191/7605/nwl1.jpg
 
=== Contrôler une saisie dans une TextBox ===
Ligne 633 :
# Placer un label en haut du formulaire, Propriété => Caption : Indiquez votre prénom
# Placer une TextBox dessous
# Le bouton de commande tout en bas, Propriété => Caption : Valider ==> ''''17ème17{{e}} image'''' http://imageshack.com/a/img41/4899/bcy4.jpg
# Programmer le bouton "Valider" via un double-clic et la saisie du code suivant :
 
Ligne 646 :
</source>
 
Tant qu'au moins une lettre du prénom ne sera pas saisie, le focus replacé sur la TextBox1, sinon le prénom s'affichera en A1 ==> ''''18ème18{{e}} image'''' http://imageshack.com/a/img51/1829/2z3r.jpg
 
==Transfert de données du fomulaire dans le feuille==
Récupérée de « https://fr.wikiversity.org/wiki/Macros-commandes_VBA/Création_de_Formulaire »