Discussion :

[sylnie]

Novice en Vb et apprenant seul, je bloque sur un pb qui devrait vous faire marrer :

j'ai besoin d'utiliser un entier récupéré par un MsgBox pour lancer autant de nouveaux MsgBox.

ex : si msgbox1 = combien de pieces dans cet appart?
si reponse1 = 3

je souhaite avoir msgbox 2 = surface de la piece 1, reponse2
msgbox 3 = surface de la piece 2, reponse3
msgbox 4 = surface de la piece 3, reponse4

Grandement merci pour toute votre aide

en esperant ne pas polluer

ciao

sylnie

[Phifi]

voir plutôt InputBox pour récupérer un entier, puis F1 sur MsgBox

[Delbeke]

L'inconvenient des MsgBox/InputBox c'est qu'on ne peut en afficher qu'un seul à la fois.
Il faudra faire un InputBox pour chaque question
Une autre solution consiterait a faire un feuille, affichée modalement, qui afficherait autant de label/textbox qu'il y a de questiond à repondre.
Pour afficher une fenetre modalement, on utilise

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

LaForm.Show VbModal

Pour ajouter dynamiquement des controles a une feuille, on utilise des Labels/TextBox dont la propriété index est à zero ensuite , on ajoute par programme les composants supplementaires avec un

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Load TextBox1(TextBox1.Count+1) 'pour le textbox

[ProgElecT]

Amicalement Delbeke

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Load TextBox1(TextBox1.Count)

eventuellement pour supprimer le dernier, sauf le premier mis sur laForm lors de la construction (Index = 0)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Unload TextBox1(TextBox1.Count - 1)

[Delbeke]

Pareillement ProgElect

Tu as parfaitement raison Autant pour moi.