construction d'un nombre variable de boutons

[ingrid]

Bonjour,

Après avoir chercher assez longuement, je n'en peux plus alors je me resoud à vous demander de l'aide!!!!!

Je vous explique mon problème :

mon utilisateur doit saisir dans un premier formulaire, le nombre de questions auquelles il veut répondre. Jusque la pas de problème.
Chaque question possède deux réponse : oui non.
J'avais donc décidé de creer un formulaire avec autant de frame(contenant 2 boutons) que de questions. Lorsqu'il répond 1, pas de problème. J'ai bien ma frame avec ces 2 boutons. Le problème est que si sa réponse est supérieur à 1 (ce qui va toujours etre le cas, j'ai bien toutes mes frames, mais aucun bouton à l'intérieur!!!!!!
Pourriez vous me dire d'ou vient le problème?
merci d'avance,


ingrid

j'ai mis en pièce jointe, le classeur!!(il faut lancer le formulaire : parametre)

 

[Creepy]

Je n'ai pas de formulaire parametre !!

Il y a juste trois feuilles vierges

Est-ce normal ?

Creepy

 

[ingrid]

pardon,


oui, oui, c'est normal. c'est juste une ébauche, il est faut le lancer dans VBA, normalement.

désolée, il est vrai que j'aurais pu faire un bouton...

 

[Creepy]

désolé j'avais pu vu !!

En faites tu veux que ta boite de dialogue réapparaisse autant de fois que de questions ?

4...5...6 fois c'est ca ?

Alors qu'elle n'apparait que 1 fois !!

Creepy

 

[ingrid]

Bonjour Creepy,

non, en fait ne n'est pas exactement cela, mais si on ne peut pas faire autrement...
En réalité, je voudrais que dans le formulaire paramètre, l'utilisateur entre un nombre. par exemple 4.
Alors, je creerai, un seul nouveau formulaire dans lequel, il y aura mes 4 frames avec comme réponse oui non, sous la forme d'option button. c'est à peut près ce que j'ai sauf que moi, mes boutons ne se construisent pas?...

J'espère avoir ete claire et merci

ingrid

 

[Creepy]

Ok j'ai regardé ce ki cloche et je ne vois vraiment pas la construction de ton code est bonne et les lignes sont bien executée.

Désolée je n vois pas !

++

Creepy

 

[ingrid]

moi nonplus je ne comprend pas mais comme je ne suis pas une pro.
ce n'est pas grave,

merci d'avoir pris le temps de regarder,

Ingrid

 

[@Christophe@]

Bonjour Ingrid et Creepy

Sache Ingrid que c'est un bordel, lol

Bon passons se détail, le principal c'est que tu t'en sors.

Revenons à nos moutons, ton problème, les optionbutton sont présent ce qui se passe c'est leur position

Voici le morceau de ton code:

With btn1
'.Name = "opt" & i
.Caption = "Oui"
.Left = 18
.Top = pos - 34
End With

'bouton non
With btn2
'.Name = "opt" & i + 1
.Caption = "non"
.Left = 18
.Top = pos - 16
End With

Le problème se situe dans les ligne suivante:
.Top = pos - 34
.Top = pos - 16

Tu dis que la position du bouton est Pos - 34, Pos = 50 puisque tu le déclare 50 dans l'autre module, donc la position Top de ton bouton est 50 - 34 pour le oui et 50 - 16 pour le non

C'est correct, a partir du top de ton userform, mais ici nous sommes dans une frame, donc chaque frame à sa propre position, modifie par ce code et cela marche a merveille:

With btn1
'.Name = "opt" & i
.Caption = "Oui"
.Left = 18
.Top = 6 '***Modif apporté ici***
End With

'bouton non
With btn2
'.Name = "opt" & i + 1
.Caption = "non"
.Left = 18
.Top = 24 '***Modif apporté ici***
End With

Voila

Bonne journée

@Christophe@

 

[ingrid]

bonjour,

désolée pour le retard mais je ne fais pas d'heures supp au boulot..
je te remercie beaucoup pour ta réponse qui marche à merveille...

merci beaucoup,

ingrid