Discussion :

[lapa-jh]

Bonjour,

j'aimerai savoir s'il est possible de changer le type de variable sans effacer celle-ci.

je m'explique:

je déclare des variables en double car j'ai des calculs à faire dessus.

ces résultats je dois les placer dans une textbox, à la suite.

pour ce faire, je dois pouvoir considérer ces résultats comme des string afin de les concaténer par exemple. y aurait il un moyen de passer d'un double à un string ? (j'ai peu d'espoir mais pour quoi pas...)

ou alors comment concaténer des variables de type double?


deuxième question:

comment faire varier le n° de la textbox.

exemple j'ai une action répétitive à effectuer donc je passe par une boucle

Code :

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

1
2
3
for i=1 to 10
Textbox(i)=cells(3+i, 2)
next

bon c'est le textbox(i) qui pose problème. comment lui faire sélectionner textbox1, puis 2 puis 3... jusqu'à 10?

merci beaucoup

[ouskel'n'or]

Pour la première question :

Code :

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

TextBox1.text = cstr(Var1) & crtr(Var2) & ...

Pour la seconde, je regarde.

Pour la seconde, si ton txtbox est dans un userform

Code :

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

1
2
3
for i=1 to 10
     me.controls(Textbox(i)).text=cells(3+i, 2).value
next

Tu dis
A+

[lapa-jh]

ça fonctionne merci beaucoup

[lapa-jh]

Pour la seconde, si ton txtbox est dans un userform

Code :

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

1
2
3
for i=1 to 10
     me.controls(Textbox(i)).text=cells(3+i, 2).value
next

Tu dis
A+

je réactualise le topic car j'essaye d'appliquer la méthode pour des checkbox et je patine.

en gros je voudrais chocher d'un coup les checkbox 3 à 13 via une formule du genre:

Code :

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

1
2
3
for i=3 to 13
     me.controls(CheckBox(i)).true.value
next i

mais il me met "fonction non définie" sur Checkbox.
Bref au niveau syntaxe ça foit pas être ça et j'ai beau essayer plusieurs variantes j'ai toujours le même souci.

[ouskel'n'or]

Code :

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

1
2
3
for i=3 to 13
     me.controls(CheckBox(i)).value = True
next i

[lapa-jh]

Code :

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

1
2
3
for i=3 to 13
     me.controls(CheckBox(i)).value = True
next i

non plus il me met "sub ou fonction non définie". :/

[alsimbad]

y a confondance ouskel

Code :

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

1
2
3
for i=3 to 13
     me.controls("CheckBox" & i).value = True
next i

et tu appelle tes chekbox ou combobox comme tu veux
caisse1 caisse2 ...

[lapa-jh]

ça marche nickel

merci bien