OVH Cloud OVH Cloud

2 questions : generation userform d'apres table, utiliser while pour tester les commandbouton

2 réponses
Avatar
S'Ju
Bonjour, mon 1er problème est le suivant :
pour le moment j'ai créé des userform statiques qui reprennent les libellés
de reference de table
est-il possible de générer ces userform directement à partir de la table (en
utilisant caption)

sur ces formulaires il y a des boutons à cocher, qui, si on les
sélectionnent vont permettrent de générer des lignes dans un tableau.
Je n'ai pas envie de modifier les formulaires tous les 4 matins, des qu'une
reference change.

Mon 2nd problème :
lorsque le formulaire a été affiché, l'utilisateur a cliqué sur plusieurs
choix (il peut y en avoir jusqu'à une centaine). Je voudrais utiliser une
commande while pour alléger mon code.
while i < 100
if commandbouton&i then
ajouterligne(i,commandbouton&i.caption,etc...)
end if
i = i + 1
wend
est-ce possible ?

Je n'ai pas trouvé dans l'aide de vb.

Merci d'avance à ceux qui peuvent m'aider sur l'une ou l'autre question

S'Ju

2 réponses

Avatar
S'Ju
Bon, pour le premier point c'est ok, pas trop dur à faire. Dommage de ne pas
avoir la réponse au 2nd point (boucle sur checkboxn. Ca ferait du code en
moins.

userformx.cheboxn.caption = worksheets(feuille).range(cellule)


"S'Ju" a écrit dans le message de
news:4014b2e0$0$28697$
Bonjour, mon 1er problème est le suivant :
pour le moment j'ai créé des userform statiques qui reprennent les
libellés

de reference de table
est-il possible de générer ces userform directement à partir de la table
(en

utilisant caption)

sur ces formulaires il y a des boutons à cocher, qui, si on les
sélectionnent vont permettrent de générer des lignes dans un tableau.
Je n'ai pas envie de modifier les formulaires tous les 4 matins, des
qu'une

reference change.

Mon 2nd problème :
lorsque le formulaire a été affiché, l'utilisateur a cliqué sur plusieurs
choix (il peut y en avoir jusqu'à une centaine). Je voudrais utiliser une
commande while pour alléger mon code.
while i < 100
if commandbouton&i then
ajouterligne(i,commandbouton&i.caption,etc...)
end if
i = i + 1
wend
est-ce possible ?

Je n'ai pas trouvé dans l'aide de vb.

Merci d'avance à ceux qui peuvent m'aider sur l'une ou l'autre question

S'Ju




Avatar
Chris Michel
Ta boucle while marchera pas tel quel car le code
commandbutton & i n'est pas valide. Essaie plutôt un truc
avec l'instruction "For each" (mais je suis pas un pro
alors je te laisse regarder l'aide ou poser une question
plus précise aux vieux renards du forum)

-----Message d'origine-----
Bonjour, mon 1er problème est le suivant :
pour le moment j'ai créé des userform statiques qui
reprennent les libellés

de reference de table
est-il possible de générer ces userform directement à
partir de la table (en

utilisant caption)

sur ces formulaires il y a des boutons à cocher, qui, si
on les

sélectionnent vont permettrent de générer des lignes dans
un tableau.

Je n'ai pas envie de modifier les formulaires tous les 4
matins, des qu'une

reference change.

Mon 2nd problème :
lorsque le formulaire a été affiché, l'utilisateur a
cliqué sur plusieurs

choix (il peut y en avoir jusqu'à une centaine). Je
voudrais utiliser une

commande while pour alléger mon code.
while i < 100
if commandbouton&i then
ajouterligne(i,commandbouton&i.caption,etc...)
end if
i = i + 1
wend
est-ce possible ?

Je n'ai pas trouvé dans l'aide de vb.

Merci d'avance à ceux qui peuvent m'aider sur l'une ou
l'autre question


S'Ju


.